Symbol Description Uses
cpinv 6


File Line number Procedure Code
./pkg/fizhi/fizhi_gwdrag.F 192 GWDRAG 
     .                                                         *cpinv
./pkg/fizhi/fizhi_gwdrag.F 80 GWDRAG 
      _RL grav, rgas, cp, cpinv, lstar
./pkg/fizhi/fizhi_gwdrag.F 93 GWDRAG 
      cpinv = 1.0/cp
./pkg/fizhi/fizhi_rayleigh.F 48 RAYLEIGH 
      _RL cpog, cpinv, virtcon, getcon, dampcoef
./pkg/fizhi/fizhi_rayleigh.F 60 RAYLEIGH 
      cpinv = 1.0/getcon('CP')
./pkg/fizhi/fizhi_rayleigh.F 93 RAYLEIGH 
        rft(i,j,L) = -(u(i,j,L)*rfu(i,j,L) + v(i,j,L)*rfv(i,j,L) )*cpinv