File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1130 |
VPDFAC |
I NCH, ITYP, ESATTC, EA, |
./pkg/fizhi/fizhi_lsm.F |
1140 |
VPDFAC |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1141 |
VPDFAC |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
1142 |
VPDFAC |
_RL ESATTC(NCH), EA(NCH), VPDSTR(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1151 |
VPDFAC |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
1171 |
TMPFAC |
I NCH, ITYP, TC, |
./pkg/fizhi/fizhi_lsm.F |
1181 |
TMPFAC |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1182 |
TMPFAC |
INTEGER ITYP(NCH), ChNo, TypPtr |
./pkg/fizhi/fizhi_lsm.F |
1183 |
TMPFAC |
_RL TC(NCH), FTEMP(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1212 |
TMPFAC |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
1238 |
SMFAC |
I NCH, ITYP, ESATTC, EA, PHR, SOILCO, |
./pkg/fizhi/fizhi_lsm.F |
1251 |
SMFAC |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1252 |
SMFAC |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
1253 |
SMFAC |
_RL ESATTC(NCH), EA(NCH), PHR(NCH), SOILCO(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1254 |
SMFAC |
& RCUN(NCH), VPDSTR(NCH), FTEMP(NCH), TC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1255 |
SMFAC |
& PSUR(NCH), Z2(NCH), RSOIL1(NCH), RSOIL2(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1256 |
SMFAC |
& VGPH1X(NCH), VGPH2X(NCH), VGRPLX(NCH), RC(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1262 |
SMFAC |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
1293 |
RSURFP |
I NCH, UM, U2FAC, Z2, RDC, WET, ESATTC, EA, |
./pkg/fizhi/fizhi_lsm.F |
1299 |
RSURFP |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1301 |
RSURFP |
_RL UM(NCH), U2FAC(NCH), Z2(NCH), RDC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1302 |
RSURFP |
& WET(NCH), ESATTC(NCH), EA(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1303 |
RSURFP |
& RC(NCH), RX1(NCH), RX2(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1308 |
RSURFP |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
1343 |
RCANOP |
I NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
1354 |
RCANOP |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1356 |
RCANOP |
_RL CAPAC(NCH), SNOW(NCH), SATCAP(NCH), RA(NCH), ETURB(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1357 |
RCANOP |
& RC(NCH), SNWFRC(NCH), POTFRC(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1365 |
RCANOP |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
1407 |
WUPDAT |
I NCH, ITYP, DTSTEP, |
./pkg/fizhi/fizhi_lsm.F |
1421 |
WUPDAT |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1422 |
WUPDAT |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
1423 |
WUPDAT |
_RL EVAP(NCH), SATCAP(NCH), VGWMAX(NLAY,NTYPS), |
./pkg/fizhi/fizhi_lsm.F |
1424 |
WUPDAT |
& TC(NCH), RA(NCH), RC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1425 |
WUPDAT |
& CAPAC(NCH), SNOW(NCH), SWET(nch,NLAY), |
./pkg/fizhi/fizhi_lsm.F |
1426 |
WUPDAT |
& RUNOFF(NCH), RX1(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1427 |
WUPDAT |
& RX2(NCH), RUNSRF(NCH), FWSOIL(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1428 |
WUPDAT |
& ESNFRC(NCH), EIRFRC(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1429 |
WUPDAT |
_RL EINT(NCH), ESOI(NCH), EVEG(NCH), ESNO(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1435 |
WUPDAT |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
1561 |
GWATER |
I NCH, ITYP, WSMAX, PHLAY, AKLAY, TC, |
./pkg/fizhi/fizhi_lsm.F |
1573 |
GWATER |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
1574 |
GWATER |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
1575 |
GWATER |
_RL VGSLOX(NCH), RUNOFF(NCH), GDRAIN(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1580 |
GWATER |
& AKLAY(nch,NLAY), TC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1582 |
GWATER |
& VGZDEX(NLAY,nch), WETEQ1(NCH), WETEQ2(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1583 |
GWATER |
& PHSAT(NCH), AKSAT(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1588 |
GWATER |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
170 |
TILE |
DO 50 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
187 |
TILE |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
248 |
TILE |
I NCH, ITYP, SUNANG, SQSCAT, PDIR, |
./pkg/fizhi/fizhi_lsm.F |
254 |
TILE |
I NCH, ITYP, ESATTC, EA, |
./pkg/fizhi/fizhi_lsm.F |
259 |
TILE |
I NCH, ITYP, TC, |
./pkg/fizhi/fizhi_lsm.F |
264 |
TILE |
I NCH, ITYP, SWET12, VGBEEX, VGPSAX, VGCSAX, DELZ12, |
./pkg/fizhi/fizhi_lsm.F |
271 |
TILE |
I NCH, ITYP, ESATTC, EA, PHR, SOILCO, RCUN, |
./pkg/fizhi/fizhi_lsm.F |
278 |
TILE |
I NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
./pkg/fizhi/fizhi_lsm.F |
285 |
TILE |
I NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
296 |
TILE |
DO 120 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
303 |
TILE |
CALL VPDFAC (NCH, ITYP, ESATTX, EA, VPDSTX) |
./pkg/fizhi/fizhi_lsm.F |
304 |
TILE |
CALL TMPFAC (NCH, ITYP, TX, FTEMPX) |
./pkg/fizhi/fizhi_lsm.F |
306 |
TILE |
I NCH, ITYP, ESATTX, EA, PHR, SOILCO, RCUN, |
./pkg/fizhi/fizhi_lsm.F |
311 |
TILE |
CALL RSURFP (NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
./pkg/fizhi/fizhi_lsm.F |
316 |
TILE |
CALL RCANOP (NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
319 |
TILE |
DO 125 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
324 |
TILE |
CALL VPDFAC (NCH, ITYP, ESATTC, EAX, VPDSTX) |
./pkg/fizhi/fizhi_lsm.F |
326 |
TILE |
I NCH, ITYP, ESATTC, EAX, PHR, SOILCO, RCUN, |
./pkg/fizhi/fizhi_lsm.F |
32 |
TILE |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
331 |
TILE |
CALL RSURFP (NCH, UM, U2FAC, Z2, RDC, SWET(1,SFCLY), |
./pkg/fizhi/fizhi_lsm.F |
336 |
TILE |
CALL RCANOP (NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
339 |
TILE |
DO 150 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
33 |
TILE |
INTEGER ITYP(NCH) |
./pkg/fizhi/fizhi_lsm.F |
34 |
TILE |
_RL DTSTEP, TRAINL(NCH), TRAINC(NCH), TSNOW(NCH), UM(NCH), |
./pkg/fizhi/fizhi_lsm.F |
356 |
TILE |
DO 200 CHNO=1,NCH |
./pkg/fizhi/fizhi_lsm.F |
35 |
TILE |
& ETURB(NCH), DEDQA(NCH), HSTURB(NCH), DHSDTC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
367 |
TILE |
I NCH, ITYP, DTSTEP, ESATTC, DESDTC, ALHX, |
./pkg/fizhi/fizhi_lsm.F |
36 |
TILE |
& TM (NCH), CD(NCH), SUNANG(NCH), DHSDQA(NCH), |
./pkg/fizhi/fizhi_lsm.F |
37 |
TILE |
& QM (NCH), PARDIR(NCH), PARDIF(NCH), SWNET(NCH), |
./pkg/fizhi/fizhi_lsm.F |
389 |
TILE |
I NCH, ITYP, DTSTEP, |
./pkg/fizhi/fizhi_lsm.F |
38 |
TILE |
& HLWDWN(NCH), PSUR(NCH), ZLAI(NCH), GREEN(NCH), |
./pkg/fizhi/fizhi_lsm.F |
399 |
TILE |
DO 300 CHNO=1,NCH |
./pkg/fizhi/fizhi_lsm.F |
39 |
TILE |
& Z2(NCH), SQSCAT(NCH), DEDTC(NCH) |
./pkg/fizhi/fizhi_lsm.F |
409 |
TILE |
I NCH, ITYP, SWET (1, SFCLY), VGBEEX, |
./pkg/fizhi/fizhi_lsm.F |
40 |
TILE |
_RL RSOIL1(NCH), RSOIL2(NCH), RDC(NCH), U2FAC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
414 |
TILE |
I NCH, ITYP, SWET(1,ROOTLY), VGBEEX, |
./pkg/fizhi/fizhi_lsm.F |
419 |
TILE |
I NCH, ITYP, SWET(1,RECHLY), VGBEEX, |
./pkg/fizhi/fizhi_lsm.F |
41 |
TILE |
& QSATTC(NCH), DQSDTC(NCH), ALWRAD(NCH), BLWRAD(NCH), |
./pkg/fizhi/fizhi_lsm.F |
425 |
TILE |
I NCH, ITYP, VGWMAX, PHLAY, AKLAY, TC, DTSTEP, |
./pkg/fizhi/fizhi_lsm.F |
42 |
TILE |
& TC(NCH), TD(NCH), QA(NCH), BOMB(NCH), |
./pkg/fizhi/fizhi_lsm.F |
438 |
TILE |
I NCH, ITYP, SWET(1,ROOTLY), VGBEEX, |
./pkg/fizhi/fizhi_lsm.F |
43 |
TILE |
& SWET1(NCH), SWET2(NCH), SWET3(NCH), CAPAC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
444 |
TILE |
I NCH, ITYP, DTSTEP, TRAINL, TRAINC, TSNOW, SATCAP, |
./pkg/fizhi/fizhi_lsm.F |
44 |
TILE |
& SNOW(NCH), EVAP(NCH), SHFLUX(NCH), RUNOFF(NCH) |
./pkg/fizhi/fizhi_lsm.F |
455 |
TILE |
DO 2000 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
45 |
TILE |
_RL EINT(NCH), ESOI(NCH), EVEG(NCH), ESNO(NCH), |
./pkg/fizhi/fizhi_lsm.F |
46 |
TILE |
& STRDG1(NCH), STRDG2(NCH), STRDG3(NCH), STRDG4(NCH), |
./pkg/fizhi/fizhi_lsm.F |
47 |
TILE |
& STRDG5(NCH), STRDG6(NCH), STRDG7(NCH), STRDG8(NCH), |
./pkg/fizhi/fizhi_lsm.F |
48 |
TILE |
& STRDG9(NCH), |
./pkg/fizhi/fizhi_lsm.F |
498 |
INTERC |
I NCH, ITYP, DTSTEP, TRAINL, TRAINC, |
./pkg/fizhi/fizhi_lsm.F |
49 |
TILE |
& SMELT(NCH), HLATN(NCH), HLWUP(NCH), GDRAIN(NCH), |
./pkg/fizhi/fizhi_lsm.F |
50 |
TILE |
& RUNSRF(NCH), FWSOIL(NCH) |
./pkg/fizhi/fizhi_lsm.F |
514 |
INTERC |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
515 |
INTERC |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
516 |
INTERC |
_RL TRAINL(NCH), TRAINC(NCH), TSNOW(NCH), SATCAP(NCH), |
./pkg/fizhi/fizhi_lsm.F |
517 |
INTERC |
& WMAX(NLAY,NTYPS), TC(NCH), CSOIL(NCH), CAPAC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
518 |
INTERC |
& SNOW(NCH), SWET1(NCH), RUNOFF(NCH), SMELT(NCH), |
./pkg/fizhi/fizhi_lsm.F |
519 |
INTERC |
& RUNSRF(NCH), FWSOIL(NCH), WETEQ1(NCH), WETINT |
./pkg/fizhi/fizhi_lsm.F |
529 |
INTERC |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
680 |
RCUNST |
I NCH, ITYP, SUNANG, SQSCAT, PDIR, |
./pkg/fizhi/fizhi_lsm.F |
692 |
RCUNST |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
693 |
RCUNST |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
695 |
RCUNST |
_RL SUNANG(NCH), PDIR(NCH), PAR(NCH), ZLAI(NCH), |
./pkg/fizhi/fizhi_lsm.F |
696 |
RCUNST |
& SQSCAT(NCH), GREEN(NCH), RCUN(NCH) |
./pkg/fizhi/fizhi_lsm.F |
6 |
TILE |
I NCH, DTSTEP, ITYP, TRAINL,TRAINC, TSNOW, UM, |
./pkg/fizhi/fizhi_lsm.F |
730 |
RCUNST |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
780 |
SOIL |
I NCH, ITYP, WET, VGBEEX, VGPSAX, VGCSAX, DELZ, |
./pkg/fizhi/fizhi_lsm.F |
790 |
SOIL |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
791 |
SOIL |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
793 |
SOIL |
_RL WET(NCH), PHR(NCH), SOILCO(NCH), VGPSAX(NCH), |
./pkg/fizhi/fizhi_lsm.F |
794 |
SOIL |
& VGCSAX(NCH), VGBEEX(NCH), DELZ(NTYPS), WETEQ(NCH), |
./pkg/fizhi/fizhi_lsm.F |
797 |
SOIL |
DO 100 ChNo = 1, NCH |
./pkg/fizhi/fizhi_lsm.F |
822 |
FLUXES |
I NCH, ITYP, DTSTEP, ESATTC, DESDTC, ALHX, |
./pkg/fizhi/fizhi_lsm.F |
840 |
FLUXES |
INTEGER NCH |
./pkg/fizhi/fizhi_lsm.F |
841 |
FLUXES |
INTEGER ITYP(NCH), ChNo |
./pkg/fizhi/fizhi_lsm.F |
843 |
FLUXES |
_RL DTSTEP, ESATTC(NCH), DESDTC(NCH), ALHX(NCH), |
./pkg/fizhi/fizhi_lsm.F |
844 |
FLUXES |
& ETURB(NCH), DEDEA(NCH), DEDTC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
845 |
FLUXES |
& HSTURB(NCH), DHSDEA(NCH), DHSDTC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
846 |
FLUXES |
& RC(NCH), DRCDEA(NCH), DRCDTC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
847 |
FLUXES |
& SWNET(NCH), HLWDWN(NCH), ALWRAD(NCH), BLWRAD(NCH), |
./pkg/fizhi/fizhi_lsm.F |
848 |
FLUXES |
& TM(NCH), EM(NCH), CSOIL(NCH), PSUR(NCH), |
./pkg/fizhi/fizhi_lsm.F |
849 |
FLUXES |
& EMAXRT(NCH), WMAX(NLAY,NTYPS), |
./pkg/fizhi/fizhi_lsm.F |
850 |
FLUXES |
& TC(NCH), TD(NCH), EA(NCH), ESNFRC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
851 |
FLUXES |
& SWET1(NCH,NLAY), SNOW(NCH), |
./pkg/fizhi/fizhi_lsm.F |
852 |
FLUXES |
& RUNOFF(NCH), EVAP(NCH), SHFLUX(NCH), SMELT(NCH), |
./pkg/fizhi/fizhi_lsm.F |
853 |
FLUXES |
& HLWUP(NCH), BOMB(NCH) |
./pkg/fizhi/fizhi_lsm.F |
854 |
FLUXES |
_RL STRDG1(NCH),STRDG2(NCH),STRDG3(NCH),STRDG4(NCH) |
./pkg/fizhi/fizhi_lsm.F |
855 |
FLUXES |
_RL STRDG5(NCH),STRDG6(NCH),STRDG7(NCH),STRDG8(NCH) |
./pkg/fizhi/fizhi_lsm.F |
856 |
FLUXES |
_RL STRDG9(NCH) |
./pkg/fizhi/fizhi_lsm.F |
869 |
FLUXES |
DO 200 ChNo = 1, NCH |