File |
Line number |
Procedure |
Code |
./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 |
650 |
SIBALB |
BETA = COEFF (BTVDR (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 |
654 |
SIBALB |
AVISDF(I) = ALPHA-BETA |
./pkg/fizhi/update_earth_exports.F |
655 |
SIBALB |
* + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |
./pkg/fizhi/update_earth_exports.F |
658 |
SIBALB |
BETA = COEFF (BTIDR (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 |
662 |
SIBALB |
ANIRDF(I) = ALPHA-BETA |
./pkg/fizhi/update_earth_exports.F |
663 |
SIBALB |
* + 2.*BETA*GAMMA*(1.-GAMMA*LOG((1.+GAMMA)/GAMMA)) |