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

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

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

revision 1.8 by heimbach, Sat Mar 24 02:23:09 2007 UTC revision 1.22 by gforget, Wed Oct 20 22:06:56 2010 UTC
# Line 5  c     store directives for checkpoint le Line 5  c     store directives for checkpoint le
5  c  c
6  c     created: heimbach@mit.edu 10-Jan-2002  c     created: heimbach@mit.edu 10-Jan-2002
7  c  c
8  CADJ STORE gs        = tapelev4, key = ilev_4  #ifdef AUTODIFF_USE_OLDSTORE_2D
9  CADJ STORE gt        = tapelev4, key = ilev_4  c
10  CADJ STORE gtnm1     = tapelev4, key = ilev_4  CADJ STORE etan  = tapelev4, key = ilev_4
 CADJ STORE gsnm1     = tapelev4, key = ilev_4  
 CADJ STORE gunm1     = tapelev4, key = ilev_4  
 CADJ STORE gvnm1     = tapelev4, key = ilev_4  
 CADJ STORE theta     = tapelev4, key = ilev_4  
 CADJ STORE salt      = tapelev4, key = ilev_4  
 CADJ STORE uvel      = tapelev4, key = ilev_4  
 CADJ STORE vvel      = tapelev4, key = ilev_4  
 CADJ STORE wvel      = tapelev4, key = ilev_4  
 CADJ STORE etan      = tapelev4, key = ilev_4  
 CADJ STORE totphihyd = tapelev4, key = ilev_4  
11  CADJ STORE surfaceforcingTice = tapelev4, key = ilev_4  CADJ STORE surfaceforcingTice = tapelev4, key = ilev_4
12  cnewCADJ STORE ivdconvcount       = tapelev4, key = ilev_4  CADJ STORE taux0 = tapelev4, key = ilev_4
13    CADJ STORE taux1 = tapelev4, key = ilev_4
14    CADJ STORE tauy0 = tapelev4, key = ilev_4
15    CADJ STORE tauy1 = tapelev4, key = ilev_4
16    CADJ STORE qnet0 = tapelev4, key = ilev_4
17    CADJ STORE qnet1 = tapelev4, key = ilev_4
18    CADJ STORE empmr0 = tapelev4, key = ilev_4
19    CADJ STORE empmr1 = tapelev4, key = ilev_4
20    CADJ STORE sst0 = tapelev4, key = ilev_4
21    CADJ STORE sst1 = tapelev4, key = ilev_4
22    CADJ STORE sss0 = tapelev4, key = ilev_4
23    CADJ STORE sss1 = tapelev4, key = ilev_4
24    CADJ STORE saltflux0 = tapelev4, key = ilev_4
25    CADJ STORE saltflux1 = tapelev4, key = ilev_4
26    #ifdef SHORTWAVE_HEATING
27    CADJ STORE qsw0 = tapelev4, key = ilev_4
28    CADJ STORE qsw1 = tapelev4, key = ilev_4
29    #endif
30    #ifdef ATMOSPHERIC_LOADING
31    CADJ STORE pload0 = tapelev4, key = ilev_4
32    CADJ STORE pload1 = tapelev4, key = ilev_4
33    #endif
34    #ifdef EXACT_CONSERV
35    CADJ STORE etaH = tapelev4, key = ilev_4
36    CADJ STORE dEtaHdt = tapelev4, key = ilev_4
37    CADJ STORE PmEpR = tapelev4, key = ilev_4
38    #endif
39    c
40    #else /* ndef AUTODIFF_USE_OLDSTORE_2D */
41    c
42    CADJ STORE StoreDynVars2D     = tapelev4, key = ilev_4
43    c
44    #endif /* AUTODIFF_USE_OLDSTORE_2D */
45    c
46    #ifdef AUTODIFF_USE_OLDSTORE_3D
47    c
48    CADJ STORE gs  = tapelev4, key = ilev_4
49    CADJ STORE gt  = tapelev4, key = ilev_4            
50    #ifdef ALLOW_ADAMSBASHFORTH_3
51    CADJ STORE gtnm(:,:,:,:,1)   = tapelev4, key = ilev_4
52    CADJ STORE gsnm(:,:,:,:,1)   = tapelev4, key = ilev_4
53    CADJ STORE gunm(:,:,:,:,1)   = tapelev4, key = ilev_4
54    CADJ STORE gvnm(:,:,:,:,1)   = tapelev4, key = ilev_4
55    CADJ STORE gtnm(:,:,:,:,2)   = tapelev4, key = ilev_4
56    CADJ STORE gsnm(:,:,:,:,2)   = tapelev4, key = ilev_4
57    CADJ STORE gunm(:,:,:,:,2)   = tapelev4, key = ilev_4
58    CADJ STORE gvnm(:,:,:,:,2)   = tapelev4, key = ilev_4
59    #else
60    CADJ STORE gtnm1  = tapelev4, key = ilev_4            
61    CADJ STORE gsnm1  = tapelev4, key = ilev_4            
62    CADJ STORE gunm1  = tapelev4, key = ilev_4            
63    CADJ STORE gvnm1  = tapelev4, key = ilev_4            
64    #endif
65    CADJ STORE theta  = tapelev4, key = ilev_4            
66    CADJ STORE salt  = tapelev4, key = ilev_4            
67    CADJ STORE uvel  = tapelev4, key = ilev_4            
68    CADJ STORE vvel  = tapelev4, key = ilev_4    
69    CADJ STORE wvel  = tapelev4, key = ilev_4
70    CADJ STORE totphihyd  = tapelev4, key = ilev_4
71    c
72    #else /* ndef AUTODIFF_USE_OLDSTORE_3D */
73    c
74    CADJ STORE StoreDynVars3D     = tapelev4, key = ilev_4
75    c
76    #endif /* AUTODIFF_USE_OLDSTORE_3D */
77    
78    cnewCADJ STORE ivdconvcount       = tapelevx, key = ilev_x
79    
80  #ifdef EXACT_CONSERV  #ifdef EXACT_CONSERV
 CADJ STORE etaH      = tapelev4, key = ilev_4  
 CADJ STORE dEtaHdt   = tapelev4, key = ilev_4  
 CADJ STORE PmEpR     = tapelev4, key = ilev_4  
