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

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

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

revision 1.10 by heimbach, Tue Jun 24 16:06:31 2003 UTC revision 1.36 by heimbach, Fri Jun 1 23:30:16 2007 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3  c  c
4  c     store directives for checkpoint level 3  c     store directives for checkpoint level 4
5  c  c
6  c     created: heimbach@mit.edu 10-Jan-2002  c     created: heimbach@mit.edu 10-Jan-2002
7  c  c
 CADJ STORE gsnm1     = tapelev3, key = ilev_3  
 CADJ STORE gtnm1     = tapelev3, key = ilev_3  
 CADJ STORE gunm1     = tapelev3, key = ilev_3  
 CADJ STORE gvnm1     = tapelev3, key = ilev_3  
 CADJ STORE theta     = tapelev3, key = ilev_3  
 CADJ STORE salt      = tapelev3, key = ilev_3  
 CADJ STORE uvel      = tapelev3, key = ilev_3  
 CADJ STORE vvel      = tapelev3, key = ilev_3  
 CADJ STORE wvel      = tapelev3, key = ilev_3  
 CADJ STORE etan      = tapelev3, key = ilev_3  
 CADJ STORE gu        = tapelev3, key = ilev_3  
 CADJ STORE gv        = tapelev3, key = ilev_3  
 CADJ STORE totphihyd = tapelev3, key = ilev_3  
 CADJ STORE empmr     = tapelev3, key = ilev_3  
   
 #ifdef INCLUDE_CD_CODE  
 CADJ STORE uveld     = tapelev3, key = ilev_3  
 CADJ STORE vveld     = tapelev3, key = ilev_3  
 CADJ STORE etanm1    = tapelev3, key = ilev_3  
 CADJ STORE unm1      = tapelev3, key = ilev_3  
 CADJ STORE vnm1      = tapelev3, key = ilev_3  
 #endif /* INCLUDE_CD_CODE */  
8    
9  #ifdef ALLOW_PASSIVE_TRACER  CADJ STORE StoreDynVars3D     = tapelev3, key = ilev_3
10  CADJ STORE tr1       = tapelev3, key = ilev_3  CADJ STORE StoreDynVars2D     = tapelev3, key = ilev_3
11  CADJ STORE gtr1nm1   = tapelev3, key = ilev_3  cnewCADJ STORE ivdconvcount       = tapelevx, key = ilev_x
 #endif /* ALLOW_PASSIVE_TRACER */  
12    
13  #ifdef EXACT_CONSERV  #ifdef EXACT_CONSERV
14  CADJ STORE etaH      = tapelev3, key = ilev_3  cphCADJ STORE hDivFlow  = tapelev3, key = ilev_3
 CADJ STORE hDivFlow  = tapelev3, key = ilev_3  
