Symbol Description Uses
G tendency term for the tracers 3



File Line number Procedure Code
./pkg/fizhi/slprs.F 36 SLPRS
      G  = GETCON('GRAVITY')
./pkg/fizhi/slprs.F 67 SLPRS
      TM(I) = TM(I) * (PLE(I,LM+1)/1000.)**AK + BETA*PHIS(I)/(TWO*G)
./pkg/fizhi/slprs.F 69 SLPRS
      TM(I) = THZ(I,LM)*(PLE(I,LM+1)/1000.)**AK + BETA*PHIS(I)/(TWO*G)