81  cphCADJ STORE hDivFlow  = tapelev4, key = ilev_4  cphCADJ STORE hDivFlow  = tapelev4, key = ilev_4
82  #endif /* EXACT_CONSERV */  #endif /* EXACT_CONSERV */
83    
# Line 43  CADJ STORE hfacw         = tapelev4, key Line 96  CADJ STORE hfacw         = tapelev4, key
96  CADJ STORE recip_hfacc   = tapelev4, key = ilev_4  CADJ STORE recip_hfacc   = tapelev4, key = ilev_4
97  CADJ STORE recip_hfacs   = tapelev4, key = ilev_4  CADJ STORE recip_hfacs   = tapelev4, key = ilev_4
98  CADJ STORE recip_hfacw   = tapelev4, key = ilev_4  CADJ STORE recip_hfacw   = tapelev4, key = ilev_4
99    CADJ STORE phi0surf      = tapelev4, key = ilev_4
100  # ifndef DISABLE_RSTAR_CODE  # ifndef DISABLE_RSTAR_CODE
101  CADJ STORE rstarexpc,rstarexps,rstarexpw  CADJ STORE rstarexpc,rstarexps,rstarexpw
102  CADJ &     = tapelev4, key = ilev_4  CADJ &     = tapelev4, key = ilev_4
# Line 59  CADJ &     = tapelev4, key = ilev_4 Line 113  CADJ &     = tapelev4, key = ilev_4
113  # include "cd_code_ad_check_lev4_dir.h"  # include "cd_code_ad_check_lev4_dir.h"
114  #endif /* ALLOW_CD_CODE */  #endif /* ALLOW_CD_CODE */
115    
116  #ifdef ALLOW_EXF  #ifdef ALLOW_GGL90
117  # include "exf_ad_check_lev4_dir.h"  # include "ggl90_ad_check_lev4_dir.h"
 #else /* ALLOW_EXF undef */  
   
 CADJ STORE taux0   = tapelev4, key = ilev_4  
 CADJ STORE taux1   = tapelev4, key = ilev_4  
 CADJ STORE tauy0   = tapelev4, key = ilev_4  
 CADJ STORE tauy1   = tapelev4, key = ilev_4  
 CADJ STORE Qnet0   = tapelev4, key = ilev_4  
 CADJ STORE Qnet1   = tapelev4, key = ilev_4  
 CADJ STORE EmPmR0  = tapelev4, key = ilev_4  
 CADJ STORE EmPmR1  = tapelev4, key = ilev_4  
 CADJ STORE SST0    = tapelev4, key = ilev_4  
 CADJ STORE SST1    = tapelev4, key = ilev_4  
 CADJ STORE SSS0    = tapelev4, key = ilev_4  
 CADJ STORE SSS1    = tapelev4, key = ilev_4  
 CADJ STORE saltFlux0    = tapelev4, key = ilev_4  
 CADJ STORE saltFlux1    = tapelev4, key = ilev_4  
 #ifdef SHORTWAVE_HEATING  
 CADJ STORE Qsw0    = tapelev4, key = ilev_4  
 CADJ STORE Qsw1    = tapelev4, key = ilev_4  
