Symbol Description Uses
alphaSum to avoid the statement: alpha = 1./alpha (for TAMC/TAF) 3



File Line number Procedure Code
./model/src/cg2d_nsa.F 108 CG2D_NSA
      _RL    alphaSum,alphaTile(nSx,nSy)
./model/src/cg2d_nsa.F 326 CG2D_NSA
       CALL GLOBAL_SUM_TILE_RL( alphaTile, alphaSum, myThid )
./model/src/cg2d_nsa.F 327 CG2D_NSA
       alpha = eta_qrN/alphaSum