Symbol Description Uses
FRAC 4



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 1249 RAS
      FRAC = 0.5/dt
./pkg/fizhi/fizhi_moist.F 1296 RAS
       CALL CLOUD(nn,lng, LENC, K, NLTOP, nlayr, IB, RASBLF,SETRAS,FRAC
./pkg/fizhi/fizhi_moist.F 1500 CLOUD
     *,                 SETRAS, FRAC
./pkg/fizhi/fizhi_moist.F 2150 CLOUD
      TEM       = (PRS(II,K+1)-PRS(II,K))*(CMB2PA*FRAC)