Symbol Description Uses
aim_sw21 6



File Line number Procedure Code
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F 184 AIM_SURF_BC
     &      MAX(IDEP2*aim_sw21(i,j,bi,bj)-SWWIL2, 0. _d 0)
./pkg/aim_v23/AIM_FFIELDS.h 30 NO PROCEDURE
     &   aim_sst1, aim_lst1, aim_oic1, aim_snw1, aim_sw11, aim_sw21,
./pkg/aim_v23/AIM_FFIELDS.h 50 NO PROCEDURE
      _RS  aim_sw21  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/aim_v23/aim_fields_load.F 220 AIM_FIELDS_LOAD
            aim_sw21(i,j,bi,bj) = 0.
./pkg/aim_v23/aim_fields_load.F 279 AIM_FIELDS_LOAD
          CALL READ_REC_XY_RS(aim_swcFile,aim_sw21,nm3,myIter,myThid)
./pkg/aim_v23/aim_surf_bc.F 167 AIM_SURF_BC
     &      MAX(IDEP2*aim_sw21(i,j,bi,bj)-SWWIL2, 0. _d 0)