File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
225 |
SIBALB |
_RL FAC,GAMMA,BETA,ALPHA,DX,DY,ALA,GRN (2),SNWALB(4,NTYPS) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
651 |
SIBALB |
GAMMA = COEFF (GMVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
653 |
SIBALB |
AVISDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
655 |
SIBALB |
* + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
659 |
SIBALB |
GAMMA = COEFF (GMIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
661 |
SIBALB |
ANIRDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
663 |
SIBALB |
* + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
./pkg/fizhi/update_earth_exports.F |
225 |
SIBALB |
_RL FAC,GAMMA,BETA,ALPHA,DX,DY,ALA,GRN (2),SNWALB(4,NTYPS) |
./pkg/fizhi/update_earth_exports.F |
651 |
SIBALB |
GAMMA = COEFF (GMVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
653 |
SIBALB |
AVISDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
./pkg/fizhi/update_earth_exports.F |
655 |
SIBALB |
* + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
./pkg/fizhi/update_earth_exports.F |
659 |
SIBALB |
GAMMA = COEFF (GMIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
661 |
SIBALB |
ANIRDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
./pkg/fizhi/update_earth_exports.F |
663 |
SIBALB |
* + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
./pkg/fizhi/fizhi_lsm.F |
702 |
RCUNST |
& RCINV, GAMMA, EKAT, DUM1, |
./pkg/fizhi/fizhi_lsm.F |
752 |
RCUNST |
GAMMA = VGRST1(ITYP(ChNo)) / VGRST3(ITYP(ChNo)) + |
./pkg/fizhi/fizhi_lsm.F |
756 |
RCUNST |
RHO4 = GAMMA / (PAR(ChNo) * (DUM1 + DUM2)) |
./pkg/fizhi/fizhi_lsm.F |
758 |
RCUNST |
DUM1 = (VGRST2(ITYP(ChNo)) - GAMMA) / (GAMMA + 1.E-20) |