Symbol Description Uses
savetc 3



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 203 TURBIO
      _RL savetc(istrip),saveqa(istrip),lwstrip(istrip)
./pkg/fizhi/fizhi_turb.F 624 TURBIO
       savetc(i) = tc(i)
./pkg/fizhi/fizhi_turb.F 856 TURBIO
      th(i,L) = th(i,L) + dthdthg(i,L)*(tc(i)-savetc(i))/pke(i,nlay+1)