Symbol Description Uses
aim_albedo Holds surface albedo ( 0-1 ) 27



File Line number Procedure Code
./pkg/aim/aim_external_fields_load.F 120 AIM_FIELDS_LOAD
             aim_albedo(I,J,bi,bj) = aim_albedo(I,J,bi,bj)/100.
./pkg/aim/aim_external_fields_load.F 87 AIM_FIELDS_LOAD
     O    aim_albedo,  
./pkg/aim/aim_do_atmos_physics.F 253 AIM_DO_PHYSICS
         alb0(I2,myThid) = aim_albedo(I,J,bi,bj)
./pkg/aim/AIM_FFIELDS.h 17 NO PROCEDURE
     &                   aim_albedo,
./pkg/aim/AIM_FFIELDS.h 20 NO PROCEDURE
      _RS  aim_albedo      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 170 AIM_SURF_BC
          alb_land = aim_albedo(i,j,bi,bj)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 171 AIM_SURF_BC
     &       + MAX( 0. _d 0, ALBSN-aim_albedo(i,j,bi,bj) )
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 198 AIM_SURF_BC
          alb1(I2,1,myThid) = aim_albedo(i,j,bi,bj)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 199 AIM_SURF_BC
          alb1(I2,2,myThid) = aim_albedo(i,j,bi,bj)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 200 AIM_SURF_BC
          alb1(I2,3,myThid) = aim_albedo(i,j,bi,bj)
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 293 AIM_SURF_BC
     I           aim_landFr, aim_veget, aim_albedo, snow1,
./pkg/aim_v23/aim_fields_load.F 101 AIM_FIELDS_LOAD
     O    aim_albedo,  
./pkg/aim_v23/aim_fields_load.F 138 AIM_FIELDS_LOAD
             aim_albedo(I,J,bi,bj) = aim_albedo(I,J,bi,bj)/100.
./pkg/aim_v23/aim_fields_load.F 187 AIM_FIELDS_LOAD
            aim_albedo(i,j,bi,bj)= 0. 
./pkg/aim_v23/aim_fields_load.F 247 AIM_FIELDS_LOAD
          CALL READ_REC_XY_RS(aim_albFile,aim_albedo, 1,myIter,myThid)
./pkg/aim_v23/aim_fields_load.F 261 AIM_FIELDS_LOAD
             aim_albedo(i,j,bi,bj) = aim_albedo(I,J,bi,bj)/100. _d 0
./pkg/aim_v23/aim_surf_bc.F 159 AIM_SURF_BC
          alb_land = aim_albedo(i,j,bi,bj)
./pkg/aim_v23/aim_surf_bc.F 160 AIM_SURF_BC
     &       + MAX( 0. _d 0, ALBSN-aim_albedo(i,j,bi,bj) )
./pkg/aim_v23/aim_surf_bc.F 187 AIM_SURF_BC
          alb1(I2,1,myThid) = aim_albedo(i,j,bi,bj)
./pkg/aim_v23/aim_surf_bc.F 188 AIM_SURF_BC
          alb1(I2,2,myThid) = aim_albedo(i,j,bi,bj)
./pkg/aim_v23/aim_surf_bc.F 189 AIM_SURF_BC
          alb1(I2,3,myThid) = aim_albedo(i,j,bi,bj)
./pkg/aim_v23/aim_surf_bc.F 268 AIM_SURF_BC
     I           aim_landFr, aim_veget, aim_albedo, snow1,
./pkg/aim_v23/AIM_FFIELDS.h 28 NO PROCEDURE
     &   truncSurfP, aim_landFr, aim_veget, aim_albedo, 
./pkg/aim_v23/AIM_FFIELDS.h 36 NO PROCEDURE
      _RS  aim_albedo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)