| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
1008 |
FLUXES |
& (Q0 + ALHX(CHNO)*(ETURB(ChNo)-EMAXRT(CHNO)) - DHSDEA(CHNO)*DEA) |
|
./pkg/fizhi/fizhi_lsm.F |
1016 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
1041 |
FLUXES |
DTC = ( Q0 + ALHX(CHNO)*ETURB(ChNo) - DHSDEA(CHNO)*DEA ) / |
|
./pkg/fizhi/fizhi_lsm.F |
1049 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
1055 |
FLUXES |
DTC = ( Q0X + ALHX(CHNO)*ETURB(ChNo) - DHSDEA(CHNO)*DEA ) / |
|
./pkg/fizhi/fizhi_lsm.F |
1062 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
1080 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
1093 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
200 |
TILE |
DHSDEA(CHNO) = DHSDQA(CHNO) * EPSILON / PSUR(CHNO) |
|
./pkg/fizhi/fizhi_lsm.F |
368 |
TILE |
I ETURB, DEDEA, DEDTC, HSTURB, DHSDEA, DHSDTC, |
|
./pkg/fizhi/fizhi_lsm.F |
73 |
TILE |
_RL DEDEA(nch), DHSDEA(nch), EM(nch), ESATTC(nch), |
|
./pkg/fizhi/fizhi_lsm.F |
823 |
FLUXES |
I ETURB, DEDEA, DEDTC, HSTURB, DHSDEA, DHSDTC, |
|
./pkg/fizhi/fizhi_lsm.F |
845 |
FLUXES |
& HSTURB(NCH), DHSDEA(NCH), DHSDTC(NCH), |
|
./pkg/fizhi/fizhi_lsm.F |
885 |
FLUXES |
A12 = DHSDEA(ChNo) + ALHX(CHNO) * DEDEA(ChNo) |
|
./pkg/fizhi/fizhi_lsm.F |
938 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
954 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |
|
./pkg/fizhi/fizhi_lsm.F |
993 |
FLUXES |
SHFLUX(ChNo) = HSTURB(ChNo) + DHSDEA(ChNo)*DEA + |