/[MITgcm]/MITgcm/pkg/seaice/SEAICE_DIAGS.h
ViewVC logotype

Diff of /MITgcm/pkg/seaice/SEAICE_DIAGS.h

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

revision 1.1 by heimbach, Mon Nov 11 22:01:21 2002 UTC revision 1.2 by heimbach, Tue Nov 12 20:47:27 2002 UTC
# Line 0  Line 1 
1    C
2    
3    #ifdef ALLOW_SEAICE
4    
5    C     /==========================================================\
6    C     | SEAICE_DIAGS.h                                           |
7    C     | o Header for SEAICE diagnostic output                    |
8    C     \==========================================================/
9    
10    #ifdef ALLOW_TIMEAVE
11    
12    C     Keep track of time
13          _RL SEAICE_TimeAve(Nr,nSx,nSy)
14          COMMON /SEAICE_TAVE/ SEAICE_TimeAve
15    
16    C     Storage arrays for time-averages
17          _RL FUtave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
18          _RL FVtave    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
19          _RL EmPmRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
20          _RL QNETtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
21          _RL QSWtave   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
22          _RL UICEtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
23          _RL VICEtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
24          _RL HEFFtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
25          _RL AREAtave  (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
26          COMMON /SEAICE_TAVE_DIAGS/
27         &        FUtave, FVtave, EmPmRtave, QNETtave, QSWtave,
28         &        UICEtave, VICEtave, HEFFtave, AREAtave
29    
30    #endif /* ALLOW_TIMEAVE */
31    
32    #endif ALLOW_SEAICE
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22