/[MITgcm]/MITgcm_contrib/ksnow/press_release/code_expt/SHELFICE.h
ViewVC logotype

Diff of /MITgcm_contrib/ksnow/press_release/code_expt/SHELFICE.h

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

revision 1.1 by ksnow, Fri Dec 16 15:25:29 2016 UTC revision 1.5 by dgoldberg, Fri Nov 17 16:26:52 2017 UTC
# Line 19  C--   Constants that can be set in data. Line 19  C--   Constants that can be set in data.
19  C     SHELFICEtopoFile         :: File containing the topography of the  C     SHELFICEtopoFile         :: File containing the topography of the
20  C                                 shelfice draught (unit=m)  C                                 shelfice draught (unit=m)
21  C     SHELFICEmassFile         :: name of shelfice Mass file  C     SHELFICEmassFile         :: name of shelfice Mass file
 C     SHELFICEmassForcingFile  :: name of time-dependent shelfice Mass file  
22  C     SHELFICEloadAnomalyFile  :: name of shelfice load anomaly file  C     SHELFICEloadAnomalyFile  :: name of shelfice load anomaly file
23  C     SHELFICEMassDynTendFile  :: file name for other mass tendency  C     SHELFICEMassDynTendFile  :: file name for other mass tendency
24  C                                 (e.g. dynamics)  C                                 (e.g. dynamics)
# Line 78  C     SHELFICE_dump_mnc        :: use ne Line 77  C     SHELFICE_dump_mnc        :: use ne
77  C     SHELFICE_tave_mnc        :: use netcdf for time-averaged output  C     SHELFICE_tave_mnc        :: use netcdf for time-averaged output
78  C     SHELFICE_dumpFreq        :: analoguous to dumpFreq (= default)  C     SHELFICE_dumpFreq        :: analoguous to dumpFreq (= default)
79  C     SHELFICE_taveFreq        :: analoguous to taveFreq (= default)  C     SHELFICE_taveFreq        :: analoguous to taveFreq (= default)
 C     conserve_ssh             :: KS16. Use the obcs to conserve net open  
 C                                 ocean eta to 0m  
 C     useshelficemassforcing   :: flag to update shelficemass from file  
 C     shelfice_forcing_period  :: freq of update of mass from file  
80  C  C
81  C--   Fields  C--   Fields
82  C     ktopC                  :: index of the top "wet cell" (2D)  C     ktopC                  :: index of the top "wet cell" (2D)
# Line 98  C     shelficeForcingT       :: analogue Line 93  C     shelficeForcingT       :: analogue
93  C                               units are  r_unit.Kelvin/s (=Kelvin.m/s if r=z)  C                               units are  r_unit.Kelvin/s (=Kelvin.m/s if r=z)
94  C     shelficeForcingS       :: analogue of surfaceForcingS  C     shelficeForcingS       :: analogue of surfaceForcingS
95  C                               units are  r_unit.psu/s (=psu.m/s if r=z)  C                               units are  r_unit.psu/s (=psu.m/s if r=z)
96  C  C     conserve_ssh           :: KS16. Use the obcs to conserve net open
97  C  C                               ocean eta to 0m
98  C-----------------------------------------------------------------------  C-----------------------------------------------------------------------
99  C \ev  C \ev
100  CEOP  CEOP
# Line 125  CEOP Line 120  CEOP
120       &     SHELFICESplitThreshold,       &     SHELFICESplitThreshold,
121       &     SHELFICEMergeThreshold,       &     SHELFICEMergeThreshold,
122       &     shelficeEtaRelax,       &     shelficeEtaRelax,
123       &     shelfice_forcing_period       &     depthMinMelt
124        _RL SHELFICE_dumpFreq, SHELFICE_taveFreq        _RL SHELFICE_dumpFreq, SHELFICE_taveFreq
125        _RL SHELFICEheatTransCoeff        _RL SHELFICEheatTransCoeff
126        _RL SHELFICEsaltTransCoeff        _RL SHELFICEsaltTransCoeff
# Line 141  CEOP Line 136  CEOP
136        _RL SHELFICERemeshFrequency        _RL SHELFICERemeshFrequency
137        _RL shiPrandtl, shiSchmidt, shiKinVisc        _RL shiPrandtl, shiSchmidt, shiKinVisc
138        _RL SHELFICEGroundW, SHELFICEGroundC, shelficeEtaRelax        _RL SHELFICEGroundW, SHELFICEGroundC, shelficeEtaRelax
139        _RL shelfice_forcing_period        _RL depthMinMelt
         
