Symbol Description Uses
psFac Scaling parameters for supressing gradients 8


File Line number Procedure Code
./model/src/correction_step.F 53 CORRECTION_STEP 
      _RL     psFac, nhFac
./model/src/correction_step.F 57 CORRECTION_STEP 
      psFac = pfFacMom*implicSurfPress
./model/src/correction_step.F 70 CORRECTION_STEP 
     &       -deltaTmom*psFac*phiSurfX(i,j)
./model/src/correction_step.F 83 CORRECTION_STEP 
     &       -deltaTmom*psFac*phiSurfY(i,j)
./model/src/timestep.F 392 TIMESTEP 
     &       - psFac*phiSurfX(i,j)
./model/src/timestep.F 404 TIMESTEP 
     &       - psFac*phiSurfY(i,j)
./model/src/timestep.F 60 TIMESTEP 
      _RL phxFac,phyFac, psFac
./model/src/timestep.F 83 TIMESTEP 
      psFac = pfFacMom*(1. _d 0 - implicSurfPress)