Symbol Description Uses
err_sq square of err (for TAMC/TAF) 14


File Line number Procedure Code
./model/src/cg2d_nsa.F 106 CG2D_NSA 
      _RL    err_sq
./model/src/cg2d_nsa.F 216 CG2D_NSA 
      err_sq = 0. _d 0
./model/src/cg2d_nsa.F 246 CG2D_NSA 
          err_sq         = err_sq         +
./model/src/cg2d_nsa.F 258 CG2D_NSA 
      _GLOBAL_SUM_RL( err_sq, myThid )
./model/src/cg2d_nsa.F 259 CG2D_NSA 
       IF ( err_sq .NE. 0. ) THEN
./model/src/cg2d_nsa.F 260 CG2D_NSA 
          err = SQRT(err_sq)
./model/src/cg2d_nsa.F 299 CG2D_NSA 
      IF ( err_sq .LT. cg2dTolerance_sq ) THEN
./model/src/cg2d_nsa.F 412 CG2D_NSA 
       err_sq = 0. _d 0
./model/src/cg2d_nsa.F 424 CG2D_NSA 
           err_sq = err_sq+cg2d_r(I,J,bi,bj)*cg2d_r(I,J,bi,bj)
./model/src/cg2d_nsa.F 430 CG2D_NSA 
       _GLOBAL_SUM_RL( err_sq   , myThid )
./model/src/cg2d_nsa.F 431 CG2D_NSA 
       if ( err_sq .ne. 0. ) then
./model/src/cg2d_nsa.F 432 CG2D_NSA 
          err = SQRT(err_sq)