/[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.38 - (show annotations) (download)
Sat Aug 18 21:34:01 2007 UTC (16 years, 10 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint59p, checkpoint59g, checkpoint59f, checkpoint59m, checkpoint59l, checkpoint59o, checkpoint59n, checkpoint59i, checkpoint59h, checkpoint59k, checkpoint59j
Changes since 1.37: +1 -4 lines
File MIME type: text/plain
Update NLFS adjoint.

1 C $Header: /u/gcmpack/MITgcm/pkg/autodiff/checkpoint_lev3_directives.h,v 1.37 2007/08/16 04:15:18 heimbach Exp $
2 C $Name: $
3 c
4 c store directives for checkpoint level 4
5 c
6 c created: heimbach@mit.edu 10-Jan-2002
7 c
8
9 CADJ STORE StoreDynVars3D = tapelev3, key = ilev_3
10 CADJ STORE StoreDynVars2D = tapelev3, key = ilev_3
11 cnewCADJ STORE ivdconvcount = tapelevx, key = ilev_x
12
13 #ifdef EXACT_CONSERV
14 cphCADJ STORE hDivFlow = tapelev3, key = ilev_3
15 #endif /* EXACT_CONSERV */
16
17 #ifdef ALLOW_PASSIVE_TRACER
18 CADJ STORE tr1 = tapelev3, key = ilev_3
19 CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
20 #endif /* ALLOW_PASSIVE_TRACER */
21
22 #ifdef NONLIN_FRSURF
23 CADJ STORE hfac_surfc = tapelev3, key = ilev_3
24 CADJ STORE hfac_surfs = tapelev3, key = ilev_3
25 CADJ STORE hfac_surfw = tapelev3, key = ilev_3
26 CADJ STORE hfacc = tapelev3, key = ilev_3
27 CADJ STORE hfacs = tapelev3, key = ilev_3
28 CADJ STORE hfacw = tapelev3, key = ilev_3
29 CADJ STORE recip_hfacc = tapelev3, key = ilev_3
30 CADJ STORE recip_hfacs = tapelev3, key = ilev_3
31 CADJ STORE recip_hfacw = tapelev3, key = ilev_3
32 # ifndef DISABLE_RSTAR_CODE
33 CADJ STORE rstarexpc,rstarexps,rstarexpw
34 CADJ & = tapelev3, key = ilev_3
35 CADJ STORE rstarfacc,rstarfacs,rstarfacw
36 CADJ & = tapelev3, key = ilev_3
37 CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt
38 CADJ & = tapelev3, key = ilev_3
39 CADJ STORE h0facc,h0facs,h0facw
40 CADJ & = tapelev3, key = ilev_3
41 # endif
42 #endif /* NONLIN_FRSURF */
43
44 #ifdef ALLOW_CD_CODE
45 # include "cd_code_ad_check_lev3_dir.h"
46 #endif /* ALLOW_CD_CODE */
47
48 #ifdef ALLOW_EXF
49 # include "exf_ad_check_lev3_dir.h"
50 #endif /* ALLOW_EXF */
51
52 #ifdef ALLOW_PTRACERS
53 # include "ptracers_ad_check_lev3_dir.h"
54 #endif
55
56 #ifdef ALLOW_OBCS
57 # include "obcs_ad_check_lev3_dir.h"
58 #endif /* ALLOW_OBCS */
59
60 #ifdef ALLOW_SEAICE
61 # include "seaice_ad_check_lev3_dir.h"
62 #endif /* ALLOW_SEAICE */
63
64 #ifdef ALLOW_THSICE
65 # include "thsice_ad_check_lev3_dir.h"
66 #endif /* ALLOW_THSICE */
67
68 #ifdef ALLOW_RBCS
69 # include "rbcs_ad_check_lev3_dir.h"
70 #endif /* ALLOW_rbcs */
71
72 #ifdef ALLOW_EBM
73 CADJ STORE fu = tapelev3, key = ilev_3
74 CADJ STORE fv = tapelev3, key = ilev_3
75 CADJ STORE qnet = tapelev3, key = ilev_3
76 CADJ STORE qsw = tapelev3, key = ilev_3
77 CADJ STORE sss = tapelev3, key = ilev_3
78 CADJ STORE empmr = tapelev3, key = ilev_3
79 # include "ebm_ad_check_lev3_dir.h"
80 #endif /* ALLOW_EBM */
81
82 #ifdef ALLOW_COST
83 CADJ STORE cMeanTheta = tapelev3, key = ilev_3
84 CADJ STORE cMeanUVel = tapelev3, key = ilev_3
85 CADJ STORE cMeanVVel = tapelev3, key = ilev_3
86 CADJ STORE cMeanThetaUVel = tapelev3, key = ilev_3
87 CADJ STORE cMeanThetaVVel = tapelev3, key = ilev_3
88 #endif
89
90 #ifdef ALLOW_COST_TRACER
91 CADJ STORE objf_tracer = tapelev3, key = ilev_3
92 #endif
93
94 #ifdef ALLOW_COST_TRANSPORT
95 CADJ STORE objf_transport = tapelev3, key = ilev_3
96 #endif

  ViewVC Help
Powered by ViewVC 1.1.22