Symbol Description Uses
SHF sensible heat flux (2-dim) 56


File Line number Procedure Code
./pkg/thsice/thsice_get_bulkf.F 103 THSICE_GET_BULKF 
     O               SHF, EVPloc, SLRU,
./pkg/thsice/thsice_get_bulkf.F 80 THSICE_GET_BULKF 
      _RL     Tsurf(1), SHF(1), EVPloc(1), SLRU(1)
./pkg/aim_v23/aim_aim2land.F 92 AIM_AIM2LAND 
     &                       - SHF(I2,1,myThid)
./pkg/aim_v23/aim_aim2sioce.F 121 AIM_AIM2SIOCE 
     &                       - SHF(I2,2,myThid)
./pkg/aim_v23/aim_aim2sioce.F 198 AIM_AIM2SIOCE 
     &                       - SHF(I2,3,myThid)
./pkg/aim_v23/aim_diagnostics.F 190 AIM_DIAGNOSTICS 
         CALL AIM_WRITE_PHYS( 'aimPhyDiag.', suff, 4, SHF,
./pkg/aim_v23/aim_diagnostics.F 262 AIM_DIAGNOSTICS 
     &        'aim_SHF0',SHF(1,0,myThid),myThid)
./pkg/aim_v23/aim_diagnostics.F 331 AIM_DIAGNOSTICS 
     &                          + SHF(I2,0,myThid)*DDTT
./pkg/aim_v23/aim_diagnostics.F 412 AIM_DIAGNOSTICS 
        CALL DIAGNOSTICS_FILL( SHF(1,0,myThid),
./pkg/aim_v23/aim_land_impl.F 124 AIM_LAND_IMPL 
         SHF (J)  = Shf0(J)
./pkg/aim_v23/aim_land_impl.F 128 AIM_LAND_IMPL 
         SHF (J)  = SHF (J) + dTsurf(J)*dShf(J)
./pkg/aim_v23/aim_land_impl.F 16 AIM_LAND_IMPL 
     U               Tsurf, SHF, EVAP, SLRU,
./pkg/aim_v23/aim_land_impl.F 71 AIM_LAND_IMPL 
      _RL  Tsurf(NGP), SHF(NGP), EVAP(NGP), SLRU(NGP)
./pkg/aim_v23/aim_sice_impl.F 102 AIM_SICE_IMPL 
         SHF (J)  = Shf0(J)
./pkg/aim_v23/aim_sice_impl.F 107 AIM_SICE_IMPL 
         SHF (J)  = SHF (J) + dTsurf(J)*dShf(J)
./pkg/aim_v23/aim_sice_impl.F 15 AIM_SICE_IMPL 
     U               Tsurf, SHF, EVAP, SLRU,
./pkg/aim_v23/aim_sice_impl.F 69 AIM_SICE_IMPL 
      _RL  Tsurf(NGP), SHF(NGP), EVAP(NGP), SLRU(NGP)
./pkg/aim_v23/com_physvar.h 110 NO PROCEDURE 
      _RL SHF    (NGP,0:3,MAX_NO_THREADS)
./pkg/aim_v23/com_physvar.h 99 NO PROCEDURE 
     &                SHF, EVAP, SPEED0, DRAG
./pkg/aim_v23/phy_driver.F 305 PHY_DRIVER 
     O             SHF(1,1,myThid), EVAP(1,1,myThid), SLR(1,1,myThid),
./pkg/aim_v23/phy_driver.F 314 PHY_DRIVER 
     U             SHF(1,1,myThid), EVAP(1,1,myThid), SLR(1,1,myThid),
./pkg/aim_v23/phy_driver.F 324 PHY_DRIVER 
     O             SHF(1,2,myThid), EVAP(1,2,myThid), SLR(1,2,myThid),
./pkg/aim_v23/phy_driver.F 333 PHY_DRIVER 
     O             SHF(1,3,myThid), EVAP(1,3,myThid), SLR(1,3,myThid),
./pkg/aim_v23/phy_driver.F 342 PHY_DRIVER 
     U             SHF(1,3,myThid), EVAP(1,3,myThid), SLR(1,3,myThid),
./pkg/aim_v23/phy_driver.F 348 PHY_DRIVER 
          SHF (J,3,myThid) = 0. _d 0
./pkg/aim_v23/phy_driver.F 359 PHY_DRIVER 
     U             DRAG(1,0,myThid), SHF(1,0,myThid),
./pkg/aim_v23/phy_driver.F 453 PHY_DRIVER 
     &                     + SHF(J,0,myThid) *RPS_1*GRDSCP(K)
./pkg/aim_v23/phy_suflux_land.F 13 SUFLUX_LAND 
     O                   SHF, EVAP, SLRU,
./pkg/aim_v23/phy_suflux_land.F 187 SUFLUX_LAND 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_land.F 199 SUFLUX_LAND 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_land.F 220 SUFLUX_LAND 
     &           - ( SHF(J)+ ALHC*EVAP(J) )
./pkg/aim_v23/phy_suflux_land.F 83 SUFLUX_LAND 
      _RL  SHF(NGP), EVAP(NGP), SLRU(NGP)
./pkg/aim_v23/phy_suflux_ocean.F 13 SUFLUX_OCEAN 
     O                   SHF, EVAP, SLRU,
./pkg/aim_v23/phy_suflux_ocean.F 63 SUFLUX_OCEAN 
      _RL  SHF(NGP), EVAP(NGP), SLRU(NGP)
./pkg/aim_v23/phy_suflux_ocean.F 95 SUFLUX_OCEAN 
        SHF(J) = CDENVV(J)*CP*(Tsurf(J)-T0(J))
./pkg/aim_v23/phy_suflux_post.F 118 SUFLUX_POST 
        SHF (J,0) = (FMASK(J,1)*SHF(J,1) +FMASK(J,2)*SHF(J,2)
./pkg/aim_v23/phy_suflux_post.F 119 SUFLUX_POST 
     &                                   +FMASK(J,3)*SHF(J,3) )
./pkg/aim_v23/phy_suflux_post.F 13 SUFLUX_POST 
     U                   DRAG, SHF, EVAP, SLRup,
./pkg/aim_v23/phy_suflux_post.F 82 SUFLUX_POST 
      _RL  DRAG(NGP,0:3), SHF(NGP,0:3), EVAP(NGP,0:3), SLRup(NGP,3)
./pkg/aim_v23/phy_suflux_sice.F 13 SUFLUX_SICE 
     O                   SHF, EVAP, SLRU,
./pkg/aim_v23/phy_suflux_sice.F 174 SUFLUX_SICE 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_sice.F 186 SUFLUX_SICE 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_sice.F 207 SUFLUX_SICE 
     &           - ( SHF(J)  + ALHevp*EVAP(J) )
./pkg/aim_v23/phy_suflux_sice.F 83 SUFLUX_SICE 
      _RL  SHF(NGP), EVAP(NGP), SLRU(NGP)
./pkg/bulk_force/bulkf_forcing.F 68 BULKF_FORCING 
      _RL     SHF(1), EVPloc(1), SLRU(1)
./pkg/bulk_force/bulkf_forcing.F 91 BULKF_FORCING 
     O            SHF, EVPloc, SLRU,
./pkg/bulk_force/bulkf_forcing.F 97 BULKF_FORCING 
                  fsh(i,j,bi,bj) = -SHF(1)
./pkg/bulk_force/bulkf_formula_aim.F 12 BULKF_FORMULA_AIM 
     O                   SHF, EVAP, SLRU,
./pkg/bulk_force/bulkf_formula_aim.F 208 BULKF_FORMULA_AIM 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/bulk_force/bulkf_formula_aim.F 220 BULKF_FORMULA_AIM 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/bulk_force/bulkf_formula_aim.F 241 BULKF_FORMULA_AIM 
     &           - ( SHF(J)  + ALHevp*EVAP(J) )
./pkg/bulk_force/bulkf_formula_aim.F 72 BULKF_FORMULA_AIM 
      _RL  SHF(NGP), EVAP(NGP), SLRU(NGP)