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

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

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

Revision 1.2 - (show 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 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 #endif /* INCLUDE_CD_CODE */
28
29 #ifdef ALLOW_PASSIVE_TRACER
30 CADJ STORE tr1 = tapelev3, key = ilev_3
31 CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
32 #endif /* */
33
34 #ifdef EXACT_CONSERV
35 CADJ STORE etaH = tapelev3, key = ilev_3
36 CADJ STORE hDivFlow = tapelev3, key = ilev_3
37 #endif /* */
38
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
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