Symbol Description Uses
ThA Pot.Temp. [K] (replace dry stat. energy)(3-dim) 10



File Line number Procedure Code
./pkg/aim_v23/aim_dyn2aim.F 10 AIM_DYN2AIM
     O           TA, QA, ThA, Vsurf2, PSA, dpFac,
./pkg/aim_v23/aim_dyn2aim.F 178 AIM_DYN2AIM
          ThA(I2,Katm) = theta(i,j,k,bi,bj)
./pkg/aim_v23/aim_dyn2aim.F 182 AIM_DYN2AIM
          ThA(I2,Katm) = 300. _d 0
./pkg/aim_v23/aim_dyn2aim.F 55 AIM_DYN2AIM
      _RL TA(NGP,NLEV), QA(NGP,NLEV), ThA(NGP,NLEV)
./pkg/aim_v23/phy_snow_precip.F 10 SNOW_PRECIP
     I                   PSA, dpFac, ThA,
./pkg/aim_v23/phy_snow_precip.F 59 SNOW_PRECIP
      _RL PSA(NGP), dpFac(NGP,NLEV), ThA(NGP,NLEV)
./pkg/aim_v23/phy_snow_precip.F 84 SNOW_PRECIP
        T1(J) = ThA(J,kGrd(J))*(PSA(J)**kappa)
./pkg/aim_v23/phy_suflux_prep.F 10 SUFLUX_PREP
     I                   PSA,TA,QA,RH,ThA,Vsurf2,WVS,CLAT,FOROG,
./pkg/aim_v23/phy_suflux_prep.F 137 SUFLUX_PREP
        T1(J) = ThA(J,Ktmp)*(PSA(J)**kappa)
./pkg/aim_v23/phy_suflux_prep.F 82 SUFLUX_PREP
      _RL  ThA(NGP,NLEV)