/[MITgcm]/MITgcm_contrib/torge/itd/code/SEAICE_PARAMS.h

Diff of /MITgcm_contrib/torge/itd/code/SEAICE_PARAMS.h

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

-revision 1.1 by dimitri,
Fri Apr 27 22:22:17 2012 UTC
+revision 1.2 by dimitri,
Fri Apr 27 22:25:23 2012 UTC
 Line 276 
 C     SEAICEdiffKhSnow   :: sets the dif
  C     SEAICEdiffKhSalt   :: sets the diffusivity for sea ice salinity (m^2/s)
  C     SEAICE_airTurnAngle   :: turning angles of air-ice interfacial stress
  C     SEAICE_waterTurnAngle :: and ice-water interfacial stress (in degrees)
+ C     SEAICE_tauAreaObsRelax :: Timescale of relaxation to observed
+ C                               sea ice concentration (s), default=unset
  C
        _RL SEAICE_deltaTtherm, SEAICE_deltaTdyn, SEAICE_deltaTevp
        _RL SEAICE_monFreq, SEAICE_dumpFreq, SEAICE_taveFreq
-Line 308 
 C
+Line 310 
 C
        _RL SEAICE_evpDampC, SEAICE_zetaMin, SEAICE_zetaMaxFac
        _RL SEAICEdiffKhArea, SEAICEdiffKhHeff, SEAICEdiffKhSnow
        _RL SEAICEdiffKhSalt
+       _RL SEAICE_tauAreaObsRelax
        COMMON /SEAICE_PARM_RL/
       &    SEAICE_deltaTtherm, SEAICE_deltaTdyn,
-Line 338 
 C
+Line 341 
 C
       &    SEAICE_area_reg, SEAICE_hice_reg,
       &    SEAICE_area_floor, SEAICE_area_max,
       &    SEAICEdiffKhArea, SEAICEdiffKhHeff, SEAICEdiffKhSnow,
-      &    SEAICEdiffKhSalt,
+      &    SEAICEdiffKhSalt, SEAICE_tauAreaObsRelax,
       &    SEAICE_airTurnAngle, SEAICE_waterTurnAngle
  C--   COMMON /SEAICE_BOUND_RL/ Various bounding values
-Line 348 
 C     MIN_LWDOWN        :: minimum downw
+Line 351 
 C     MIN_LWDOWN        :: minimum downw
  C     MIN_TICE          :: minimum ice temperature   (deg C)
  C     SEAICE_EPS        :: small number used to reduce derivative singularities
  C     SEAICE_EPS_SQ     :: small number square
+ CToM<<<
+ C     Hlimit            :: ice thickness category limits (m), array of size nITD+1
+ C     Hlimit_c1,_c2,_c3 :: coefficients set in seaice_readparams.F to calculate Hlimit in seaice_init_fixed.F
+ C>>>ToM
  C
        _RL MAX_HEFF, MIN_ATEMP, MIN_LWDOWN, MIN_TICE
        _RL SEAICE_EPS, SEAICE_EPS_SQ
+ CToM<<<
+       _RL Hlimit(0:nITD)
+       _RL Hlimit_c1, Hlimit_c2, Hlimit_c3
+ C>>>ToM
        COMMON /SEAICE_BOUND_RL/
       &     MAX_HEFF, MIN_ATEMP, MIN_LWDOWN, MIN_TICE,
-      &     SEAICE_EPS, SEAICE_EPS_SQ
+ CToM<<<
+ C     &     SEAICE_EPS, SEAICE_EPS_SQ
+      &     SEAICE_EPS, SEAICE_EPS_SQ,
+      &     Hlimit,
+      &     Hlimit_c1,Hlimit_c2,Hlimit_c3
+ C>>>ToM
  C--   Constants used by sea-ice model
        _RL         ZERO           , ONE           , TWO

 Legend:



Removed from v.1.1
 


changed lines


 
Added in v.1.2
 Legend:



Removed from v.1.1
 


changed lines


 
Added in v.1.2
-Removed from v.1.1
+Added in v.1.2

	ViewVC Help
Powered by ViewVC 1.1.22