| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/update_earth_exports.F |
228 |
SIBALB |
INTEGER I, LAI |
|
./pkg/fizhi/update_earth_exports.F |
649 |
SIBALB |
LAI = 1 + MAX(0, INT((ALA-BLAI)/DLAI) ) |
|
./pkg/fizhi/update_earth_exports.F |
650 |
SIBALB |
DX = (ALA - (BLAI+(LAI-1)*DLAI)) * (ONE/DLAI) |
|
./pkg/fizhi/update_earth_exports.F |
653 |
SIBALB |
ALPHA = COEFF (ALVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
654 |
SIBALB |
BETA = COEFF (BTVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
655 |
SIBALB |
GAMMA = COEFF (GMVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
661 |
SIBALB |
ALPHA = COEFF (ALIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
662 |
SIBALB |
BETA = COEFF (BTIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
663 |
SIBALB |
GAMMA = COEFF (GMIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
682 |
SIBALB |
FUNCTION COEFF(TABLE, NTABL, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
684 |
SIBALB |
INTEGER NTABL, LAI |
|
./pkg/fizhi/update_earth_exports.F |
688 |
SIBALB |
COEFF = (TABLE(LAI, 1) |
|
./pkg/fizhi/update_earth_exports.F |
689 |
SIBALB |
& + (TABLE(LAI ,2) - TABLE(LAI ,1)) * DY ) * (1.0-DX) |
|
./pkg/fizhi/update_earth_exports.F |
690 |
SIBALB |
& + (TABLE(LAI+1,1) |
|
./pkg/fizhi/update_earth_exports.F |
691 |
SIBALB |
& + (TABLE(LAI+1,2) - TABLE(LAI+1,1)) * DY ) * DX |