Symbol Description Uses
d2Loc 11


File Line number Procedure Code
./pkg/diagnostics/diagnostics_set_calc.F 116 DIAGNOSTICS_SET_CALC 
             d2Loc = dxLoc*dxLoc + dyLoc*dyLoc
./pkg/diagnostics/diagnostics_set_calc.F 118 DIAGNOSTICS_SET_CALC 
             IF ( d2Loc.EQ.d2Min .AND. kPsi(i,j,bi,bj) ) THEN
./pkg/diagnostics/diagnostics_set_calc.F 120 DIAGNOSTICS_SET_CALC 
             IF ( d2Loc.EQ.d2Min ) THEN
./pkg/diagnostics/diagnostics_set_calc.F 170 DIAGNOSTICS_SET_CALC 
              d2Loc = ABS( xyLoc - xyMin )
./pkg/diagnostics/diagnostics_set_calc.F 171 DIAGNOSTICS_SET_CALC 
              IF ( d2Loc.GE.0.5 _d 0 ) THEN
./pkg/diagnostics/diagnostics_set_calc.F 41 DIAGNOSTICS_SET_CALC 
      _RL     dxLoc, dyLoc, d2Loc, d2Min
./pkg/diagnostics/diagnostics_set_calc.F 88 DIAGNOSTICS_SET_CALC 
             d2Loc = dxLoc*dxLoc + dyLoc*dyLoc
./pkg/diagnostics/diagnostics_set_calc.F 90 DIAGNOSTICS_SET_CALC 
             IF ((d2Loc.LT.d2Min .OR. d2Min.EQ.-1. _d 0)
./pkg/diagnostics/diagnostics_set_calc.F 91 DIAGNOSTICS_SET_CALC 
     &                            .AND. kPsi(i,j,bi,bj) ) d2Min = d2Loc
./pkg/diagnostics/diagnostics_set_calc.F 93 DIAGNOSTICS_SET_CALC 
             IF ( d2Loc.LT.d2Min .OR. d2Min.EQ.-1. _d 0 ) d2Min = d2Loc