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

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

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


Revision 1.10 - (show annotations) (download)
Fri Jun 1 23:30:16 2007 UTC (16 years, 11 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint59e, checkpoint59d, checkpoint59c
Changes since 1.9: +6 -44 lines
File MIME type: text/plain
Re-organized adjoint checkpointing according to Matt Mazloff
(but with modifs/completions/cleanups)
Storing is now bundled into large arrays to optimized I/O
(and second step in cleanup of the_main_loop)

1 C $Header: /u/gcmpack/MITgcm/pkg/autodiff/checkpoint_lev4_directives.h,v 1.6 2006/07/19 14:49:49 dfer 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 = tapelev4, key = ilev_4
10 CADJ STORE StoreDynVars2D = tapelev4, key = ilev_4
11 cnewCADJ STORE ivdconvcount = tapelevx, key = ilev_x
12
13 #ifdef EXACT_CONSERV
14 cphCADJ STORE hDivFlow = tapelev4, key = ilev_4
15 #endif /* EXACT_CONSERV */
16
17 #ifdef ALLOW_PASSIVE_TRACER
18 CADJ STORE tr1 = tapelev4, key = ilev_4
19 CADJ STORE gtr1nm1 = tapelev4, key = ilev_4
20 #endif /* ALLOW_PASSIVE_TRACER */
21
22 #ifdef NONLIN_FRSURF
23 CADJ STORE hfac_surfc = tapelev4, key = ilev_4
24 CADJ STORE hfac_surfs = tapelev4, key = ilev_4
25 CADJ STORE hfac_surfw = tapelev4, key = ilev_4
26 CADJ STORE hfacc = tapelev4, key = ilev_4
27 CADJ STORE hfacs = tapelev4, key = ilev_4
28 CADJ STORE hfacw = tapelev4, key = ilev_4
29 CADJ STORE recip_hfacc = tapelev4, key = ilev_4
30 CADJ STORE recip_hfacs = tapelev4, key = ilev_4
31 CADJ STORE recip_hfacw = tapelev4, key = ilev_4
32 # ifndef DISABLE_RSTAR_CODE
33 CADJ STORE rstarexpc,rstarexps,rstarexpw
34 CADJ & = tapelev4, key = ilev_4
35 CADJ STORE rstarfacc,rstarfacs,rstarfacw
36 CADJ & = tapelev4, key = ilev_4
37 CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt
38 CADJ & = tapelev4, key = ilev_4
39 CADJ STORE h0facc,h0facs,h0facw
40 CADJ & = tapelev4, key = ilev_4
41 # endif
42 #endif /* NONLIN_FRSURF */
43
44 #ifdef ALLOW_CD_CODE
45 # include "cd_code_ad_check_lev4_dir.h"
46 #endif /* ALLOW_CD_CODE */
47
48 #ifdef ALLOW_EXF
49 # include "exf_ad_check_lev4_dir.h"
50 #endif /* ALLOW_EXF */
51
52 #ifdef ALLOW_PTRACERS
53 # include "ptracers_ad_check_lev4_dir.h"
54 #endif
55
56 #ifdef ALLOW_OBCS
57 # include "obcs_ad_check_lev4_dir.h"
58 #endif /* ALLOW_OBCS */
59
60 #ifdef ALLOW_SEAICE
61 # include "seaice_ad_check_lev4_dir.h"
62 #endif /* ALLOW_SEAICE */
63
64 #ifdef ALLOW_THSICE
65 # include "thsice_ad_check_lev4_dir.h"
66 #endif /* ALLOW_THSICE */
67
68 #ifdef ALLOW_RBCS
69 # include "rbcs_ad_check_lev4_dir.h"
70 #endif /* ALLOW_rbcs */
71
72 #ifdef ALLOW_EBM
73 CADJ STORE fu = tapelev4, key = ilev_4
74 CADJ STORE fv = tapelev4, key = ilev_4
75 CADJ STORE qnet = tapelev4, key = ilev_4
76 CADJ STORE qsw = tapelev4, key = ilev_4
77 CADJ STORE sss = tapelev4, key = ilev_4
78 CADJ STORE empmr = tapelev4, key = ilev_4
79 # include "ebm_ad_check_lev4_dir.h"
80 #endif /* ALLOW_EBM */
81
82 #ifdef ALLOW_COST
83 CADJ STORE cMeanTheta = tapelev4, key = ilev_4
84 CADJ STORE cMeanUVel = tapelev4, key = ilev_4
85 CADJ STORE cMeanVVel = tapelev4, key = ilev_4
86 CADJ STORE cMeanThetaUVel = tapelev4, key = ilev_4
87 CADJ STORE cMeanThetaVVel = tapelev4, key = ilev_4
88 #endif
89
90 #ifdef ALLOW_COST_TRACER
91 CADJ STORE objf_tracer = tapelev4, key = ilev_4
92 #endif
93
94 #ifdef ALLOW_COST_TRANSPORT
95 CADJ STORE objf_transport = tapelev4, key = ilev_4
96 #endif

  ViewVC Help
Powered by ViewVC 1.1.22