140        COMMON /SHELFICE_FIELDS_RL/        COMMON /SHELFICE_FIELDS_RL/
141       &     shelficeMass, shelficeMassInit,       &     shelficeMass, shelficeMassInit,
142       &     shelficeLoadAnomaly,       &     shelficeLoadAnomaly,
143       &     shelficeForcingT, shelficeForcingS,       &     shelficeForcingT, shelficeForcingS,
144       &     shiTransCoeffT, shiTransCoeffS, EFFMASS       &     shiTransCoeffT, shiTransCoeffS, EFFMASS
   
145        _RL shelficeMass          (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL shelficeMass          (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
146        _RL shelficeMassInit      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL shelficeMassInit      (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
147        _RL shelficeLoadAnomaly   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL shelficeLoadAnomaly   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
# Line 164  CEOP Line 157  CEOP
157       &     shelficeHeatFlux,       &     shelficeHeatFlux,
158       &     shelfIceFreshWaterFlux,       &     shelfIceFreshWaterFlux,
159       &     shelfIceMassDynTendency       &     shelfIceMassDynTendency
160         &     , phiHydC_m
161  #ifdef ALLOW_SHELFICE_GROUNDED_ICE  #ifdef ALLOW_SHELFICE_GROUNDED_ICE
162       &     , GrdFactor       &     , GrdFactor
163  #endif  #endif
# Line 177  CEOP Line 171  CEOP
171  #ifdef ALLOW_SHELFICE_GROUNDED_ICE  #ifdef ALLOW_SHELFICE_GROUNDED_ICE
172        _RS GrdFactor             (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS GrdFactor             (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
173  #endif  #endif
174          _RL phiHydC_m             (nR)
175    
176  #ifdef ALLOW_SHIFWFLX_CONTROL  #ifdef ALLOW_SHIFWFLX_CONTROL
177        COMMON /SHELFICE_MASKS_CTRL/ maskSHI        COMMON /SHELFICE_MASKS_CTRL/ maskSHI
# Line 202  CEOP Line 197  CEOP
197        LOGICAL SHELFICEEtaSponge        LOGICAL SHELFICEEtaSponge
198        LOGICAL SHELFICE_dig_ice        LOGICAL SHELFICE_dig_ice
199        LOGICAL SHELFICE_massmin_truedens        LOGICAL SHELFICE_massmin_truedens
       LOGICAL SHELFICEusemassforcing  
200  C   KS16 put var here  C   KS16 put var here
201        LOGICAL conserve_ssh        LOGICAL conserve_ssh
202        COMMON /SHELFICE_PARMS_L/        COMMON /SHELFICE_PARMS_L/
# Line 224  C   KS16 put var here Line 218  C   KS16 put var here
218       &     SHELFICEDynMassOnly,       &     SHELFICEDynMassOnly,
219       &     SHELFICEEtaSponge,       &     SHELFICEEtaSponge,
220       &     SHELFICE_dig_ice,       &     SHELFICE_dig_ice,
221       &     SHELFICE_massmin_truedens,         &     SHELFICE_massmin_truedens,
      &     SHELFICEusemassforcing,  
222  C  KS16 and here;  C  KS16 and here;
223       &     conserve_ssh       &     conserve_ssh
224    
# Line 236  C  KS16 and here; Line 229  C  KS16 and here;
229        CHARACTER*(MAX_LEN_FNAM) SHELFICEMassDynTendFile        CHARACTER*(MAX_LEN_FNAM) SHELFICEMassDynTendFile
230        CHARACTER*(MAX_LEN_FNAM) SHELFICEGroundInitFile        CHARACTER*(MAX_LEN_FNAM) SHELFICEGroundInitFile
231        CHARACTER*(MAX_LEN_FNAM) SHELFICETransCoeffTFile        CHARACTER*(MAX_LEN_FNAM) SHELFICETransCoeffTFile
232        CHARACTER*(MAX_LEN_FNAM) SHELFICEmassForcingFile  
233    
234        COMMON /SHELFICE_PARM_C/        COMMON /SHELFICE_PARM_C/
235       &     SHELFICEloadAnomalyFile,       &     SHELFICEloadAnomalyFile,
# Line 245  C  KS16 and here; Line 238  C  KS16 and here;
238       &     SHELFICEGroundTopoFile,       &     SHELFICEGroundTopoFile,
239       &     SHELFICEMassDynTendFile,       &     SHELFICEMassDynTendFile,
240       &     SHELFICEGroundInitFile,       &     SHELFICEGroundInitFile,
241       &     SHELFICETransCoeffTFile,       &     SHELFICETransCoeffTFile
      &     SHELFICEmassForcingFile  
       
       COMMON /SHELFICE_TIMEDEP_FORCE/  
      &     SHELFICEmass1,  
      &     SHELFICEmass0  
       
       _RS SHELFICEmass1       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
       _RS SHELFICEmass0       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  
   
242    
243  #endif /* ALLOW_SHELFICE */  #endif /* ALLOW_SHELFICE */
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22