| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
3079 |
PSI |
_RL HZ(irun),ARG0(irun),ARG1(irun),DX(irun) |
|
./pkg/fizhi/fizhi_turb.F |
3152 |
PSI |
DX(I) = X1(I) - X0(I) |
|
./pkg/fizhi/fizhi_turb.F |
3154 |
PSI |
ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) ) |
|
./pkg/fizhi/fizhi_turb.F |
3158 |
PSI |
PSI2(I) = PSI2(I) + DX(I) |
|
./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 |
657 |
SIBALB |
DX = (ALA - (BLAI+(LAI-1)*DLAI)) * (ONE/DLAI) |
|
./pkg/fizhi/update_earth_exports.F |
660 |
SIBALB |
ALPHA = COEFF (ALVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./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 |
662 |
SIBALB |
GAMMA = COEFF (GMVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./pkg/fizhi/update_earth_exports.F |
668 |
SIBALB |
ALPHA = COEFF (ALIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./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 |
670 |
SIBALB |
GAMMA = COEFF (GMIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
|
./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 |
696 |
SIBALB |
& + (TABLE(LAI ,2) - TABLE(LAI ,1)) * DY ) * (1.0-DX) |
|
./pkg/fizhi/update_earth_exports.F |
698 |
SIBALB |
& + (TABLE(LAI+1,2) - TABLE(LAI+1,1)) * DY ) * DX |