/[MITgcm]/MITgcm/pkg/my82/MY82_TAVE.h
ViewVC logotype

Annotation of /MITgcm/pkg/my82/MY82_TAVE.h

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

Revision 1.1 - (hide annotations) (download)
Wed Jun 17 14:18:16 2009 UTC (14 years, 11 months ago) by jmc
Branch: MAIN
CVS Tags: checkpoint62, checkpoint61v, checkpoint61w, checkpoint61t, checkpoint61u, checkpoint61r, checkpoint61s, checkpoint61q, checkpoint61z, checkpoint61x, checkpoint61y
File MIME type: text/plain 
rename my82_do_diags.F --> my82_output.F & MY82_DIAGS.h --> MY82_TAVE.h
add a STOP if MULTIPLE_RECORD_MY82_STATE_FILES is defined
(until it get fixed) ; remove PLOT_FIELD_XYZ calls.
1 jmc 1.1 C $Header: /u/gcmpack/MITgcm/pkg/my82/MY82_DIAGS.h,v 1.1 2004/09/02 09:11:54 mlosch Exp $
2     C $Name: $
3    
4     #ifdef ALLOW_MY82
5    
6     C *==========================================================*
7     C | MY82_TAVE.h
8     C | o Header for MY82 time-average output
9     C *==========================================================*
10    
11     C----------------------------------------------------------------
12     C my_drctrec - next record to dump for MY82 files
13     C----------------------------------------------------------------
14     INTEGER my_drctrec
15     COMMON /MY_RECORDNUM1/ my_drctrec
16    
17     #ifdef ALLOW_TIMEAVE
18     C----------------------------------------------------------------
19     C my_drctrecTave - next record to dump for MY82 averaging files
20     C----------------------------------------------------------------
21    
22     INTEGER my_drctrecTave
23     COMMON /MY_RECORDNUM2/ my_drctrecTave
24    
25     C----------------------------------------------------------------
26     C my_TimeAve - time of temporal integration (s) for each thread
27     C----------------------------------------------------------------
28    
29     _RL my_TimeAve(Nr,nSx,nSy)
30     COMMON /MY_TAVE/ my_TimeAve
31    
32     C----------------------------------------------------------------
33     C MY*tave - Time-averaging MY variables
34     C----------------------------------------------------------------
35    
36     _RL MYhbltave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
37     _RL MYviscArtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
38     _RL MYdiffKrtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
39     COMMON /MY_TAVE_DIAGS/
40     & MYhbltave, MYviscArtave, MYdiffKrtave
41    
42     #endif
43    
44     #endif
  ViewVC Help
Powered by ViewVC 1.1.22