Symbol Description Uses
sIceLoad sea-ice loading, expressed in Mass of ice+snow / area unit 38



File Line number Procedure Code
./model/inc/FFIELDS.h 101 NO PROCEDURE
      COMMON /FFIELDS_sIceLoad/ sIceLoad
./model/inc/FFIELDS.h 115 NO PROCEDURE
      _RS  sIceLoad (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/ecco/ecco_phys.F 135 ECCO_PHYS
     &                +sIceLoad(i,j,bi,bj)*sIceLoadFac
./model/src/diags_oceanic_surf_flux.F 92 DIAGS_OCEANIC_SURF_FLUX
       CALL DIAGNOSTICS_FILL_RS( sIceLoad,'sIceLoad',0,1,0,1,1,myThid )
./pkg/ocn_compon_interf/ocn_apply_import.F 174 OCN_APPLY_IMPORT
        IF ( useImportSIce ) _EXCH_XY_RS( sIceLoad, myThid )
./pkg/ocn_compon_interf/ocn_apply_import.F 76 OCN_APPLY_IMPORT
              sIceLoad(i,j,bi,bj) = seaIceMass(i,j,bi,bj)
./model/src/external_forcing_surf.F 363 EXTERNAL_FORCING_SURF
     &                          +sIceLoad(i,j,bi,bj)*gravity
./pkg/sbo/sbo_calc.F 234 SBO_CALC
     &           sIceLoad(i,j,bi,bj)*darea
./pkg/sbo/sbo_calc.F 256 SBO_CALC
     &           sIceLoad(i,j,bi,bj) +
./pkg/sbo/sbo_calc.F 331 SBO_CALC
     &          sIceLoad(i,j,bi,bj)*darea
./pkg/sbo/sbo_calc.F 369 SBO_CALC
     &          * sIceLoad(i,j,bi,bj) * ae * darea
./pkg/sbo/sbo_calc.F 374 SBO_CALC
     &          * sIceLoad(i,j,bi,bj) * ae * darea
./pkg/sbo/sbo_calc.F 377 SBO_CALC
     &          * sIceLoad(i,j,bi,bj) * ae * darea
./pkg/seaice/dynsolver.F 180 DYNSOLVER
     &                      +sIceLoad(i,j,bi,bj)*gravity
./pkg/seaice/seaice_dynsolver.F 219 SEAICE_DYNSOLVER
     &                      +sIceLoad(i,j,bi,bj)*gravity
./pkg/seaice/seaice_growth.F 2465 SEAICE_GROWTH
           sIceLoad(i,j,bi,bj) = tmpscal2
./pkg/seaice/seaice_init_varia.F 688 SEAICE_INIT_VARIA
           sIceLoad(i,j,bi,bj) = HEFF(i,j,bi,bj)*SEAICE_rhoIce
./pkg/seaice/seaice_model.F 248 SEAICE_MODEL
     &      _EXCH_XY_RS( sIceLoad, myThid )
./model/src/ini_ffields.F 58 INI_FFIELDS
          sIceLoad        (i,j,bi,bj) = 0. _d 0
./pkg/thsice/thsice_do_advect.F 115 THSICE_DO_ADVECT
           sIceLoad(i,j,bi,bj) = ( snowHeight(i,j,bi,bj)*rhos
./pkg/thsice/thsice_do_advect.F 131 THSICE_DO_ADVECT
     &  _EXCH_XY_RS( sIceLoad, myThid )
./pkg/thsice/thsice_ini_vars.F 179 THSICE_INI_VARS
           sIceLoad(i,j,bi,bj) = ( snowHeight(i,j,bi,bj)*rhos
./pkg/thsice/thsice_main.F 230 THSICE_MAIN
             sIceLoad(i,j,bi,bj) = ( snowHeight(i,j,bi,bj)*rhos
./pkg/thsice/thsice_main.F 265 THSICE_MAIN
     &  _EXCH_XY_RS( sIceLoad, myThid )
./pkg/thsice/thsice_main.F 273 THSICE_MAIN
        _EXCH_XY_RS( sIceLoad, myThid )
./pkg/thsice/thsice_step_fwd.F 416 THSICE_STEP_FWD
          sIceLoad(i,j,bi,bj) = ( snowHeight(i,j,bi,bj)*rhos
./pkg/thsice/thsice_step_fwd.F 420 THSICE_STEP_FWD
          pass_sIceLoad(i,j)=sIceLoad(i,j,bi,bj)
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h 101 NO PROCEDURE
      COMMON /FFIELDS_sIceLoad/ sIceLoad
./verification/tutorial_global_oce_optim/code_ad/FFIELDS.h 115 NO PROCEDURE
      _RS  sIceLoad (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 366 EXTERNAL_FORCING_SURF
     &                          +sIceLoad(i,j,bi,bj)*gravity
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F 58 INI_FORCING
          sIceLoad        (i,j,bi,bj) = 0. _d 0
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h 101 NO PROCEDURE
      COMMON /FFIELDS_sIceLoad/ sIceLoad
./verification/tutorial_global_oce_optim/code_oad/FFIELDS.h 115 NO PROCEDURE
      _RS  sIceLoad (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 366 EXTERNAL_FORCING_SURF
     &                          +sIceLoad(i,j,bi,bj)*gravity
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F 58 INI_FORCING
          sIceLoad        (i,j,bi,bj) = 0. _d 0
./pkg/atm2d/put_ocnvars.F 90 PUT_OCNVARS
          sIceLoad(i,j,1,1) = pass_sIceLoad(i,j)
./pkg/atm2d/put_ocnvars.F 92 PUT_OCNVARS
          _EXCH_XY_RS( sIceLoad, myThid )
./pkg/ecco/cost_averagesfields.F 228 COST_AVERAGESFIELDS
     &                +sIceLoad(i,j,bi,bj)*recip_rhoConst