/[MITgcm]/MITgcm_contrib/torge/itd/code/SEAICE.h
ViewVC logotype

Diff of /MITgcm_contrib/torge/itd/code/SEAICE.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.4 by torge, Mon Dec 10 22:19:49 2012 UTC revision 1.5 by torge, Wed Mar 27 18:59:52 2013 UTC
# Line 84  CToM<<< Line 84  CToM<<<
84  #endif  #endif
85  C>>>ToM  C>>>ToM
86    
 #ifdef SEAICE_GROWTH_LEGACY  
       COMMON/SEAICE_DYNVARS_2/ areaNm1, hEffNm1  
       _RL areaNm1    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
       _RL hEffNm1    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
 #endif /* SEAICE_GROWTH_LEGACY */  
   
87  C     uIceC :: average of UICE between last two time steps  C     uIceC :: average of UICE between last two time steps
88  C     vIceC :: average of VICE between last two time steps  C     vIceC :: average of VICE between last two time steps
89        COMMON/SEAICE_DYNVARS_3/        COMMON/SEAICE_DYNVARS_3/
# Line 238  C     diagnostics for the JFNK solver Line 232  C     diagnostics for the JFNK solver
232       &     totalNewtonIters, totalNewtonFails,       &     totalNewtonIters, totalNewtonFails,
233       &     totalKrylovIters, totalKrylovFails,       &     totalKrylovIters, totalKrylovFails,
234       &     totalJFNKtimeSteps       &     totalJFNKtimeSteps
235          INTEGER nVec
236          PARAMETER ( nVec=2*sNx*sNy )
237          _RL scalarProductMetric( nVec, 1, nSx, nSy )
238          COMMON /SEAICE_JFNK_RL/ scalarProductMetric
239  #endif /* SEAICE_ALLOW_JFNK */  #endif /* SEAICE_ALLOW_JFNK */
240    
241  CEH3 ;;; Local Variables: ***  CEH3 ;;; Local Variables: ***
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22