15  #endif /* EXACT_CONSERV */  #endif /* EXACT_CONSERV */
16    
17  #ifdef INCLUDE_EXTERNAL_FORCING_PACKAGE  #ifdef ALLOW_PASSIVE_TRACER
18  # ifdef ALLOW_ATM_TEMP  CADJ STORE tr1       = tapelev3, key = ilev_3
19  CADJ STORE aqh0      = tapelev3, key = ilev_3  CADJ STORE gtr1nm1   = tapelev3, key = ilev_3
20  CADJ STORE aqh1      = tapelev3, key = ilev_3  #endif /* ALLOW_PASSIVE_TRACER */
 CADJ STORE atemp0    = tapelev3, key = ilev_3  
 CADJ STORE atemp1    = tapelev3, key = ilev_3  
 CADJ STORE precip0   = tapelev3, key = ilev_3  
 CADJ STORE precip1   = tapelev3, key = ilev_3  
 CADJ STORE lwflux0   = tapelev3, key = ilev_3  
 CADJ STORE lwflux1   = tapelev3, key = ilev_3  
 CADJ STORE swflux0   = tapelev3, key = ilev_3  
 CADJ STORE swflux1   = tapelev3, key = ilev_3  
 #  ifdef EXF_READ_EVAP  
 CADJ STORE evap0     = tapelev3, key = ilev_3  
 CADJ STORE evap1     = tapelev3, key = ilev_3  
 #  else  
 CADJ STORE evap      = tapelev3, key = ilev_3  
 #  endif  
 #  ifdef ALLOW_DOWNWARD_RADIATION  
 CADJ STORE swdown0   = tapelev3, key = ilev_3  
 CADJ STORE swdown1   = tapelev3, key = ilev_3  
 CADJ STORE lwdown0   = tapelev3, key = ilev_3  
 CADJ STORE lwdown1   = tapelev3, key = ilev_3  
 #  endif  
 # else  
 CADJ STORE hflux0    = tapelev3, key = ilev_3  
 CADJ STORE hflux1    = tapelev3, key = ilev_3  
 CADJ STORE sflux0    = tapelev3, key = ilev_3  
 CADJ STORE sflux1    = tapelev3, key = ilev_3  
 #  ifdef SHORTWAVE_HEATING  
 CADJ STORE swflux0   = tapelev3, key = ilev_3  
 CADJ STORE swflux1   = tapelev3, key = ilev_3  
 #  endif  
 # endif /* ALLOW_ATM_TEMP */  
 # ifdef ALLOW_ATM_WIND  
 CADJ STORE uwind0    = tapelev3, key = ilev_3  
 CADJ STORE uwind1    = tapelev3, key = ilev_3  
 CADJ STORE vwind0    = tapelev3, key = ilev_3  
 CADJ STORE vwind1    = tapelev3, key = ilev_3  
 # else  
 CADJ STORE ustress0  = tapelev3, key = ilev_3  
 CADJ STORE ustress1  = tapelev3, key = ilev_3  
 CADJ STORE vstress0  = tapelev3, key = ilev_3  
 CADJ STORE vstress1  = tapelev3, key = ilev_3  
 # endif  /* ALLOW_ATM_WIND */  
 # ifdef ALLOW_CLIMSSS_RELAXATION  
 CADJ STORE climsss0   = tapelev3, key = ilev_3  
 CADJ STORE climsss1   = tapelev3, key = ilev_3  
 # endif  
 #ifdef ALLOW_CLIMSST_RELAXATION  
 CADJ STORE climsst0   = tapelev3, key = ilev_3  
 CADJ STORE climsst1   = tapelev3, key = ilev_3  
 # endif  
 #ifdef ALLOW_CLIMSALT_RELAXATION  
 cph not used so far  
 cphCADJ STORE climsalt0  = tapelev3, key = ilev_3  
 cphCADJ STORE climsalt1  = tapelev3, key = ilev_3  
 # endif  
 #ifdef ALLOW_CLIMTEMP_RELAXATION  
 cph not used so far  
 cphCADJ STORE climtemp0  = tapelev3, key = ilev_3  
 cphCADJ STORE climtemp1  = tapelev3, key = ilev_3  
 # endif  
 # ifdef ATMOSPHERIC_LOADING  
 CADJ STORE apressure0    = tapelev3, key = ilev_3  
 CADJ STORE apressure1    = tapelev3, key = ilev_3  
 # endif  
   
 # ifdef ALLOW_HFLUX_CONTROL  
 CADJ STORE xx_hflux0     = tapelev3, key = ilev_3  
 CADJ STORE xx_hflux1     = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_SFLUX_CONTROL  
 CADJ STORE xx_sflux0     = tapelev3, key = ilev_3  
 CADJ STORE xx_sflux1     = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_USTRESS_CONTROL  
 CADJ STORE xx_tauu0      = tapelev3, key = ilev_3  
 CADJ STORE xx_tauu1      = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_VSTRESS_CONTROL  
 CADJ STORE xx_tauv0      = tapelev3, key = ilev_3  
 CADJ STORE xx_tauv1      = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_UWIND_CONTROL  
 CADJ STORE xx_uwind0     = tapelev3, key = ilev_3  
 CADJ STORE xx_uwind1     = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_VWIND_CONTROL  
 CADJ STORE xx_vwind0     = tapelev3, key = ilev_3  
 CADJ STORE xx_vwind1     = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_ATEMP_CONTROL  
 CADJ STORE xx_atemp0     = tapelev3, key = ilev_3  
 CADJ STORE xx_atemp1     = tapelev3, key = ilev_3  
 # endif  
 # ifdef ALLOW_AQH_CONTROL  
 CADJ STORE xx_aqh0       = tapelev3, key = ilev_3  
 CADJ STORE xx_aqh1       = tapelev3, key = ilev_3  
 # endif  
