/[MITgcm]/MITgcm/pkg/bulk_force/BULKF_DIAG.h
ViewVC logotype

Contents of /MITgcm/pkg/bulk_force/BULKF_DIAG.h

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


Revision 1.4 - (show annotations) (download)
Wed Dec 11 14:23:35 2002 UTC (21 years, 4 months ago) by cheisey
Branch: MAIN
CVS Tags: checkpoint48f_post, checkpoint51k_post, checkpoint47j_post, checkpoint48d_pre, checkpoint51l_post, checkpoint51j_post, branch-exfmods-tag, checkpoint47e_post, checkpoint47i_post, checkpoint48i_post, checkpoint47f_post, checkpoint48d_post, checkpoint51o_pre, checkpoint47c_post, checkpoint50e_post, checkpoint50c_post, checkpoint51n_pre, checkpoint47d_post, checkpoint51f_pre, checkpoint48e_post, checkpoint48h_post, checkpoint50c_pre, branchpoint-genmake2, checkpoint50d_pre, checkpoint51r_post, checkpoint52b_pre, checkpoint51i_post, checkpoint47h_post, checkpoint48c_post, checkpoint50b_pre, checkpoint51e_post, checkpoint51b_post, checkpoint51l_pre, checkpoint51c_post, checkpoint48, checkpoint49, checkpoint51o_post, checkpoint48g_post, checkpoint51q_post, checkpoint51, checkpoint50, checkpoint52, checkpoint50d_post, checkpoint51b_pre, checkpoint52a_post, checkpoint47g_post, checkpoint51h_pre, checkpoint50g_post, checkpoint51g_post, ecco_c52_e35, checkpoint51f_post, checkpoint48b_post, checkpoint50b_post, checkpoint48a_post, checkpoint50f_post, checkpoint50a_post, checkpoint50f_pre, checkpoint52a_pre, checkpoint47d_pre, checkpoint51d_post, checkpoint48c_pre, checkpoint51m_post, checkpoint51t_post, checkpoint50h_post, checkpoint51a_post, checkpoint50e_pre, checkpoint50i_post, checkpoint51p_post, checkpoint51n_post, checkpoint51i_pre, checkpoint51u_post, checkpoint51s_post
Branch point for: branch-genmake2, branch-nonh, tg2-branch, checkpoint51n_branch, branch-exfmods-curt
Changes since 1.3: +1 -2 lines
File MIME type: text/plain
Tidying up some recent bulk_forcing changes.

1 C $Header: /u/u0/gcmpack/MITgcm/pkg/bulk_force/BULKF_DIAG.h,v 1.3 2002/12/05 16:15:58 cheisey Exp $
2 C $Name: $
3 cswdblk -- change to keep bulk formula fields --
4
5 C /==========================================================\
6 C | BULKF_DIAG.h |
7 C | o Header for Bulk formula diagnostic output |
8 C \==========================================================/
9
10 #ifdef ALLOW_BULK_FORCE
11
12 #ifdef ALLOW_TIMEAVE
13
14 C Keep track of time
15 _RL BULKF_TimeAve(Nr, nSx,nSy)
16 COMMON /BULKF_TAVE/ BULKF_TimeAve
17
18 C Storage arrays for time-averages
19 _RL BULK_Qnet_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
20 _RL BULK_EmPmR_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
21 _RL BULK_fu_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
22 _RL BULK_fv_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
23 _RL BULK_latent_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
24 _RL BULK_sensible_AVE(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
25 _RL BULK_evap_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
26 _RL BULK_flwup_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
27 _RL BULK_flwupnet_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
28 _RL BULK_solar_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
29 _RL BULK_ssq_AVE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
30
31
32 COMMON /BULKF_TAVE_ARRAYS/
33 & BULK_Qnet_AVE, BULK_EmPmR_AVE,
34 & BULK_fu_AVE, BULK_fv_AVE,
35 & BULK_sensible_AVE, BULK_latent_AVE,
36 & BULK_evap_AVE, BULK_flwup_AVE,
37 & BULK_solar_AVE, BULK_ssq_AVE,
38 & BULK_flwupnet_AVE
39
40
41
42 #endif /* ALLOW_TIMEAVE */
43
44 #endif /* ALLOW_BULK_FORCE */

  ViewVC Help
Powered by ViewVC 1.1.22