Symbol Description Uses
PHIS 5



File Line number Procedure Code
./pkg/fizhi/slprs.F 23 SLPRS
      _RL  PHIS  (im*jm),  THZ  (im*jm,lm)
./pkg/fizhi/slprs.F 5 SLPRS
      subroutine SLPRS (PHIS,PLE,THZ,lwmask,im,jm,lm,SLP)
./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)
./pkg/fizhi/slprs.F 72 SLPRS
      SLP(I) = PHIS(I) / ( R*TM(I) )