21    
22  #else /* INCLUDE_EXTERNAL_FORCING_PACKAGE undef */  #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  CADJ STORE taux0   = tapelev3, key = ilev_3  #ifdef ALLOW_PTRACERS
53  CADJ STORE taux1   = tapelev3, key = ilev_3  # include "ptracers_ad_check_lev3_dir.h"
 CADJ STORE tauy0   = tapelev3, key = ilev_3  
 CADJ STORE tauy1   = tapelev3, key = ilev_3  
 CADJ STORE Qnet0   = tapelev3, key = ilev_3  
 CADJ STORE Qnet1   = tapelev3, key = ilev_3  
 CADJ STORE EmPmR0  = tapelev3, key = ilev_3  
 CADJ STORE EmPmR1  = tapelev3, key = ilev_3  
 CADJ STORE SST0    = tapelev3, key = ilev_3  
 CADJ STORE SST1    = tapelev3, key = ilev_3  
 CADJ STORE SSS0    = tapelev3, key = ilev_3  
 CADJ STORE SSS1    = tapelev3, key = ilev_3  
 #ifdef SHORTWAVE_HEATING  
 CADJ STORE Qsw0    = tapelev3, key = ilev_3  
 CADJ STORE Qsw1    = tapelev3, key = ilev_3  
 #endif  
 #ifdef ATMOSPHERIC_LOADING  
 CADJ STORE pload0  = tapelev3, key = ilev_3  
 CADJ STORE pload1  = tapelev3, key = ilev_3  
54  #endif  #endif
55    
 #endif /* INCLUDE_EXTERNAL_FORCING_PACKAGE */  
   
