Symbol Description Uses
smooth3D_KzMax 7


File Line number Procedure Code
./pkg/smooth/smooth_init3d.F 100 SMOOTH_INIT3D 
       smooth3D_KzMax=smooth3D_KzMax*smooth3D_KzMax/smooth3DtotTime/2
./pkg/smooth/smooth_init3d.F 101 SMOOTH_INIT3D 
       if (smooth3D_kappaR(i,j,k,bi,bj).GT.smooth3D_KzMax) then
./pkg/smooth/smooth_init3d.F 102 SMOOTH_INIT3D 
       smooth3D_kappaR(i,j,k,bi,bj)=smooth3D_KzMax
./pkg/smooth/smooth_init3d.F 38 SMOOTH_INIT3D 
      _RL smooth3D_KzMax
./pkg/smooth/smooth_init3d.F 99 SMOOTH_INIT3D 
       smooth3D_KzMax=drC(k)