| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
861 |
ASTRO |
SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA ) |
|
./pkg/fizhi/fizhi_clockstuff.F |
999 |
ASTRO |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2365 |
RNEVP |
SUBROUTINE RNEVP(NN,IRUN,NLAY,TL,QL,RAIN,PL,CLFRAC,SP,DP,PLKE, |
|
./pkg/fizhi/fizhi_moist.F |
2372 |
RNEVP |
_RL TL(IRUN,NLAY),QL(IRUN,NLAY),RAIN(IRUN,NLAY), |
|
./pkg/fizhi/fizhi_moist.F |
2373 |
RNEVP |
. PL(IRUN,NLAY),CLFRAC(IRUN,NLAY),SP(IRUN),TEMP1(IRUN,NLAY), |
|
./pkg/fizhi/fizhi_moist.F |
2374 |
RNEVP |
. TEMP2(IRUN,NLAY),PLKE(IRUN,NLAY+1), |
|
./pkg/fizhi/fizhi_moist.F |
2375 |
RNEVP |
. RCON(IRUN),RLAR(IRUN),DP(IRUN,NLAY),PLK(IRUN,NLAY),TH(IRUN,NLAY), |
|
./pkg/fizhi/fizhi_moist.F |
2376 |
RNEVP |
. TEMP3(IRUN,NLAY) |
|
./pkg/fizhi/fizhi_moist.F |
2377 |
RNEVP |
integer ITMP1(IRUN,NLAY),ITMP2(IRUN,NLAY) |
|
./pkg/fizhi/fizhi_moist.F |
2378 |
RNEVP |
_RL CLSBTH(IRUN,NLAY) |
|
./pkg/fizhi/fizhi_moist.F |
2399 |
RNEVP |
_RL EVP9(IRUN,NLAY) |
|
./pkg/fizhi/fizhi_moist.F |
2423 |
RNEVP |
IRNLAY = IRUN*NLAY |
|
./pkg/fizhi/fizhi_moist.F |
2424 |
RNEVP |
IRNLM1 = IRUN*(NLAY-1) |
|
./pkg/fizhi/fizhi_moist.F |
2432 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2452 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2461 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2470 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2479 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2489 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2505 |
RNEVP |
DO 20 I=1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2543 |
RNEVP |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_moist.F |
2568 |
RNEVP |
DO I=1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2321 |
SFCFLX |
2 VAHS,FIRST,LAST,N,IRUN,aitr,VRHO,VRHOZPK,VKH,VKM, |
|
./pkg/fizhi/fizhi_turb.F |
2373 |
SFCFLX |
_RL VUS(IRUN),VVS(IRUN),VTHV1(IRUN),VTHV2(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2374 |
SFCFLX |
_RL VTH1(IRUN),VTH2(IRUN),VSH1(IRUN),VSH2(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2375 |
SFCFLX |
_RL VPK(IRUN),VPKE(IRUN),VPE(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2376 |
SFCFLX |
_RL VZ0(IRUN),VHS(IRUN),VAHS(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2377 |
SFCFLX |
integer IVWATER(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2379 |
SFCFLX |
_RL VRHO(IRUN),VRHOZPK(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2380 |
SFCFLX |
_RL VKM(IRUN),VKH(IRUN),VUSTAR(IRUN),VXX(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2381 |
SFCFLX |
_RL VYY(IRUN),VCU(IRUN),VCT(IRUN),VRIB(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2382 |
SFCFLX |
_RL VZETA(IRUN),VWS(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
2426 |
SFCFLX |
DO 9000 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2440 |
SFCFLX |
DO 9002 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2447 |
SFCFLX |
DO 9004 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2458 |
SFCFLX |
DO 9006 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2475 |
SFCFLX |
DO 9008 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2482 |
SFCFLX |
4 VTEMP,VTEMP,1,.TRUE.,IRUN,VDZETA, |
|
./pkg/fizhi/fizhi_turb.F |
2488 |
SFCFLX |
DO 9010 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2507 |
SFCFLX |
DO 9012 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2513 |
SFCFLX |
DO 9014 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2517 |
SFCFLX |
1 VTEMP,IRUN,VXX,VXX0,VYY, |
|
./pkg/fizhi/fizhi_turb.F |
2519 |
SFCFLX |
DO 9016 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2531 |
SFCFLX |
DO 9018 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2534 |
SFCFLX |
CALL ZCSUB ( VUSTAR,VHZ,IVWATER,.FALSE.,IRUN,VTEMP) |
|
./pkg/fizhi/fizhi_turb.F |
2535 |
SFCFLX |
DO 9020 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2554 |
SFCFLX |
4 VYY,VYY0,2,LWATER,IRUN,VDZETA, |
|
./pkg/fizhi/fizhi_turb.F |
2561 |
SFCFLX |
DO 9022 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2568 |
SFCFLX |
DO 9024 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2583 |
SFCFLX |
DO 9026 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2587 |
SFCFLX |
1 VPSIH,IRUN,VXX,VXX0,VYY, |
|
./pkg/fizhi/fizhi_turb.F |
2589 |
SFCFLX |
DO 9028 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2614 |
SFCFLX |
4 VYY,VYY0,ITYPE,LWATER,IRUN,VDZETA, |
|
./pkg/fizhi/fizhi_turb.F |
2624 |
SFCFLX |
DO 9030 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2630 |
SFCFLX |
DO 9032 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2637 |
SFCFLX |
DO 9034 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2647 |
SFCFLX |
DO 9036 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2664 |
SFCFLX |
DO 9038 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2675 |
SFCFLX |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2680 |
SFCFLX |
1 VPSIH2,IRUN,VHZ,VHZ,VHZ, |
|
./pkg/fizhi/fizhi_turb.F |
2682 |
SFCFLX |
DO I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
2730 |
SFCFLX |
DO 9044 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3035 |
PSI |
SUBROUTINE PSI(VZZ,VZH,VPSIM,VPSIH,IRUN,VX,VXS,VY,VYS,IFLAG) |
|
./pkg/fizhi/fizhi_turb.F |
3058 |
PSI |
_RL VZZ(IRUN),VZH(IRUN),VPSIM(IRUN),VPSIH(IRUN), |
|
./pkg/fizhi/fizhi_turb.F |
3059 |
PSI |
1 VX(IRUN),VXS(IRUN),VY(IRUN),VYS(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
3091 |
PSI |
DO 9000 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3101 |
PSI |
DO 9122 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3104 |
PSI |
DO 9022 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3119 |
PSI |
DO 9002 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3162 |
PSI |
DO 9008 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3195 |
PSI |
DO 9012 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3210 |
PSI |
DO 9114 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3215 |
PSI |
DO 9014 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3227 |
PSI |
DO 9016 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3290 |
PSI |
DO 9030 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
3322 |
PSI |
DO 9026 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4084 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
|
./pkg/fizhi/fizhi_turb.F |
4128 |
LINADJ |
_RL VRIB1(IRUN),VRIB2(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4129 |
LINADJ |
_RL VWS1(IRUN),VWS2(IRUN),VZ1(IRUN),VUSTAR(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4130 |
LINADJ |
integer IWATER(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4131 |
LINADJ |
_RL VAPSIM(IRUN),VAPSIHG(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4132 |
LINADJ |
_RL VPSIH(IRUN),VPSIG(IRUN),VX(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4133 |
LINADJ |
_RL VX0(IRUN),VY(IRUN),VY0(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4135 |
LINADJ |
_RL VDZETA(IRUN),VDZ0(IRUN),VDPSIM(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4136 |
LINADJ |
_RL VDPSIH(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4137 |
LINADJ |
integer INTRIB(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4169 |
LINADJ |
DO 9000 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4174 |
LINADJ |
DO 9002 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4180 |
LINADJ |
DO 9004 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4188 |
LINADJ |
CALL ZCSUB ( VUSTAR,VDZSEA,IWATER,.TRUE.,IRUN,VZ2) |
|
./pkg/fizhi/fizhi_turb.F |
4190 |
LINADJ |
DO 9006 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4203 |
LINADJ |
DO 9008 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4211 |
LINADJ |
DO 9010 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4244 |
LINADJ |
DO 9012 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4261 |
LINADJ |
DO 9014 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4269 |
LINADJ |
DO 9016 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4276 |
LINADJ |
DO 9018 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4284 |
LINADJ |
DO 9020 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4289 |
LINADJ |
DO 9022 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4299 |
LINADJ |
DO 9024 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4313 |
LINADJ |
DO 9026 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4322 |
LINADJ |
DO 9028 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4328 |
LINADJ |
DO 9030 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4337 |
LINADJ |
DO 9032 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4346 |
LINADJ |
DO 9034 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4361 |
LINADJ |
DO 9036 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4397 |
ZCSUB |
SUBROUTINE ZCSUB (VUSTAR,VDZSEA,IWATER,LDZSEA,IRUN,VZSEA) |
|
./pkg/fizhi/fizhi_turb.F |
4422 |
ZCSUB |
_RL VZSEA(IRUN),VUSTAR(IRUN),VDZSEA(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4423 |
ZCSUB |
integer IWATER(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4432 |
ZCSUB |
_RL AA(IRUN,5),TEMP(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4433 |
ZCSUB |
integer INT2(IRUN),INT3(IRUN),INT4(IRUN) |
|
./pkg/fizhi/fizhi_turb.F |
4449 |
ZCSUB |
DO 9000 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4456 |
ZCSUB |
DO 9002 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4464 |
ZCSUB |
DO 9004 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4471 |
ZCSUB |
DO 9006 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4478 |
ZCSUB |
DO 9008 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4487 |
ZCSUB |
DO 9010 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4499 |
ZCSUB |
DO 9012 I = 1,IRUN |
|
./pkg/fizhi/fizhi_turb.F |
4511 |
ZCSUB |
DO 9014 I = 1,IRUN |
|
./pkg/fizhi/update_chemistry_exports.F |
313 |
INTERP_OZ |
_RL O3INT1(IRUN,nozlevs) |
|
./pkg/fizhi/update_chemistry_exports.F |
314 |
INTERP_OZ |
_RL QPR1(IRUN), QPR2(IRUN), SLOPE(IRUN) |
|
./pkg/fizhi/update_chemistry_exports.F |
315 |
INTERP_OZ |
_RL PR1(IRUN), PR2(IRUN) |
|
./pkg/fizhi/update_chemistry_exports.F |
322 |
INTERP_OZ |
DO 34 I=1,IRUN |
|
./pkg/fizhi/update_chemistry_exports.F |
347 |
INTERP_OZ |
DO 38 I=1,IRUN |
|
./pkg/fizhi/update_chemistry_exports.F |
359 |
INTERP_OZ |
DO 44 I = 1,IRUN |
|
./pkg/fizhi/update_chemistry_exports.F |
381 |
INTERP_OZ |
DO 48 I=1,IRUN |
|
./pkg/fizhi/update_chemistry_exports.F |
398 |
INTERP_OZ |
DO 60 I=1,IRUN |
|
./pkg/fizhi/update_earth_exports.F |
163 |
SIBALB |
& VLAI, VGRN, ZTH, SNW, ITYP, IRUN ) |
|
./pkg/fizhi/update_earth_exports.F |
184 |
SIBALB |
INTEGER IRUN |
|
./pkg/fizhi/update_earth_exports.F |
185 |
SIBALB |
_RL AVISDR (IRUN), ANIRDR (IRUN), AVISDF (IRUN), ANIRDF (IRUN) |
|
./pkg/fizhi/update_earth_exports.F |
186 |
SIBALB |
_RL VLAI(IRUN),VGRN (IRUN), SNW(IRUN) |
|
./pkg/fizhi/update_earth_exports.F |
187 |
SIBALB |
_RL ZTH(IRUN) |
|
./pkg/fizhi/update_earth_exports.F |
188 |
SIBALB |
INTEGER ITYP (IRUN) |
|
./pkg/fizhi/update_earth_exports.F |
654 |
SIBALB |
DO 100 I=1,IRUN |
|
./pkg/chronos/chronos.F |
698 |
ASTRO |
SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA ) |
|
./pkg/chronos/chronos.F |
832 |
ASTRO |
DO I = 1,IRUN |