C $Header: /home/ubuntu/mnt/e9_copy/MITgcm/pkg/autodiff/checkpoint_lev3_directives.h,v 1.59 2013/03/15 13:35:48 heimbach Exp $ C $Name: $ c c store directives for checkpoint level 4 c c created: heimbach@mit.edu 10-Jan-2002 c #ifdef AUTODIFF_USE_OLDSTORE_2D c CADJ STORE etan = tapelev3, key = ilev_3 CADJ STORE surfaceforcingTice = tapelev3, key = ilev_3 CADJ STORE taux0 = tapelev3, key = ilev_3 CADJ STORE taux1 = tapelev3, key = ilev_3 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 CADJ STORE saltflux0 = tapelev3, key = ilev_3 CADJ STORE saltflux1 = 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 #endif #ifdef EXACT_CONSERV CADJ STORE etaH = tapelev3, key = ilev_3 CADJ STORE dEtaHdt = tapelev3, key = ilev_3 CADJ STORE PmEpR = tapelev3, key = ilev_3 #endif c #else /* ndef AUTODIFF_USE_OLDSTORE_2D */ c CADJ STORE StoreDynVars2D = tapelev3, key = ilev_3 c #endif /* AUTODIFF_USE_OLDSTORE_2D */ c #ifdef AUTODIFF_USE_OLDSTORE_3D c CADJ STORE gs = tapelev3, key = ilev_3 CADJ STORE gt = tapelev3, key = ilev_3 #ifdef ALLOW_ADAMSBASHFORTH_3 CADJ STORE gtnm = tapelev3, key = ilev_3 CADJ STORE gsnm = tapelev3, key = ilev_3 CADJ STORE gunm = tapelev3, key = ilev_3 CADJ STORE gvnm = tapelev3, key = ilev_3 #else CADJ STORE gtnm1 = tapelev3, key = ilev_3 CADJ STORE gsnm1 = tapelev3, key = ilev_3 CADJ STORE gunm1 = tapelev3, key = ilev_3 CADJ STORE gvnm1 = tapelev3, key = ilev_3 #endif 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 totphihyd = tapelev3, key = ilev_3 c #else /* ndef AUTODIFF_USE_OLDSTORE_3D */ c CADJ STORE StoreDynVars3D = tapelev3, key = ilev_3 c #endif /* AUTODIFF_USE_OLDSTORE_3D */ CADJ STORE phi0surf = tapelev3, key = ilev_3 CADJ STORE saltflux = tapelev3, key = ilev_3 #ifdef EXACT_CONSERV cphCADJ STORE hDivFlow = tapelev3, key = ilev_3 #endif /* EXACT_CONSERV */ #ifdef ALLOW_PASSIVE_TRACER CADJ STORE tr1 = tapelev3, key = ilev_3 CADJ STORE gtr1nm1 = tapelev3, key = ilev_3 #endif /* ALLOW_PASSIVE_TRACER */ #ifdef NONLIN_FRSURF CADJ STORE hfac_surfc = tapelev3, key = ilev_3 CADJ STORE hfac_surfs = tapelev3, key = ilev_3 CADJ STORE hfac_surfw = tapelev3, key = ilev_3 CADJ STORE hFac_surfNm1C= tapelev3, key = ilev_3 CADJ STORE hFac_surfNm1S= tapelev3, key = ilev_3 CADJ STORE hFac_surfNm1W= tapelev3, key = ilev_3 # ifndef DISABLE_RSTAR_CODE CADJ STORE rstarexpc,rstarexps,rstarexpw CADJ & = tapelev3, key = ilev_3 CADJ STORE rstarfacc,rstarfacs,rstarfacw CADJ & = tapelev3, key = ilev_3 CADJ STORE rStarFacNm1C,rStarFacNm1S,rStarFacNm1W CADJ & = tapelev3, key = ilev_3 CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt CADJ & = tapelev3, key = ilev_3 # endif # ifdef ALLOW_CG2D_NSA CADJ STORE aW2d, aS2d, aC2d = CADJ & tapelev3, key = ilev_3 CADJ STORE pc, ps, pw = CADJ & tapelev3, key = ilev_3 # endif #endif /* NONLIN_FRSURF */ #ifdef ALLOW_CD_CODE # include "cd_code_ad_check_lev3_dir.h" #endif /* ALLOW_CD_CODE */ #ifdef ALLOW_GGL90 # include "ggl90_ad_check_lev3_dir.h" #endif #ifdef ALLOW_ECCO # include "ecco_ad_check_lev3_dir.h" #endif #ifdef ALLOW_EXF # include "exf_ad_check_lev3_dir.h" #endif /* ALLOW_EXF */ #ifdef ALLOW_CTRL # include "ctrl_ad_check_lev3_dir.h" #endif #ifdef ALLOW_PTRACERS # include "ptracers_ad_check_lev3_dir.h" #endif #ifdef ALLOW_OBCS # include "obcs_ad_check_lev3_dir.h" #endif /* ALLOW_OBCS */ #ifdef ALLOW_SALT_PLUME # include "salt_plume_ad_check_lev3_dir.h" #endif #ifdef ALLOW_SEAICE # include "seaice_ad_check_lev3_dir.h" #endif /* ALLOW_SEAICE */ #ifdef ALLOW_THSICE # include "thsice_ad_check_lev3_dir.h" #endif /* ALLOW_THSICE */ #ifdef ALLOW_SHELFICE # include "shelfice_ad_check_lev3_dir.h" #endif /* ALLOW_SHELFICE */ #ifdef ALLOW_STREAMICE # include "streamice_ad_check_lev3_dir.h" #endif /* ALLOW_STREAMICE */ #ifdef ALLOW_RBCS # include "rbcs_ad_check_lev3_dir.h" #endif /* ALLOW_RBCS */ #ifdef ALLOW_OFFLINE # include "offline_ad_check_lev3_dir.h" #endif /* ALLOW_OFFLINE */ #ifdef ALLOW_GCHEM # include "gchem_ad_check_lev3_dir.h" #endif #ifdef ALLOW_CFC # include "cfc_ad_check_lev3_dir.h" #endif #ifdef ALLOW_DIC # include "dic_ad_check_lev3_dir.h" #endif #ifdef ALLOW_GENERIC_ADVDIFF # include "gad_ad_check_lev3_dir.h" #endif #ifdef ALLOW_EBM CADJ STORE fu = tapelev3, key = ilev_3 CADJ STORE fv = tapelev3, key = ilev_3 CADJ STORE qnet = tapelev3, key = ilev_3 CADJ STORE qsw = tapelev3, key = ilev_3 CADJ STORE sss = tapelev3, key = ilev_3 CADJ STORE empmr = tapelev3, key = ilev_3 # include "ebm_ad_check_lev3_dir.h" #endif /* ALLOW_EBM */ #ifdef ALLOW_COST CADJ STORE cMeanTheta = tapelev3, key = ilev_3 CADJ STORE cMeanUVel = tapelev3, key = ilev_3 CADJ STORE cMeanVVel = tapelev3, key = ilev_3 CADJ STORE cMeanThetaUVel = tapelev3, key = ilev_3 CADJ STORE cMeanThetaVVel = tapelev3, key = ilev_3 #endif #ifdef ALLOW_COST_TRACER CADJ STORE objf_tracer = tapelev3, key = ilev_3 #endif #ifdef ALLOW_COST_TRANSPORT CADJ STORE objf_transport = tapelev3, key = ilev_3 #endif #ifdef ALLOW_HFLUXM_CONTROL CADJ STORE qnetm = tapelev3, key = ilev_3 #endif #ifdef ALLOW_SEAICE cph temporary for HD # ifdef ANNUAL_BALANCE CADJ STORE balance_itcount = tapelev3, key = ilev_3 CADJ STORE atmfw_tilesum = tapelev3, key = ilev_3 CADJ STORE qnet_tilesum = tapelev3, key = ilev_3 CADJ STORE empmr_corr = tapelev3, key = ilev_3 CADJ STORE qnet_corr = tapelev3, key = ilev_3 # endif /* ANNUAL_BALANCE */ #endif