Symbol Description Uses
a2dNorm 9


File Line number Procedure Code
./pkg/diagnostics/diagnostics_calc_phivel.F 189 DIAGNOSTICS_CALC_PHIVEL 
        a2dNorm = 1. _d 0
./pkg/diagnostics/diagnostics_calc_phivel.F 194 DIAGNOSTICS_CALC_PHIVEL 
          IF ( a2dMax .GT. 0. _d 0 ) a2dNorm = 1. _d 0/a2dMax
./pkg/diagnostics/diagnostics_calc_phivel.F 195 DIAGNOSTICS_CALC_PHIVEL 
          b2dNorm = a2dNorm
./pkg/diagnostics/diagnostics_calc_phivel.F 201 DIAGNOSTICS_CALC_PHIVEL 
            x2dNorm = a2dNorm*rhsMax
./pkg/diagnostics/diagnostics_calc_phivel.F 205 DIAGNOSTICS_CALC_PHIVEL 
          residCriter = a2dNorm * ABS(diagCG_resTarget)
./pkg/diagnostics/diagnostics_calc_phivel.F 213 DIAGNOSTICS_CALC_PHIVEL 
              aW2d(i,j,bi,bj) = aW2d(i,j,bi,bj)*a2dNorm
./pkg/diagnostics/diagnostics_calc_phivel.F 214 DIAGNOSTICS_CALC_PHIVEL 
              aS2d(i,j,bi,bj) = aS2d(i,j,bi,bj)*a2dNorm
./pkg/diagnostics/diagnostics_calc_phivel.F 226 DIAGNOSTICS_CALC_PHIVEL 
     &     ' diag_cg2d (it=', myIter,') a2dNorm,x2dNorm=', a2dNorm,
./pkg/diagnostics/diagnostics_calc_phivel.F 73 DIAGNOSTICS_CALC_PHIVEL 
      _RL  a2dMax, a2dNorm