118  #endif  #endif
119  #ifdef ATMOSPHERIC_LOADING  
120  CADJ STORE pload0  = tapelev4, key = ilev_4  #ifdef ALLOW_ECCO
121  CADJ STORE pload1  = tapelev4, key = ilev_4  # include "ecco_ad_check_lev4_dir.h"
 CADJ STORE siceload = tapelev4, key = ilev_4  
122  #endif  #endif
123    
124    #ifdef ALLOW_EXF
125    # include "exf_ad_check_lev4_dir.h"
126  #endif /* ALLOW_EXF */  #endif /* ALLOW_EXF */
127    
128  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_PTRACERS
# Line 97  CADJ STORE siceload = tapelev4, key = il Line 133  CADJ STORE siceload = tapelev4, key = il
133  # include "obcs_ad_check_lev4_dir.h"  # include "obcs_ad_check_lev4_dir.h"
134  #endif  /* ALLOW_OBCS */  #endif  /* ALLOW_OBCS */
135    
136    #ifdef ALLOW_SALT_PLUME
137    # include "salt_plume_ad_check_lev4_dir.h"
138    #endif
139    
140  #ifdef ALLOW_SEAICE  #ifdef ALLOW_SEAICE
141  # include "seaice_ad_check_lev4_dir.h"  # include "seaice_ad_check_lev4_dir.h"
142  #endif /* ALLOW_SEAICE */  #endif /* ALLOW_SEAICE */
# Line 107  CADJ STORE siceload = tapelev4, key = il Line 147  CADJ STORE siceload = tapelev4, key = il
147    
148  #ifdef ALLOW_RBCS  #ifdef ALLOW_RBCS
149  # include "rbcs_ad_check_lev4_dir.h"  # include "rbcs_ad_check_lev4_dir.h"
150  #endif /* ALLOW_rbcs */  #endif /* ALLOW_RBCS */
151    
152    #ifdef ALLOW_OFFLINE
153    # include "offline_ad_check_lev4_dir.h"
154    #endif /* ALLOW_OFFLINE */
155    
156    #ifdef ALLOW_GCHEM
157    # include "gchem_ad_check_lev4_dir.h"
158    #endif
159    
160    #ifdef ALLOW_CFC
161    # include "cfc_ad_check_lev4_dir.h"
162    #endif
163    
164    #ifdef ALLOW_DIC
165    # include "dic_ad_check_lev4_dir.h"
166    #endif
167    
168  #ifdef ALLOW_EBM  #ifdef ALLOW_EBM
169  CADJ STORE fu    = tapelev4, key = ilev_4  CADJ STORE fu    = tapelev4, key = ilev_4
# Line 134  CADJ STORE objf_tracer = tapelev4, key = Line 190  CADJ STORE objf_tracer = tapelev4, key =
190  #ifdef ALLOW_COST_TRANSPORT  #ifdef ALLOW_COST_TRANSPORT
191  CADJ STORE objf_transport = tapelev4, key = ilev_4  CADJ STORE objf_transport = tapelev4, key = ilev_4
192  #endif  #endif
193    
194    #ifdef ALLOW_HFLUXM_CONTROL
195    CADJ STORE qnetm          = tapelev4, key = ilev_4
196    #endif
197    
198    #ifdef ALLOW_SEAICE
199    cph temporary for HD
200    # ifdef ANNUAL_BALANCE
201    CADJ STORE balance_itcount = tapelev4, key = ilev_4
202    CADJ STORE atmfw_tilesum   = tapelev4, key = ilev_4
203    CADJ STORE qnet_tilesum    = tapelev4, key = ilev_4
204    CADJ STORE empmr_corr      = tapelev4, key = ilev_4
205    CADJ STORE qnet_corr       = tapelev4, key = ilev_4
206    # endif /* ANNUAL_BALANCE */
207    #endif
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.22
  ViewVC Help
Powered by ViewVC 1.1.22