Symbol Description Uses
SNWALB 6



File Line number Procedure Code
./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 636 SIBALB
      DATA SNWALB /.65, .38, .65, .38,
./pkg/fizhi/update_earth_exports.F 679 SIBALB
           AVISDR(I) = AVISDR(I) + (SNWALB(1,ITYP(I)) - AVISDR(I)) * FAC
./pkg/fizhi/update_earth_exports.F 680 SIBALB
           ANIRDR(I) = ANIRDR(I) + (SNWALB(2,ITYP(I)) - ANIRDR(I)) * FAC
./pkg/fizhi/update_earth_exports.F 681 SIBALB
           AVISDF(I) = AVISDF(I) + (SNWALB(3,ITYP(I)) - AVISDF(I)) * FAC
./pkg/fizhi/update_earth_exports.F 682 SIBALB
           ANIRDF(I) = ANIRDF(I) + (SNWALB(4,ITYP(I)) - ANIRDF(I)) * FAC