/[MITgcm]/MITgcm/pkg/autodiff/checkpoint_lev3_directives.h
ViewVC logotype

Annotation of /MITgcm/pkg/autodiff/checkpoint_lev3_directives.h

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

Revision 1.2 - (hide annotations) (download)
Thu Feb 7 20:00:09 2002 UTC (22 years, 4 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint44e_post, checkpoint46l_post, checkpoint46g_pre, checkpoint46f_post, checkpoint44f_post, checkpoint46b_post, checkpoint46l_pre, chkpt44d_post, checkpoint44e_pre, checkpoint46d_pre, checkpoint45d_post, checkpoint46j_pre, checkpoint44h_pre, checkpoint46a_post, checkpoint46j_post, checkpoint46k_post, chkpt44c_pre, checkpoint45a_post, checkpoint44g_post, checkpoint46e_pre, checkpoint45b_post, checkpoint46b_pre, release1_final_v1, checkpoint46c_pre, checkpoint46, checkpoint44b_post, checkpoint46h_pre, checkpoint46m_post, checkpoint46a_pre, checkpoint45c_post, checkpoint44h_post, checkpoint46g_post, checkpoint46i_post, checkpoint46c_post, checkpoint46e_post, checkpoint45, checkpoint46h_post, chkpt44c_post, checkpoint44f_pre, checkpoint46d_post
Branch point for: release1_final, release1
Changes since 1.1: +31 -3 lines
File MIME type: text/plain 
o merge of relevant stuff from the ecco-branch:
  - genmake: removed $S64 overwrite for case SunOS
  - pkg/exf: update and corrections for field swapping and obcs
  - pkg/ecco: parameter lists for the_model_main, the_main_loop
              harmonized between ECCO and MITgcm
  - pkg/autodiff: added flow directives for obcs, mdsio_gl_slice
                  updated checkpointing_lev... lists for obcs
  - model/src: minor changes in forward_step, plot_field
               added directive for divided adjoint in the_main_loop
  - pkg/mdsio: added mdsio_gl_slice
1 heimbach 1.1 c
2     c store directives for checkpoint level 3
3     c
4     c created: heimbach@mit.edu 10-Jan-2002
5     c
6     CADJ STORE gsnm1 = tapelev3, key = ilev_3
7     CADJ STORE gtnm1 = tapelev3, key = ilev_3
8     CADJ STORE gunm1 = tapelev3, key = ilev_3
9     CADJ STORE gvnm1 = tapelev3, key = ilev_3
10     CADJ STORE theta = tapelev3, key = ilev_3
11     CADJ STORE salt = tapelev3, key = ilev_3
12     CADJ STORE uvel = tapelev3, key = ilev_3
13     CADJ STORE vvel = tapelev3, key = ilev_3
14     CADJ STORE wvel = tapelev3, key = ilev_3
15     CADJ STORE etan = tapelev3, key = ilev_3
16     CADJ STORE gu = tapelev3, key = ilev_3
17     CADJ STORE gv = tapelev3, key = ilev_3
18    
19     #ifdef INCLUDE_CD_CODE
20     CADJ STORE uveld = tapelev3, key = ilev_3
21     CADJ STORE vveld = tapelev3, key = ilev_3
22     CADJ STORE etanm1 = tapelev3, key = ilev_3
23     CADJ STORE unm1 = tapelev3, key = ilev_3
24     CADJ STORE vnm1 = tapelev3, key = ilev_3
25     CADJ STORE gucd = tapelev3, key = ilev_3
26     CADJ STORE gvcd = tapelev3, key = ilev_3
27 heimbach 1.2 #endif /* INCLUDE_CD_CODE */
28 heimbach 1.1
29     #ifdef ALLOW_PASSIVE_TRACER
30     CADJ STORE tr1 = tapelev3, key = ilev_3
31     CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
32 heimbach 1.2 #endif /* */
33 heimbach 1.1
34     #ifdef EXACT_CONSERV
35     CADJ STORE etaH = tapelev3, key = ilev_3
36     CADJ STORE hDivFlow = tapelev3, key = ilev_3
37 heimbach 1.2 #endif /* */
38 heimbach 1.1
39     #ifdef INCLUDE_EXTERNAL_FORCING_PACKAGE
40     # ifdef ALLOW_ATM_TEMP
41     CADJ STORE aqh0 = tapelev3, key = ilev_3
42     CADJ STORE aqh1 = tapelev3, key = ilev_3
43     CADJ STORE atemp0 = tapelev3, key = ilev_3
44     CADJ STORE atemp1 = tapelev3, key = ilev_3
45     CADJ STORE precip0 = tapelev3, key = ilev_3
46     CADJ STORE precip1 = tapelev3, key = ilev_3
47     CADJ STORE lwflux0 = tapelev3, key = ilev_3
48     CADJ STORE lwflux1 = tapelev3, key = ilev_3
49     CADJ STORE swflux0 = tapelev3, key = ilev_3
50     CADJ STORE swflux1 = tapelev3, key = ilev_3
51     # else
52     CADJ STORE hflux0 = tapelev3, key = ilev_3
53     CADJ STORE hflux1 = tapelev3, key = ilev_3
54     CADJ STORE sflux0 = tapelev3, key = ilev_3
55     CADJ STORE sflux1 = tapelev3, key = ilev_3
56     # ifdef ALLOW_KPP
57     CADJ STORE swflux0 = tapelev3, key = ilev_3
58     CADJ STORE swflux1 = tapelev3, key = ilev_3
59     # endif
60     # endif /* ALLOW_ATM_TEMP */
61     # ifdef ALLOW_ATM_WIND
62     CADJ STORE uwind0 = tapelev3, key = ilev_3
63     CADJ STORE uwind1 = tapelev3, key = ilev_3
64     CADJ STORE vwind0 = tapelev3, key = ilev_3
65     CADJ STORE vwind1 = tapelev3, key = ilev_3
66     # else
67     CADJ STORE ustress0 = tapelev3, key = ilev_3
68     CADJ STORE ustress1 = tapelev3, key = ilev_3
69     CADJ STORE vstress0 = tapelev3, key = ilev_3
70     CADJ STORE vstress1 = tapelev3, key = ilev_3
71     # endif /* ALLOW_ATM_WIND */
72     #endif /* INCLUDE_EXTERNAL_FORCING_PACKAGE */
73 heimbach 1.2
74     #ifdef ALLOW_OBCS
75     #ifdef ALLOW_OBCS_NORTH
76     CADJ STORE OBNu = tapelev3, key = ilev_3
77     CADJ STORE OBNv = tapelev3, key = ilev_3
78     CADJ STORE OBNt = tapelev3, key = ilev_3
79     CADJ STORE OBNs = tapelev3, key = ilev_3
80     #endif /* ALLOW_OBCS_NORTH */
81     #ifdef ALLOW_OBCS_SOUTH
82     CADJ STORE OBSu = tapelev3, key = ilev_3
83     CADJ STORE OBSv = tapelev3, key = ilev_3
84     CADJ STORE OBSt = tapelev3, key = ilev_3
85     CADJ STORE OBSs = tapelev3, key = ilev_3
86     #endif /* ALLOW_OBCS_SOUTH */
87     #ifdef ALLOW_OBCS_EAST
88     CADJ STORE OBEu = tapelev3, key = ilev_3
89     CADJ STORE OBEv = tapelev3, key = ilev_3
90     CADJ STORE OBEt = tapelev3, key = ilev_3
91     CADJ STORE OBEs = tapelev3, key = ilev_3
92     #endif /* ALLOW_OBCS_EAST */
93     #ifdef ALLOW_OBCS_WEST
94     CADJ STORE OBWu = tapelev3, key = ilev_3
95     CADJ STORE OBWv = tapelev3, key = ilev_3
96     CADJ STORE OBWt = tapelev3, key = ilev_3
97     CADJ STORE OBWs = tapelev3, key = ilev_3
98     #endif /* ALLOW_OBCS_WEST */
99     #endif /* ALLOW_OBCS */
100    
  ViewVC Help
Powered by ViewVC 1.1.22