/[MITgcm]/MITgcm/pkg/opps/OPPS_TAVE.h
ViewVC logotype

Diff of /MITgcm/pkg/opps/OPPS_TAVE.h

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

revision 1.1 by jmc, Wed Jun 17 14:20:53 2009 UTC revision 1.2 by jmc, Sun Jan 3 19:15:31 2010 UTC
# Line 8  C     | OPPS_TAVE.h Line 8  C     | OPPS_TAVE.h
8  C     | o Header for OPPS time-average output  C     | o Header for OPPS time-average output
9  C     *==========================================================*  C     *==========================================================*
10    
 C----------------------------------------------------------------  
 C     opps_drctrec     - next record to dump for PP files  
 C----------------------------------------------------------------  
       INTEGER opps_drctrec  
       COMMON /OPPS_RECORDNUM1/ opps_drctrec  
   
11  #ifdef ALLOW_TIMEAVE  #ifdef ALLOW_TIMEAVE
12  C----------------------------------------------------------------  C----------------------------------------------------------------
13  C     opps_drctrecTave - next record to dump for PP averaging files  C     OPPS_timeAve - time of temporal integration (s) for each thread
 C----------------------------------------------------------------  
   
       INTEGER opps_drctrecTave  
       COMMON /OPPS_RECORDNUM2/ opps_drctrecTave  
   
 C----------------------------------------------------------------  
 C     opps_TimeAve - time of temporal integration (s) for each thread  
14  C----------------------------------------------------------------  C----------------------------------------------------------------
15    
16        _RL opps_TimeAve(Nr,nSx,nSy)        _RL OPPS_timeAve(nSx,nSy)
17        COMMON /OPPS_TAVE/ opps_TimeAve        COMMON /OPPS_TAVE_COUNT/ OPPS_timeAve
18    
19  C----------------------------------------------------------------  C----------------------------------------------------------------
20  C     OPPS*tave    - Time-averaging OPPS variables  C     OPPS*tave    - Time-averaging OPPS variables
21  C----------------------------------------------------------------  C----------------------------------------------------------------
22    
23        _RL OPPSconvectCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,        _RL OPPSconvCountTave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
24       &                         Nr,nSx,nSy)        COMMON /OPPS_TAVE_FIELDS/
25        COMMON /OPPS_TAVE_DIAGS/       &     OPPSconvCountTave
      &     OPPSconvectCountTave  
26    
27  #endif /* ALLOW_TIMEAVE */  #endif /* ALLOW_TIMEAVE */
28    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22