File |
Line number |
Procedure |
Code |
./pkg/fizhi/update_earth_exports.F |
689 |
SIBALB |
FUNCTION COEFF(TABLE, NTABL, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
693 |
SIBALB |
_RL TABLE (NTABL, 2), DX, DY |
./pkg/fizhi/update_earth_exports.F |
695 |
SIBALB |
COEFF = (TABLE(LAI, 1) |
./pkg/fizhi/update_earth_exports.F |
696 |
SIBALB |
& + (TABLE(LAI ,2) - TABLE(LAI ,1)) * DY ) * (1.0-DX) |
./pkg/fizhi/update_earth_exports.F |
697 |
SIBALB |
& + (TABLE(LAI+1,1) |
./pkg/fizhi/update_earth_exports.F |
698 |
SIBALB |
& + (TABLE(LAI+1,2) - TABLE(LAI+1,1)) * DY ) * DX |