/[MITgcm]/MITgcm_contrib/verification_other/shelfice_remeshing/code/SHELFICE.h

Diff of /MITgcm_contrib/verification_other/shelfice_remeshing/code/SHELFICE.h

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

-revision 1.4 by dgoldberg,
Mon Jan 25 14:07:12 2016 UTC
+revision 1.8 by dgoldberg,
Wed Jul  6 18:03:40 2016 UTC
 Line 18 
 C
  C--   Constants that can be set in data.shelfice
  C     SHELFICEtopoFile         :: File containing the topography of the
  C                                 shelfice draught (unit=m)
- C     SHELFICEGroundTopoFile   :: File containing the topography of "grounded"
- c                                 ice (unit=m)
  C     SHELFICEmassFile         :: name of shelfice Mass file
- C     SHELFICEGroundInitFile   :: name of GroundingMass file, equivalent to justC                                 float ice at GroundTopo level
  C     SHELFICEloadAnomalyFile  :: name of shelfice load anomaly file
  C     SHELFICEMassDynTendFile  :: file name for other mass tendency
  C                                 (e.g. dynamics)
-Line 35 
 C     SHELFICEDynMassOnly      :: step i
+Line 32 
 C     SHELFICEDynMassOnly      :: step i
  C                                 (not melting/freezing) def: F
  C     SHELFICEboundaryLayer    :: turn on vertical merging of cells to for a
  C                                 boundary layer of drF thickness, def: F
- C     SHELFICEthickboundaryLayer
- C                              :: similar to boundary layer but allow for a thicker
- C                                 layer, encompassing 3 cells in vertical, def: F
  C     SHELFICErealFWflux       :: ensure vert advective flux at bdry uses top cell
  C                                 value rather than "boundary layer" value   F
  C     SHELFICEadvDiffHeatFlux  :: use advective-diffusive heat flux into the
-Line 87 
 C
+Line 81 
 C
  C--   Fields
  C     ktopC                  :: index of the top "wet cell" (2D)
  C     R_shelfIce             :: shelfice topography [m]
- C     R_Grounding            :: "grounded" ice topography [m]
  C     shelficeMassInit       :: ice-shelf mass (per unit area) (kg/m^2)
  C     shelficeMass           :: ice-shelf mass (per unit area) (kg/m^2)
  C     shelfIceMassDynTendency :: other mass balance tendency  (kg/m^2/s)
-Line 100 
 C     shelficeForcingT       :: analogue
+Line 93 
 C     shelficeForcingT       :: analogue
  C                               units are  r_unit.Kelvin/s (=Kelvin.m/s if r=z)
  C     shelficeForcingS       :: analogue of surfaceForcingS
  C                               units are  r_unit.psu/s (=psu.m/s if r=z)
+ C     conserve_ssh           :: KS16. Use the obcs to conserve net open
+ C                               ocean eta to 0m
  C-----------------------------------------------------------------------
  C \ev
  CEOP
-Line 133 
 CEOP
+Line 128 
 CEOP
        _RL rhoShelfice
        _RL SHELFICEkappa
        _RL SHELFICEDragLinear
-       _RL SHELFICEDragQuadratic, SHELFICEMergeThreshold
+       _RL SHELFICEDragQuadratic
+       _RL SHELFICEMergeThreshold
        _RL SHELFICEthetaSurface, SHELFICESplitThreshold
-       _RL shiCdrag, shiZetaN, shiRc, SHELFICERemeshFrequency
+       _RL shiCdrag, shiZetaN, shiRc
+       _RL SHELFICERemeshFrequency
        _RL shiPrandtl, shiSchmidt, shiKinVisc
        _RL SHELFICEGroundW, SHELFICEGroundC, shelficeEtaRelax
        COMMON /SHELFICE_FIELDS_RL/
-      &     shelficeMass, shelficeMassInit, shelficeGroundInit,
+      &     shelficeMass, shelficeMassInit,
       &     shelficeLoadAnomaly,
       &     shelficeForcingT, shelficeForcingS,
       &     shiTransCoeffT, shiTransCoeffS, EFFMASS
        _RL shelficeMass          (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RL shelficeMassInit      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
-       _RL shelficeGroundInit    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RL shelficeLoadAnomaly   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RL shelficeForcingT      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RL shelficeForcingS      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
-Line 155 
 CEOP
+Line 151 
 CEOP
        _RL SeaLevelRestore       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        COMMON /SHELFICE_FIELDS_RS/
-      &     R_shelfIce,
+      &     R_shelfIce, R_MWCT,
-      &     R_Grounding,
       &     shelficeHeatFlux,
       &     shelfIceFreshWaterFlux,
       &     shelfIceMassDynTendency
        _RS R_shelfIce            (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
-       _RS R_Grounding           (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
+       _RS R_MWCT                (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RS shelficeHeatFlux      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RS shelficeFreshWaterFlux(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
        _RS
-Line 189 
 CEOP
+Line 184 
 CEOP
        LOGICAL SHELFICEMassStepping
        LOGICAL SHELFICEDynMassOnly
        LOGICAL SHELFICEEtaSponge
+       LOGICAL SHELFICE_dig_ice
+       LOGICAL SHELFICE_massmin_truedens
+ C   KS16 put var here
+       LOGICAL conserve_ssh
        COMMON /SHELFICE_PARMS_L/
       &     SHELFICEisOn,
       &     useISOMIPTD,
-Line 206 
 CEOP
+Line 205 
 CEOP
       &     SHELFICEuseGammaFrict,
       &     SHELFICEMassStepping,
       &     SHELFICEDynMassOnly,
-      &     SHELFICEEtaSponge
+      &     SHELFICEEtaSponge,
+      &     SHELFICE_dig_ice,
+      &     SHELFICE_massmin_truedens,
+ C  KS16 and here;
+      &     conserve_ssh
        CHARACTER*(MAX_LEN_FNAM) SHELFICEloadAnomalyFile
        CHARACTER*(MAX_LEN_FNAM) SHELFICEmassFile

 Legend:



Removed from v.1.4
 


changed lines


 
Added in v.1.8
 Legend:



Removed from v.1.4
 


changed lines


 
Added in v.1.8
-Removed from v.1.4
+Added in v.1.8

	ViewVC Help
Powered by ViewVC 1.1.22