/[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.19 - (hide annotations) (download)
Fri May 21 21:45:35 2004 UTC (20 years, 4 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint53d_post, checkpoint53c_post, checkpoint53f_post, checkpoint53d_pre
Changes since 1.18: +12 -1 lines
File MIME type: text/plain
o Adjoint for EBM package (needs further testing)
o bug fix for parallel EBM in ebm_zonalmean.F

1 heimbach 1.19 C $Header: $
2     C $Name: $
3 heimbach 1.1 c
4     c store directives for checkpoint level 3
5     c
6     c created: heimbach@mit.edu 10-Jan-2002
7     c
8     CADJ STORE gsnm1 = tapelev3, key = ilev_3
9     CADJ STORE gtnm1 = tapelev3, key = ilev_3
10     CADJ STORE gunm1 = tapelev3, key = ilev_3
11     CADJ STORE gvnm1 = tapelev3, key = ilev_3
12     CADJ STORE theta = tapelev3, key = ilev_3
13     CADJ STORE salt = tapelev3, key = ilev_3
14     CADJ STORE uvel = tapelev3, key = ilev_3
15     CADJ STORE vvel = tapelev3, key = ilev_3
16     CADJ STORE wvel = tapelev3, key = ilev_3
17     CADJ STORE etan = tapelev3, key = ilev_3
18 heimbach 1.6 CADJ STORE totphihyd = tapelev3, key = ilev_3
19 heimbach 1.18 CADJ STORE surfacetendencyTice = tapelev3, key = ilev_3
20 heimbach 1.19 CADJ STORE empmr = tapelev3, key = ilev_3
21 heimbach 1.1
22 heimbach 1.12 #ifdef EXACT_CONSERV
23 heimbach 1.13 CADJ STORE etaH = tapelev3, key = ilev_3
24     CADJ STORE hDivFlow = tapelev3, key = ilev_3
25 heimbach 1.12 #endif /* EXACT_CONSERV */
26    
27 heimbach 1.1 #ifdef ALLOW_PASSIVE_TRACER
28     CADJ STORE tr1 = tapelev3, key = ilev_3
29     CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
30 heimbach 1.7 #endif /* ALLOW_PASSIVE_TRACER */
31 heimbach 1.15
32     #ifdef ALLOW_CD_CODE
33     # include "cd_code_ad_check_lev3_dir.h"
34     #endif /* ALLOW_CD_CODE */
35 heimbach 1.1
36 edhill 1.16 #ifdef ALLOW_EXF
37 heimbach 1.13 # include "exf_ad_check_lev3_dir.h"
38 edhill 1.16 #else /* ALLOW_EXF undef */
39 heimbach 1.3
40     CADJ STORE taux0 = tapelev3, key = ilev_3
41     CADJ STORE taux1 = tapelev3, key = ilev_3
42     CADJ STORE tauy0 = tapelev3, key = ilev_3
43     CADJ STORE tauy1 = tapelev3, key = ilev_3
44     CADJ STORE Qnet0 = tapelev3, key = ilev_3
45     CADJ STORE Qnet1 = tapelev3, key = ilev_3
46     CADJ STORE EmPmR0 = tapelev3, key = ilev_3
47     CADJ STORE EmPmR1 = tapelev3, key = ilev_3
48     CADJ STORE SST0 = tapelev3, key = ilev_3
49     CADJ STORE SST1 = tapelev3, key = ilev_3
50     CADJ STORE SSS0 = tapelev3, key = ilev_3
51     CADJ STORE SSS1 = tapelev3, key = ilev_3
52 heimbach 1.4 #ifdef SHORTWAVE_HEATING
53 heimbach 1.3 CADJ STORE Qsw0 = tapelev3, key = ilev_3
54     CADJ STORE Qsw1 = tapelev3, key = ilev_3
55 heimbach 1.4 #endif
56     #ifdef ATMOSPHERIC_LOADING
57     CADJ STORE pload0 = tapelev3, key = ilev_3
58     CADJ STORE pload1 = tapelev3, key = ilev_3
59     #endif
60 heimbach 1.3
61 edhill 1.16 #endif /* ALLOW_EXF */
62 heimbach 1.2
63 heimbach 1.13 #ifdef ALLOW_PTRACERS
64     # include "ptracers_ad_check_lev3_dir.h"
65 heimbach 1.7 #endif
66    
67 heimbach 1.13 #ifdef ALLOW_OBCS
68     # include "obcs_ad_check_lev3_dir.h"
69 heimbach 1.2 #endif /* ALLOW_OBCS */
70    
71 heimbach 1.7 #ifdef ALLOW_SEAICE
72 heimbach 1.13 # include "seaice_ad_check_lev3_dir.h"
73 heimbach 1.7 #endif /* ALLOW_SEAICE */
74 heimbach 1.19
75     #ifdef ALLOW_EBM
76     CADJ STORE fu = tapelev3, key = ilev_3
77     CADJ STORE fv = tapelev3, key = ilev_3
78     CADJ STORE qnet = tapelev3, key = ilev_3
79     CADJ STORE qsw = tapelev3, key = ilev_3
80     CADJ STORE sss = tapelev3, key = ilev_3
81     # include "ebm_ad_check_lev3_dir.h"
82     #endif /* ALLOW_EBM */

  ViewVC Help
Powered by ViewVC 1.1.22