File |
Line number |
Procedure |
Code |
./pkg/fizhi/slprs.F |
27 |
SLPRS |
_RL TWO, BETA |
./pkg/fizhi/slprs.F |
29 |
SLPRS |
PARAMETER(BETA = 0.0065) |
./pkg/fizhi/slprs.F |
67 |
SLPRS |
TM(I) = TM(I) * (PLE(I,LM+1)/1000.)**AK + BETA*PHIS(I)/(TWO*G) |
./pkg/fizhi/slprs.F |
69 |
SLPRS |
TM(I) = THZ(I,LM)*(PLE(I,LM+1)/1000.)**AK + BETA*PHIS(I)/(TWO*G) |
./pkg/fizhi/update_earth_exports.F |
243 |
SIBALB |
_RL FAC,GAMMA,BETA,ALPHA,DX,DY,ALA,GRN (2),SNWALB(4,NTYPS) |
./pkg/fizhi/update_earth_exports.F |
661 |
SIBALB |
BETA = COEFF (BTVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
664 |
SIBALB |
AVISDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
./pkg/fizhi/update_earth_exports.F |
665 |
SIBALB |
AVISDF(I) = ALPHA-BETA |
./pkg/fizhi/update_earth_exports.F |
666 |
SIBALB |
& + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
./pkg/fizhi/update_earth_exports.F |
669 |
SIBALB |
BETA = COEFF (BTIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
672 |
SIBALB |
ANIRDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
./pkg/fizhi/update_earth_exports.F |
673 |
SIBALB |
ANIRDF(I) = ALPHA-BETA |
./pkg/fizhi/update_earth_exports.F |
674 |
SIBALB |
& + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |