Symbol Description Uses
T0 near-surface air temperature (2-dim) 84


File Line number Procedure Code
./pkg/ebm/EBM.h 66 NO PROCEDURE 
      _RL T_var(4), T0(2), T2(2), T35(2), DTDy35(2)
./pkg/ebm/ebm_atmosphere.F 136 EBM_ATMOSPHERE 
        T0(1) = TtS - 0.5*T2(1)*((T_var(3)/T_var(1)) - 1.)
./pkg/ebm/ebm_atmosphere.F 142 EBM_ATMOSPHERE 
        T0(2) = TtN - 0.5*T2(2)*((T_var(3)/T_var(1)) - 1.)
./pkg/ebm/ebm_atmosphere.F 147 EBM_ATMOSPHERE 
         T35(no_so)= T0(no_so) +
./pkg/ebm/ebm_atmosphere.F 232 EBM_ATMOSPHERE 
          T(j,bj) = T0(no_so) + T2(no_so)*P2(i,j,bj)
./pkg/chronos/chronos.F 758 ASTRO 
      _RL      TH(DAYSCY),T0,T1,T2,T3,T4,FUN,Y,MNDY(12,4)
./pkg/chronos/chronos.F 790 ASTRO 
           T0 = ZERO
./pkg/chronos/chronos.F 791 ASTRO 
           T1 = FUN(T0         )*FAC
./verification/fizhi-cs-aqualev10/code/fizhi_clockstuff.F 936 ASTRO 
      _RL      TH(DAYSCY),T0,T1,T2,T3,T4,FUN,Y,MNDY(12,4)
./verification/fizhi-cs-aqualev10/code/fizhi_clockstuff.F 968 ASTRO 
           T0 = ZERO
./verification/fizhi-cs-aqualev10/code/fizhi_clockstuff.F 969 ASTRO 
           T1 = FUN(T0         )*FAC
./pkg/aim_v23/phy_suflux_prep.F 12 SUFLUX_PREP 
     O                   SPEED0,DRAG,DENVV,dTskin,T1,T0,Q0,
./pkg/aim_v23/phy_suflux_prep.F 134 SUFLUX_PREP 
        T0(J) = TA(J,Ktmp) +    WVS(J)*(TA(J,Ktmp)-TA(J,NL1))
./pkg/aim_v23/phy_suflux_prep.F 140 SUFLUX_PREP 
        T0(J) = 273.16 _d 0
./pkg/aim_v23/phy_suflux_prep.F 148 SUFLUX_PREP 
        T0(J) = FTEMP0*MIN(T0(J),T1(J))+GTEMP0*T1(J)
./pkg/aim_v23/phy_suflux_prep.F 155 SUFLUX_PREP 
      CALL SHTORH (-1,NGP,T0, PSA, 1. _d 0, Q0, tmpRH, QSAT0, myThid)
./pkg/aim_v23/phy_suflux_prep.F 173 SUFLUX_PREP 
        DENVV(J)=(PRD*PSA(J)/T0(J))*SPEED0(J)
./pkg/aim_v23/phy_suflux_prep.F 88 SUFLUX_PREP 
      _RL  dTskin(NGP), T0(NGP), Q0(NGP)
./pkg/aim_v23/phy_shtorh.F 43 SHTORH 
      _RL E0, C1, C2, T0, T1, T2, QS1, QS2
./pkg/aim_v23/phy_shtorh.F 53 SHTORH 
      T0=273.16 _d 0
./pkg/aim_v23/phy_shtorh.F 66 SHTORH 
         IF (TA(J).GE.T0) THEN
./pkg/aim_v23/phy_shtorh.F 67 SHTORH 
          tmpQ   = E0*EXP(C1*(TA(J)-T0)/(TA(J)-T1))
./pkg/aim_v23/phy_shtorh.F 70 SHTORH 
          RH(J)  = QSAT(J)*C1*(T0-T1)*recT*recT*sigP/(sigP-QS2*tmpQ)
./pkg/aim_v23/phy_shtorh.F 72 SHTORH 
          tmpQ   = E0*EXP(C2*(TA(J)-T0)/(TA(J)-T2))
./pkg/aim_v23/phy_shtorh.F 75 SHTORH 
          RH(J)  = QSAT(J)*C2*(T0-T2)*recT*recT*sigP/(sigP-QS2*tmpQ)
./pkg/aim_v23/phy_shtorh.F 83 SHTORH 
        IF (TA(J).GE.T0) THEN
