C $Header: /u/gcmpack/MITgcm/pkg/ecco/ecco_ad_check_lev4_dir.h,v 1.6 2015/08/06 20:33:20 gforget Exp $ C $Name: $ c c store directives for checkpoint level 4 c #ifdef ALLOW_COST_ATLANTIC CADJ STORE theta = tapelev4, key=ilev_4 CADJ STORE vVel = tapelev4, key=ilev_4 # ifdef NONLIN_FRSURF CADJ STORE hFacS = tapelev4, key=ilev_4 # endif #endif #ifdef ALLOW_ECCO_BARSTORES #ifdef ALLOW_ECCO CADJ STORE tbar = tapelev4, key=ilev_4 cccCADJ STORE tbar_daily = tapelev4, key=ilev_4 CADJ STORE sbar = tapelev4, key=ilev_4 cccCADJ STORE sbar_daily = tapelev4, key=ilev_4 CADJ STORE ubar = tapelev4, key=ilev_4 CADJ STORE vbar = tapelev4, key=ilev_4 CADJ STORE wbar = tapelev4, key=ilev_4 CADJ STORE psbar = tapelev4, key=ilev_4 CADJ STORE bpbar = tapelev4, key=ilev_4 CADJ STORE sstbar = tapelev4, key=ilev_4 CADJ STORE xx_tbar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_sbar_mean_dummy = dummytape, key=1, kind=isbyte #ifdef ALLOW_SIGMAR_COST_CONTRIBUTION CADJ STORE xx_sigmaRbar_mean_dummy = dummytape, key=1, kind=isbyte #endif CADJ STORE xx_ubar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_vbar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_wbar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_psbar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_bpbar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_sstbar_mean_dummy = dummytape, key=1, kind=isbyte cccCADJ STORE xx_sssbar_mean_dummy = dummytape, key=1, kind=isbyte #ifdef ALLOW_GENCOST_CONTRIBUTION CADJ STORE gencost_barfld = tapelev4, key=ilev_4 CADJ STORE gencost_dummy = dummytape, key=1, kind=isbyte #endif /* ALLOW_GENCOST_CONTRIBUTION */ #endif /* ALLOW_ECCO */ #ifdef ALLOW_PROFILES CADJ STORE profiles_dummy = dummytape, key=1, kind=isbyte #endif /* ALLOW_PROFILES */ #ifdef ALLOW_SEAICE CADJ STORE smrareabar = tapelev4, key=ilev_4 CADJ STORE smrsstbar = tapelev4, key=ilev_4 CADJ STORE smrsssbar = tapelev4, key=ilev_4 CADJ STORE xx_smrareabar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_smrsstbar_mean_dummy = dummytape, key=1, kind=isbyte CADJ STORE xx_smrsssbar_mean_dummy = dummytape, key=1, kind=isbyte #endif /* ALLOW_SEAICE */ #endif /* ALLOW_ECCO_BARSTORES */