56  #ifdef ALLOW_OBCS  #ifdef ALLOW_OBCS
57    # include "obcs_ad_check_lev3_dir.h"
58    #endif  /* ALLOW_OBCS */
59    
60  CADJ STORE shiftvel = tapelev3, key = ilev_3  #ifdef ALLOW_SEAICE
61    # include "seaice_ad_check_lev3_dir.h"
62    #endif /* ALLOW_SEAICE */
63    
64  #ifdef ALLOW_OBCS_NORTH  #ifdef ALLOW_THSICE
65  CADJ STORE OBNt     = tapelev3, key = ilev_3  # include "thsice_ad_check_lev3_dir.h"
66  CADJ STORE OBNs     = tapelev3, key = ilev_3  #endif /* ALLOW_THSICE */
67  CADJ STORE OBNu0    = tapelev3, key = ilev_3  
68  CADJ STORE OBNv0    = tapelev3, key = ilev_3  #ifdef ALLOW_RBCS
69  CADJ STORE OBNt0    = tapelev3, key = ilev_3  # include "rbcs_ad_check_lev3_dir.h"
70  CADJ STORE OBNs0    = tapelev3, key = ilev_3  #endif /* ALLOW_rbcs */
71  CADJ STORE OBNu1    = tapelev3, key = ilev_3  
72  CADJ STORE OBNv1    = tapelev3, key = ilev_3  #ifdef ALLOW_EBM
73  CADJ STORE OBNt1    = tapelev3, key = ilev_3  CADJ STORE fu    = tapelev3, key = ilev_3
74  CADJ STORE OBNs1    = tapelev3, key = ilev_3  CADJ STORE fv    = tapelev3, key = ilev_3
75  #ifdef ALLOW_OBCSN_CONTROL  CADJ STORE qnet  = tapelev3, key = ilev_3
76  CADJ STORE xx_obcsn0      = tapelev3, key = ilev_3  CADJ STORE qsw   = tapelev3, key = ilev_3
77  CADJ STORE xx_obcsn1      = tapelev3, key = ilev_3  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  #endif
 #endif /* ALLOW_OBCS_NORTH */  
 #ifdef ALLOW_OBCS_SOUTH  
 CADJ STORE OBSt     = tapelev3, key = ilev_3  
 CADJ STORE OBSs     = tapelev3, key = ilev_3  
 CADJ STORE OBSu0    = tapelev3, key = ilev_3  
 CADJ STORE OBSv0    = tapelev3, key = ilev_3  
 CADJ STORE OBSt0    = tapelev3, key = ilev_3  
 CADJ STORE OBSs0    = tapelev3, key = ilev_3  
 CADJ STORE OBSu1    = tapelev3, key = ilev_3  
 CADJ STORE OBSv1    = tapelev3, key = ilev_3  
 CADJ STORE OBSt1    = tapelev3, key = ilev_3  
 CADJ STORE OBSs1    = tapelev3, key = ilev_3  
 #ifdef ALLOW_OBCSS_CONTROL  
 CADJ STORE xx_obcss0      = tapelev3, key = ilev_3  
 CADJ STORE xx_obcss1      = tapelev3, key = ilev_3  
 #endif  
 #endif /* ALLOW_OBCS_SOUTH */  
 #ifdef ALLOW_OBCS_EAST  
 CADJ STORE OBEt     = tapelev3, key = ilev_3  
 CADJ STORE OBEs     = tapelev3, key = ilev_3  
 CADJ STORE OBEu0    = tapelev3, key = ilev_3  
 CADJ STORE OBEv0    = tapelev3, key = ilev_3  
 CADJ STORE OBEt0    = tapelev3, key = ilev_3  
 CADJ STORE OBEs0    = tapelev3, key = ilev_3  
 CADJ STORE OBEu1    = tapelev3, key = ilev_3  
 CADJ STORE OBEv1    = tapelev3, key = ilev_3  
 CADJ STORE OBEt1    = tapelev3, key = ilev_3  
 CADJ STORE OBEs1    = tapelev3, key = ilev_3  
 #ifdef ALLOW_OBCSE_CONTROL  
 CADJ STORE xx_obcse0      = tapelev3, key = ilev_3  
 CADJ STORE xx_obcse1      = tapelev3, key = ilev_3  
 #endif  
 #endif /* ALLOW_OBCS_EAST */  
 #ifdef ALLOW_OBCS_WEST  
 CADJ STORE OBWt     = tapelev3, key = ilev_3  
 CADJ STORE OBWs     = tapelev3, key = ilev_3  
 CADJ STORE OBWu0    = tapelev3, key = ilev_3  
 CADJ STORE OBWv0    = tapelev3, key = ilev_3  
 CADJ STORE OBWt0    = tapelev3, key = ilev_3  
 CADJ STORE OBWs0    = tapelev3, key = ilev_3  
 CADJ STORE OBWu1    = tapelev3, key = ilev_3  
 CADJ STORE OBWv1    = tapelev3, key = ilev_3  
 CADJ STORE OBWt1    = tapelev3, key = ilev_3  
 CADJ STORE OBWs1    = tapelev3, key = ilev_3  
 #ifdef ALLOW_OBCSW_CONTROL  
 CADJ STORE xx_obcsw0      = tapelev3, key = ilev_3  
 CADJ STORE xx_obcsw1      = tapelev3, key = ilev_3  
 #endif  
 #endif /* ALLOW_OBCS_WEST */  
89    
90  #endif  /* ALLOW_OBCS */  #ifdef ALLOW_COST_TRACER
91    CADJ STORE objf_tracer = tapelev3, key = ilev_3
92    #endif
93    
94  #ifdef ALLOW_SEAICE  #ifdef ALLOW_COST_TRANSPORT
95  CADJ STORE area     = tapelev3, key = ilev_3  CADJ STORE objf_transport = tapelev3, key = ilev_3
96  CADJ STORE heff     = tapelev3, key = ilev_3  #endif
 CADJ STORE hsnow    = tapelev3, key = ilev_3  
 CADJ STORE tice     = tapelev3, key = ilev_3  
 CADJ STORE runoff   = tapelev3, key = ilev_3  
 # ifdef SEAICE_ALLOW_DYNAMICS  
 CADJ STORE uice     = tapelev3, key = ilev_3  
 CADJ STORE vice     = tapelev3, key = ilev_3  
 # endif  
 #endif /* ALLOW_SEAICE */  
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.36
  ViewVC Help
Powered by ViewVC 1.1.22