./pkg/aim_v23/phy_shtorh.F 84 SHTORH 
          QSAT(J)=E0*EXP(C1*(TA(J)-T0)/(TA(J)-T1))
./pkg/aim_v23/phy_shtorh.F 86 SHTORH 
          QSAT(J)=E0*EXP(C2*(TA(J)-T0)/(TA(J)-T2))
./pkg/aim_v23/phy_suflux_land.F 12 SUFLUX_LAND 
     I                   T1, T0, Q0, DENVV,
./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 188 SUFLUX_LAND 
        Shf0(J) =   Shf0(J)*CP*(TSFC(J) -T0(J))
./pkg/aim_v23/phy_suflux_land.F 190 SUFLUX_LAND 
     &            + dShf(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 200 SUFLUX_LAND 
        Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J))
./pkg/aim_v23/phy_suflux_land.F 81 SUFLUX_LAND 
      _RL  T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP)
./pkg/aim_v23/phy_suflux_ocean.F 12 SUFLUX_OCEAN 
     I                   T1, T0, Q0, DENVV,
./pkg/aim_v23/phy_suflux_ocean.F 61 SUFLUX_OCEAN 
      _RL  T1(NGP), T0(NGP), Q0(NGP), DENVV(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 12 SUFLUX_POST 
     I                   T0, Q0, DENVV,
./pkg/aim_v23/phy_suflux_post.F 80 SUFLUX_POST 
      _RL  T0(NGP), Q0(NGP), DENVV(NGP)
./pkg/aim_v23/com_physvar.h 45 NO PROCEDURE 
      COMMON /PHYGR3/      TS, TSKIN, T0, Q0, CLOUDC, CLTOP
./pkg/aim_v23/com_physvar.h 50 NO PROCEDURE 
      _RL T0    (NGP,MAX_NO_THREADS)
./pkg/aim_v23/phy_suflux_sice.F 12 SUFLUX_SICE 
     I                   T1, T0, Q0, DENVV,
./pkg/aim_v23/phy_suflux_sice.F 173 SUFLUX_SICE 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_sice.F 174 SUFLUX_SICE 
        Shf0(J) =   Shf0(J)*CP*(TSFC(J) -T0(J))
./pkg/aim_v23/phy_suflux_sice.F 176 SUFLUX_SICE 
     &            + dShf(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_sice.F 185 SUFLUX_SICE 
        SHF(J)  = CDENVV(J)*CP*(TSKIN(J)-T0(J))
./pkg/aim_v23/phy_suflux_sice.F 186 SUFLUX_SICE 
        Shf0(J) = CDENVV(J)*CP*(TSFC(J) -T0(J))
./pkg/aim_v23/phy_suflux_sice.F 80 SUFLUX_SICE 
      _RL  T1(NGP), T0(NGP), Q0(NGP), DENVV(NGP)
./pkg/aim_v23/aim_diagnostics.F 130 AIM_DIAGNOSTICS 
       CALL AIM_WRITE_LOCAL('aimPhyDiag.',suff,1,T0(1,myThid),
./pkg/aim_v23/aim_diagnostics.F 199 AIM_DIAGNOSTICS 
     &                          + T0(I2,myThid)*DDTT
./pkg/aim_v23/aim_diagnostics.F 287 AIM_DIAGNOSTICS 
        CALL DIAGNOSTICS_FILL( T0(1,myThid),
./pkg/aim_v23/phy_driver.F 243 PHY_DRIVER 
     O             dTskin,T1s,T0(1,myThid),Q0(1,myThid),
./pkg/aim_v23/phy_driver.F 250 PHY_DRIVER 
     I             T1s, T0(1,myThid), Q0(1,myThid), DENVV,
./pkg/aim_v23/phy_driver.F 269 PHY_DRIVER 
     O             T1s, T0(1,myThid), Q0(1,myThid), DENVV,
./pkg/aim_v23/phy_driver.F 278 PHY_DRIVER 
     I             T1s, T0(1,myThid), Q0(1,myThid), DENVV,
./pkg/aim_v23/phy_driver.F 304 PHY_DRIVER 
     I             T0(1,myThid), Q0(1,myThid), DENVV,
./pkg/fizhi/fizhi_clockstuff.F 934 ASTRO 
      _RL      TH(DAYSCY),T0,T1,T2,T3,T4,FUN,Y,MNDY(12,4)
./pkg/fizhi/fizhi_clockstuff.F 966 ASTRO 
           T0 = ZERO
./pkg/fizhi/fizhi_clockstuff.F 967 ASTRO 
           T1 = FUN(T0         )*FAC