Symbol Description Uses
phis_std 3



File Line number Procedure Code
./pkg/fizhi/fizhi_gwdrag.F 128 GWDRAG
         phis_std(i,j) = min( 400.0 _d 0, sqrt( max(0.0 _d 0,
./pkg/fizhi/fizhi_gwdrag.F 158 GWDRAG
      call STRIPIT ( phis_std,std,im*jm,im*jm,istrip,1,n )
./pkg/fizhi/fizhi_gwdrag.F 69 GWDRAG
      _RL phis_std(im,jm)