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

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

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

Revision 1.6 - (show annotations) (download)
Sun Apr 17 00:25:46 2005 UTC (19 years ago) by edhill
Branch: MAIN
CVS Tags: checkpoint57t_post, checkpoint58l_post, checkpoint57o_post, checkpoint57m_post, checkpoint58e_post, checkpoint57r_post, checkpoint57s_post, checkpoint57j_post, checkpoint58b_post, checkpoint58m_post, checkpoint57k_post, checkpoint60, checkpoint61, checkpoint58r_post, checkpoint57i_post, checkpoint57y_post, checkpoint58g_post, checkpoint57x_post, checkpoint58n_post, checkpoint58x_post, checkpoint61l, checkpoint58h_post, checkpoint58w_post, checkpoint58j_post, checkpoint57h_post, checkpoint57y_pre, checkpoint58q_post, checkpoint57v_post, checkpoint59q, checkpoint59p, checkpoint59r, checkpoint59e, checkpoint59d, checkpoint59g, checkpoint59f, checkpoint59a, checkpoint59c, checkpoint59b, checkpoint59m, checkpoint59l, checkpoint59o, checkpoint59n, checkpoint59i, checkpoint59h, checkpoint59k, checkpoint59j, checkpoint59, checkpoint58, checkpoint57h_done, checkpoint58f_post, checkpoint57n_post, checkpoint58d_post, checkpoint57w_post, checkpoint57p_post, checkpint57u_post, checkpoint58a_post, checkpoint58i_post, checkpoint57q_post, checkpoint58o_post, checkpoint57z_post, checkpoint58c_post, checkpoint57h_pre, checkpoint58k_post, checkpoint58u_post, checkpoint58y_post, checkpoint58v_post, checkpoint58s_post, checkpoint61f, checkpoint61g, checkpoint61d, checkpoint61e, checkpoint61b, checkpoint61c, checkpoint58p_post, checkpoint61a, checkpoint61n, checkpoint61o, checkpoint58t_post, checkpoint61m, checkpoint61j, checkpoint61k, checkpoint61h, checkpoint61i, checkpoint61p, checkpoint61q, checkpoint57l_post
Changes since 1.5: +5 -1 lines
File MIME type: text/plain 
 o fix mnc flags in pkg/seaice so that they are "owned" by seaice,
   not mnc -- this mistake was found by JMC and is now corrected
1 C $Header: /u/gcmpack/MITgcm/pkg/seaice/SEAICE_DIAGS.h,v 1.5 2004/12/27 20:34:11 dimitri Exp $
2 C $Name: $
3
4 C /==========================================================\
5 C | SEAICE_DIAGS.h |
6 C | o Header for SEAICE diagnostic output |
7 C \==========================================================/
8
9 #ifdef ALLOW_TIMEAVE
10
11 C Keep track of time
12 _RL SEAICE_TimeAve(Nr,nSx,nSy)
13 COMMON /SEAICE_TAVE/ SEAICE_TimeAve
14
15 C Storage arrays for time-averages
16 _RL FUtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
17 _RL FVtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
18 _RL EmPmRtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
19 _RL QNETtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
20 _RL QSWtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
21 _RL UICEtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
22 _RL VICEtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
23 _RL HEFFtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
24 _RL AREAtave (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1,nSx,nSy)
25 COMMON /SEAICE_TAVE_DIAGS/
26 & FUtave, FVtave, EmPmRtave, QNETtave, QSWtave,
27 & UICEtave, VICEtave, HEFFtave, AREAtave
28
29 #endif /* ALLOW_TIMEAVE */
30
31 CEH3 ;;; Local Variables: ***
32 CEH3 ;;; mode:fortran ***
33 CEH3 ;;; End: ***
  ViewVC Help
Powered by ViewVC 1.1.22