Symbol Description Uses
Qice1 enthalpy of ice layer 1 [J/kg] 32



File Line number Procedure Code
./pkg/ocn_compon_interf/ocn_apply_import.F 120 OCN_APPLY_IMPORT
             Qice1     (i,j,bi,bj) = sIceQ1_cpl   (i,j,bi,bj)
./pkg/ocn_compon_interf/ocn_apply_import.F 196 OCN_APPLY_IMPORT
          _EXCH_XY_RL( Qice1     , myThid )
./pkg/ocn_compon_interf/ocn_store_my_data.F 116 OCN_STORE_MY_DATA
            sIceQ1_cpl   (i,j,bi,bj) = Qice1(i,j,bi,bj)
./pkg/thsice/THSICE_VARS.h 25 NO PROCEDURE
     &       Qice1, Qice2, snowAge
./pkg/thsice/THSICE_VARS.h 33 NO PROCEDURE
      _RL Qice1  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/thsice/thsice_advdiff.F 175 THSICE_ADVDIFF
     I                   Qice1(1-OLx,1-OLy,bi,bj),
./pkg/thsice/thsice_advdiff.F 357 THSICE_ADVDIFF
     U       iceVol, Qice1(1-OLx,1-OLy,bi,bj),
./pkg/thsice/thsice_advdiff.F 497 THSICE_ADVDIFF
     &                                  *( Qice1(i,j,bi,bj)
./pkg/thsice/thsice_advdiff.F 507 THSICE_ADVDIFF
            Qice1     (i,j,bi,bj) = 0. _d 0
./pkg/thsice/thsice_advdiff.F 564 THSICE_ADVDIFF
     I                   Qice1(1-OLx,1-OLy,bi,bj),
./pkg/thsice/thsice_check_conserv.F 69 THSICE_CHECK_CONSERV
     &             *(Qice1(i,j,bi,bj)+Qice2(i,j,bi,bj))*0.5
./pkg/thsice/thsice_diagnostics_state.F 90 THSICE_DIAGNOSTICS_STATE
     I                     Qice1(1-OLx,1-OLy,bi,bj),
./pkg/thsice/thsice_do_exch.F 40 THSICE_DO_EXCH
        CALL EXCH_XY_RL( Qice1, myThid )
./pkg/thsice/thsice_impl_temp.F 107 THSICE_IMPL_TEMP
     U          Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj),
./pkg/thsice/thsice_impl_temp.F 94 THSICE_IMPL_TEMP
     &           Qice1(i,j,bi,bj), Qice2(i,j,bi,bj)
./pkg/thsice/thsice_ini_vars.F 136 THSICE_INI_VARS
         CALL READ_REC_XY_RL(thSIceEnthp_InitFile,Qice1,1,0,myThid)
./pkg/thsice/thsice_ini_vars.F 152 THSICE_INI_VARS
              Qice1(i,j,bi,bj) = -cpWater*Tmlt1
./pkg/thsice/thsice_ini_vars.F 169 THSICE_INI_VARS
      _EXCH_XY_RL(Qice1,  myThid)
./pkg/thsice/thsice_ini_vars.F 63 THSICE_INI_VARS
            Qice1(i,j,bi,bj)    = 0. _d 0
./pkg/thsice/thsice_monitor.F 249 THSICE_MONITOR
     I                1, Qice1, locMask, maskInC, rA, locDr,
./pkg/thsice/thsice_output.F 292 THSICE_OUTPUT
          CALL WRITE_FLD_XY_RL('ice_Qice1.',  suff,Qice1,
./pkg/thsice/thsice_output.F 336 THSICE_OUTPUT
          CALL MNC_CW_RL_W(pf,mncf,0,0,'Qice1',     Qice1,     myThid)
./pkg/thsice/thsice_read_pickup.F 60 THSICE_READ_PICKUP
        CALL READ_REC_3D_RL( fn, prec, 1, Qice1,    7, myIter,myThid )
./pkg/thsice/thsice_read_pickup.F 83 THSICE_READ_PICKUP
        CALL MNC_CW_RL_R('D',fn,0,0,'Qice1',     Qice1,     myThid)
./pkg/thsice/thsice_step_fwd.F 248 THSICE_STEP_FWD
     U          Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj),
./pkg/thsice/thsice_step_fwd.F 338 THSICE_STEP_FWD
     U          Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj),
./pkg/thsice/thsice_step_fwd.F 382 THSICE_STEP_FWD
          Qice1(i,j,bi,bj)    = Lfresh
./pkg/thsice/thsice_step_temp.F 181 THSICE_STEP_TEMP
     U          Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj),
./pkg/thsice/thsice_write_pickup.F 63 THSICE_WRITE_PICKUP
        CALL WRITE_REC_3D_RL( fn,prec, 1, Qice1,    7, myIter,myThid )
./pkg/thsice/thsice_write_pickup.F 97 THSICE_WRITE_PICKUP
        CALL MNC_CW_RL_W('D',fn,0,0,'Qice1',     Qice1,     myThid)
./pkg/atm_compon_interf/atm_apply_import.F 72 ATM_APPLY_IMPORT
           Qice1     (i,j,bi,bj) = sIceQ1_cpl   (i,j,bi,bj)
./pkg/atm_compon_interf/atm_store_thsice.F 96 ATM_STORE_THSICE
           sIceQ1_cpl   (i,j,bi,bj) = Qice1(i,j,bi,bj)