Symbol Description Uses
pS_tmp 4



File Line number Procedure Code
./model/src/update_cg2d.F 155 UPDATE_CG2D
          pS_tmp = cg2d_q(I,J,bi,bj)+cg2d_q(I,J-1,bi,bj)
./model/src/update_cg2d.F 156 UPDATE_CG2D
          IF ( pS_tmp .EQ. 0. ) THEN
./model/src/update_cg2d.F 160 UPDATE_CG2D
     &     -aS2d(I,J,bi,bj)/((cg2dpcOffDFac *pS_tmp)**2 )
./model/src/update_cg2d.F 56 UPDATE_CG2D
      _RL     pW_tmp, pS_tmp