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

Annotation of /MITgcm/pkg/autodiff/checkpoint_lev1_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: +20 -0 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 1
3     c
4     c created: heimbach@mit.edu 10-Jan-2002
5     c
6     #ifdef INCLUDE_EXTERNAL_FORCING_PACKAGE
7     # ifdef ALLOW_ATM_TEMP
8     CADJ STORE aqh0 = comlev1, key = ikey_dynamics
9     CADJ STORE aqh1 = comlev1, key = ikey_dynamics
10     CADJ STORE atemp0 = comlev1, key = ikey_dynamics
11     CADJ STORE atemp1 = comlev1, key = ikey_dynamics
12     CADJ STORE precip0 = comlev1, key = ikey_dynamics
13     CADJ STORE precip1 = comlev1, key = ikey_dynamics
14     CADJ STORE lwflux0 = comlev1, key = ikey_dynamics
15     CADJ STORE lwflux1 = comlev1, key = ikey_dynamics
16     CADJ STORE swflux0 = comlev1, key = ikey_dynamics
17     CADJ STORE swflux1 = comlev1, key = ikey_dynamics
18     # else
19     CADJ STORE hflux0 = comlev1, key = ikey_dynamics
20     CADJ STORE hflux1 = comlev1, key = ikey_dynamics
21     CADJ STORE sflux0 = comlev1, key = ikey_dynamics
22     CADJ STORE sflux1 = comlev1, key = ikey_dynamics
23     # ifdef ALLOW_KPP
24     CADJ STORE swflux0 = comlev1, key = ikey_dynamics
25     CADJ STORE swflux1 = comlev1, key = ikey_dynamics
26     # endif
27     # endif /* ALLOW_ATM_TEMP */
28     # ifdef ALLOW_ATM_WIND
29     CADJ STORE uwind0 = comlev1, key = ikey_dynamics
30     CADJ STORE uwind1 = comlev1, key = ikey_dynamics
31     CADJ STORE vwind0 = comlev1, key = ikey_dynamics
32     CADJ STORE vwind1 = comlev1, key = ikey_dynamics
33     # else
34     CADJ STORE ustress0 = comlev1, key = ikey_dynamics
35     CADJ STORE ustress1 = comlev1, key = ikey_dynamics
36     CADJ STORE vstress0 = comlev1, key = ikey_dynamics
37     CADJ STORE vstress1 = comlev1, key = ikey_dynamics
38     # endif /* ALLOW_ATM_WIND */
39     # ifdef ALLOW_BULKFORMULAE
40     CADJ STORE theta = comlev1, key = ikey_dynamics
41     # endif
42     #endif
43 heimbach 1.2
44     #ifdef ALLOW_OBCS
45     #ifdef ALLOW_OBCS_NORTH
46     CADJ STORE OBNt = comlev1, key = ikey_dynamics
47     CADJ STORE OBNs = comlev1, key = ikey_dynamics
48     #endif /* ALLOW_OBCS_NORTH */
49     #ifdef ALLOW_OBCS_SOUTH
50     CADJ STORE OBSt = comlev1, key = ikey_dynamics
51     CADJ STORE OBSs = comlev1, key = ikey_dynamics
52     #endif /* ALLOW_OBCS_SOUTH */
53     #ifdef ALLOW_OBCS_EAST
54     CADJ STORE OBEt = comlev1, key = ikey_dynamics
55     CADJ STORE OBEs = comlev1, key = ikey_dynamics
56     #endif /* ALLOW_OBCS_EAST */
57     #ifdef ALLOW_OBCS_WEST
58     CADJ STORE OBWt = comlev1, key = ikey_dynamics
59     CADJ STORE OBWs = comlev1, key = ikey_dynamics
60     #endif /* ALLOW_OBCS_WEST */
61     #endif /* ALLOW_OBCS */
62    
  ViewVC Help
Powered by ViewVC 1.1.22