Symbol Description Uses
psFac Scaling parameters for supressing gradients 11



File Line number Procedure Code
./model/src/correction_step.F 107 CORRECTION_STEP
     &          psFac*phiSurfX(i,j)
./model/src/correction_step.F 120 CORRECTION_STEP
     &          psFac*phiSurfY(i,j)
./model/src/correction_step.F 58 CORRECTION_STEP
      _RL     psFac, nhFac
./model/src/correction_step.F 70 CORRECTION_STEP
        psFac = pfFacMom*implicSurfPress
./model/src/correction_step.F 76 CORRECTION_STEP
     &         -psFac*dU_psFacX(i,j,k,bi,bj)*phiSurfX(i,j)
./model/src/correction_step.F 85 CORRECTION_STEP
     &         -psFac*dV_psFacY(i,j,k,bi,bj)*phiSurfY(i,j)
./model/src/correction_step.F 94 CORRECTION_STEP
        psFac = pfFacMom*implicSurfPress
./model/src/timestep.F 363 TIMESTEP
     &       - psFac*phiSurfX(i,j)
./model/src/timestep.F 375 TIMESTEP
     &       - psFac*phiSurfY(i,j)
./model/src/timestep.F 64 TIMESTEP
      _RL phxFac,phyFac, psFac
./model/src/timestep.F 81 TIMESTEP
      psFac = pfFacMom*(1. _d 0 - implicSurfPress)