Symbol Description Uses
P0KINV 5



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 194 MOISTIO
      P0KINV   =  1. / P0KAPPA
./pkg/fizhi/fizhi_moist.F 461 MOISTIO
        TMP5(I,L) = PLKE(I,L)*P0KINV
./pkg/fizhi/fizhi_moist.F 466 MOISTIO
        TMP5(I,lm+1) = PLKE(I,lm+1)*P0KINV
./pkg/fizhi/fizhi_moist.F 470 MOISTIO
        TMP5(I,NSUBCL+1) = PLKE(I,lm+1)*P0KINV
./pkg/fizhi/fizhi_moist.F 570 MOISTIO
        CVTH(I,L) =  CVTH(I,L) *P0KINV*SP(I)*tminv