File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_clockstuff.F |
847 |
ASTRO |
SUBROUTINE ASTRO ( NYMD,NHMS,ALAT,ALON,IRUN,COSZ,RA ) |
./pkg/fizhi/fizhi_clockstuff.F |
984 |
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 |
2770 |
SFCFLX |
2 VAHS,FIRST,LAST,N,IRUN,aitr,VRHO,VRHOZPK,VKH,VKM, |
./pkg/fizhi/fizhi_turb.F |
2825 |
SFCFLX |
_RL VUS(IRUN),VVS(IRUN),VTHV1(IRUN),VTHV2(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2826 |
SFCFLX |
_RL VTH1(IRUN),VTH2(IRUN),VSH1(IRUN),VSH2(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2827 |
SFCFLX |
_RL VPK(IRUN),VPKE(IRUN),VPE(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2828 |
SFCFLX |
_RL VZ0(IRUN),VHS(IRUN),VAHS(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2829 |
SFCFLX |
integer IVWATER(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2831 |
SFCFLX |
_RL VRHO(IRUN),VRHOZPK(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2832 |
SFCFLX |
_RL VKM(IRUN),VKH(IRUN),VUSTAR(IRUN),VXX(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2833 |
SFCFLX |
_RL VYY(IRUN),VCU(IRUN),VCT(IRUN),VRIB(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2834 |
SFCFLX |
_RL VZETA(IRUN),VWS(IRUN) |
./pkg/fizhi/fizhi_turb.F |
2878 |
SFCFLX |
DO 9000 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2892 |
SFCFLX |
DO 9002 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2899 |
SFCFLX |
DO 9004 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2910 |
SFCFLX |
DO 9006 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2927 |
SFCFLX |
DO 9008 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2934 |
SFCFLX |
4 VTEMP,VTEMP,1,.TRUE.,IRUN,VDZETA, |
./pkg/fizhi/fizhi_turb.F |
2940 |
SFCFLX |
DO 9010 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2959 |
SFCFLX |
DO 9012 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2965 |
SFCFLX |
DO 9014 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2969 |
SFCFLX |
1 VTEMP,IRUN,VXX,VXX0,VYY, |
./pkg/fizhi/fizhi_turb.F |
2971 |
SFCFLX |
DO 9016 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2983 |
SFCFLX |
DO 9018 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
2986 |
SFCFLX |
CALL ZCSUB ( VUSTAR,VHZ,IVWATER,.FALSE.,IRUN,VTEMP) |
./pkg/fizhi/fizhi_turb.F |
2987 |
SFCFLX |
DO 9020 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3006 |
SFCFLX |
4 VYY,VYY0,2,LWATER,IRUN,VDZETA, |
./pkg/fizhi/fizhi_turb.F |
3013 |
SFCFLX |
DO 9022 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3020 |
SFCFLX |
DO 9024 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3035 |
SFCFLX |
DO 9026 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3039 |
SFCFLX |
1 VPSIH,IRUN,VXX,VXX0,VYY, |
./pkg/fizhi/fizhi_turb.F |
3041 |
SFCFLX |
DO 9028 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3066 |
SFCFLX |
4 VYY,VYY0,ITYPE,LWATER,IRUN,VDZETA, |
./pkg/fizhi/fizhi_turb.F |
3076 |
SFCFLX |
DO 9030 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3082 |
SFCFLX |
DO 9032 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3089 |
SFCFLX |
DO 9034 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3099 |
SFCFLX |
DO 9036 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3116 |
SFCFLX |
DO 9038 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3127 |
SFCFLX |
DO I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3132 |
SFCFLX |
1 VPSIH2,IRUN,VHZ,VHZ,VHZ, |
./pkg/fizhi/fizhi_turb.F |
3134 |
SFCFLX |
DO I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3182 |
SFCFLX |
DO 9044 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3484 |
PSI |
SUBROUTINE PSI(VZZ,VZH,VPSIM,VPSIH,IRUN,VX,VXS,VY,VYS,IFLAG) |
./pkg/fizhi/fizhi_turb.F |
3510 |
PSI |
_RL VZZ(IRUN),VZH(IRUN),VPSIM(IRUN),VPSIH(IRUN), |
./pkg/fizhi/fizhi_turb.F |
3511 |
PSI |
1 VX(IRUN),VXS(IRUN),VY(IRUN),VYS(IRUN) |
./pkg/fizhi/fizhi_turb.F |
3543 |
PSI |
DO 9000 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3553 |
PSI |
DO 9122 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3556 |
PSI |
DO 9022 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3571 |
PSI |
DO 9002 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3614 |
PSI |
DO 9008 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3647 |
PSI |
DO 9012 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3662 |
PSI |
DO 9114 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3667 |
PSI |
DO 9014 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3679 |
PSI |
DO 9016 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3742 |
PSI |
DO 9030 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
3774 |
PSI |
DO 9026 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4649 |
LINADJ |
1 VAPSIM, VAPSIHG,VPSIH,VPSIG,VX,VX0,VY,VY0,ITYPE,LWATER,IRUN, |
./pkg/fizhi/fizhi_turb.F |
4697 |
LINADJ |
_RL VRIB1(IRUN),VRIB2(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4698 |
LINADJ |
_RL VWS1(IRUN),VWS2(IRUN),VZ1(IRUN),VUSTAR(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4699 |
LINADJ |
integer IWATER(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4700 |
LINADJ |
_RL VAPSIM(IRUN),VAPSIHG(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4701 |
LINADJ |
_RL VPSIH(IRUN),VPSIG(IRUN),VX(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4702 |
LINADJ |
_RL VX0(IRUN),VY(IRUN),VY0(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4704 |
LINADJ |
_RL VDZETA(IRUN),VDZ0(IRUN),VDPSIM(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4705 |
LINADJ |
_RL VDPSIH(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4706 |
LINADJ |
integer INTRIB(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4738 |
LINADJ |
DO 9000 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4743 |
LINADJ |
DO 9002 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4749 |
LINADJ |
DO 9004 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4757 |
LINADJ |
CALL ZCSUB ( VUSTAR,VDZSEA,IWATER,.TRUE.,IRUN,VZ2) |
./pkg/fizhi/fizhi_turb.F |
4759 |
LINADJ |
DO 9006 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4772 |
LINADJ |
DO 9008 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4780 |
LINADJ |
DO 9010 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4813 |
LINADJ |
DO 9012 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4830 |
LINADJ |
DO 9014 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4838 |
LINADJ |
DO 9016 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4845 |
LINADJ |
DO 9018 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4853 |
LINADJ |
DO 9020 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4858 |
LINADJ |
DO 9022 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4868 |
LINADJ |
DO 9024 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4883 |
LINADJ |
DO 9026 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4892 |
LINADJ |
DO 9028 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4898 |
LINADJ |
DO 9030 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4907 |
LINADJ |
DO 9032 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4916 |
LINADJ |
DO 9034 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4931 |
LINADJ |
DO 9036 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
4964 |
ZCSUB |
SUBROUTINE ZCSUB (VUSTAR,VDZSEA,IWATER,LDZSEA,IRUN,VZSEA) |
./pkg/fizhi/fizhi_turb.F |
4989 |
ZCSUB |
_RL VZSEA(IRUN),VUSTAR(IRUN),VDZSEA(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4990 |
ZCSUB |
integer IWATER(IRUN) |
./pkg/fizhi/fizhi_turb.F |
4999 |
ZCSUB |
_RL AA(IRUN,5),TEMP(IRUN) |
./pkg/fizhi/fizhi_turb.F |
5000 |
ZCSUB |
integer INT2(IRUN),INT3(IRUN),INT4(IRUN) |
./pkg/fizhi/fizhi_turb.F |
5016 |
ZCSUB |
DO 9000 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5023 |
ZCSUB |
DO 9002 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5031 |
ZCSUB |
DO 9004 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5038 |
ZCSUB |
DO 9006 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5045 |
ZCSUB |
DO 9008 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5054 |
ZCSUB |
DO 9010 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5066 |
ZCSUB |
DO 9012 I = 1,IRUN |
./pkg/fizhi/fizhi_turb.F |
5078 |
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 |
148 |
SIBALB |
& VLAI, VGRN, ZTH, SNW, ITYP, IRUN ) |
./pkg/fizhi/update_earth_exports.F |
169 |
SIBALB |
INTEGER IRUN |
./pkg/fizhi/update_earth_exports.F |
170 |
SIBALB |
_RL AVISDR (IRUN), ANIRDR (IRUN), AVISDF (IRUN), ANIRDF (IRUN) |
./pkg/fizhi/update_earth_exports.F |
171 |
SIBALB |
_RL VLAI(IRUN),VGRN (IRUN), SNW(IRUN) |
./pkg/fizhi/update_earth_exports.F |
172 |
SIBALB |
_RL ZTH(IRUN) |
./pkg/fizhi/update_earth_exports.F |
173 |
SIBALB |
INTEGER ITYP (IRUN) |
./pkg/fizhi/update_earth_exports.F |
647 |
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 |