| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/update_earth_exports.F |
147 |
SIBALB |
SUBROUTINE SIBALB ( AVISDR, ANIRDR, AVISDF, ANIRDF, |
|
./pkg/fizhi/update_earth_exports.F |
170 |
SIBALB |
_RL AVISDR (IRUN), ANIRDR (IRUN), AVISDF (IRUN), ANIRDF (IRUN) |
|
./pkg/fizhi/update_earth_exports.F |
657 |
SIBALB |
AVISDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
|
./pkg/fizhi/update_earth_exports.F |
672 |
SIBALB |
AVISDR(I) = AVISDR(I) + (SNWALB(1,ITYP(I)) - AVISDR(I)) * FAC |
|
./pkg/fizhi/update_earth_exports.F |
872 |
GETALB |
_RL AVISDR(nchp),ANIRDR(nchp),AVISDF(nchp) |