Symbol Description Uses
TsurfCor Pot.Temp Linear-Free-Surface correction term [K.r_Unit/s] 7


File Line number Procedure Code
./model/inc/SURFACE.h 36 NO PROCEDURE 
      COMMON /SURF_CORREC/ TsurfCor, SsurfCor
./model/inc/SURFACE.h 37 NO PROCEDURE 
      _RL TsurfCor
./model/src/calc_wsurf_tr.F 100 CALC_WSURF_TR 
        TsurfCor = wT_Mean / globalArea
./model/src/calc_wsurf_tr.F 58 CALC_WSURF_TR 
      TsurfCor= 0.
./model/src/external_forcing.F 335 EXTERNAL_FORCING_T 
     &        +TsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/thermodynamics.F 215 THERMODYNAMICS 
      TsurfCor = 0. _d 0
./pkg/autodiff/ini_autodiff.F 43 INI_AUTODIFF 
      TsurfCor=0. _d 0