File |
Line number |
Procedure |
Code |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
225 |
SIBALB |
_RL FAC,GAMMA,BETA,ALPHA,DX,DY,ALA,GRN (2),SNWALB(4,NTYPS) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
646 |
SIBALB |
DX = (ALA - (BLAI+(LAI-1)*DLAI)) * (ONE/DLAI) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
649 |
SIBALB |
ALPHA = COEFF (ALVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
650 |
SIBALB |
BETA = COEFF (BTVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
651 |
SIBALB |
GAMMA = COEFF (GMVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
657 |
SIBALB |
ALPHA = COEFF (ALIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
658 |
SIBALB |
BETA = COEFF (BTIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
659 |
SIBALB |
GAMMA = COEFF (GMIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
678 |
SIBALB |
FUNCTION COEFF(TABLE, NTABL, LAI ,DX, DY) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
682 |
SIBALB |
_RL TABLE (NTABL, 2), DX, DY |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
685 |
SIBALB |
* + (TABLE(LAI ,2) - TABLE(LAI ,1)) * DY ) * (1.0-DX) |
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F |
687 |
SIBALB |
* + (TABLE(LAI+1,2) - TABLE(LAI+1,1)) * DY ) * DX |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3144 |
PSI |
_RL HZ(irun),ARG0(irun),ARG1(irun),DX(irun) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3217 |
PSI |
DX(I) = X1(I) - X0(I) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3219 |
PSI |
ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) ) |
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F |
3223 |
PSI |
PSI2(I) = PSI2(I) + DX(I) |
./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 |
646 |
SIBALB |
DX = (ALA - (BLAI+(LAI-1)*DLAI)) * (ONE/DLAI) |
./pkg/fizhi/update_earth_exports.F |
649 |
SIBALB |
ALPHA = COEFF (ALVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./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 |
651 |
SIBALB |
GAMMA = COEFF (GMVDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
657 |
SIBALB |
ALPHA = COEFF (ALIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./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 |
659 |
SIBALB |
GAMMA = COEFF (GMIDR (1, 1, ITYP (I)), NLAI, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
678 |
SIBALB |
FUNCTION COEFF(TABLE, NTABL, LAI ,DX, DY) |
./pkg/fizhi/update_earth_exports.F |
682 |
SIBALB |
_RL TABLE (NTABL, 2), DX, DY |
./pkg/fizhi/update_earth_exports.F |
685 |
SIBALB |
* + (TABLE(LAI ,2) - TABLE(LAI ,1)) * DY ) * (1.0-DX) |
./pkg/fizhi/update_earth_exports.F |
687 |
SIBALB |
* + (TABLE(LAI+1,2) - TABLE(LAI+1,1)) * DY ) * DX |
./pkg/fizhi/fizhi_turb.F |
3105 |
PSI |
_RL HZ(irun),ARG0(irun),ARG1(irun),DX(irun) |
./pkg/fizhi/fizhi_turb.F |
3178 |
PSI |
DX(I) = X1(I) - X0(I) |
./pkg/fizhi/fizhi_turb.F |
3180 |
PSI |
ARG0(I) = -DX(I) / ( 1. + X1(I)*X0(I) ) |
./pkg/fizhi/fizhi_turb.F |
3184 |
PSI |
PSI2(I) = PSI2(I) + DX(I) |