| Symbol | Description | Uses |
| ANIRDR | 6 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/update_earth_exports.F | 162 | SIBALB |
SUBROUTINE SIBALB ( AVISDR, ANIRDR, AVISDF, ANIRDF, |
| ./pkg/fizhi/update_earth_exports.F | 185 | SIBALB |
_RL AVISDR (IRUN), ANIRDR (IRUN), AVISDF (IRUN), ANIRDF (IRUN) |
| ./pkg/fizhi/update_earth_exports.F | 672 | SIBALB |
ANIRDR(I) = ALPHA - ZTH(I)*BETA / (GAMMA+ZTH(I)) |
| ./pkg/fizhi/update_earth_exports.F | 680 | SIBALB |
ANIRDR(I) = ANIRDR(I) + (SNWALB(2,ITYP(I)) - ANIRDR(I)) * FAC |