Changeset 16726

Timestamp:

11/12/13 18:04:44 (11 years ago)

Author:

bdef

Message:

NEW: There is now an initial thickness for the EPL

File:

• issm/trunk-jpl/src/m/classes/hydrologydc.m (modified) (5 diffs)

issm/trunk-jpl/src/m/classes/hydrologydc.m

@@ -26 +26 @@
                 epl_compressibility      = 0;
                 epl_porosity             = 0;
-                epl_thickness            = 0;
+                epl_initial_thickness    = 0;
                 epl_conductivity         = 0;
   end
@@ -60 +60 @@
                         obj.epl_compressibility      = 1.0e-08;
                         obj.epl_porosity             = 0.4;
-                        obj.epl_thickness            = 1.0;
+                        obj.epl_initial_thickness    = 1.0;
                         obj.epl_conductivity         = 8.0e-02;
 
@@ -96 +96 @@
                                 md = checkfield(md,'hydrology.epl_compressibility','>',0,'numel',1);
                                 md = checkfield(md,'hydrology.epl_porosity','>',0,'numel',1);
-                                md = checkfield(md,'hydrology.epl_thickness','>',0,'numel',1);
+                                md = checkfield(md,'hydrology.epl_initial_thickness','>',0,'numel',1);
                                 md = checkfield(md,'hydrology.epl_conductivity','>',0,'numel',1);
             end
@@ -137 +137 @@
                                 fielddisplay(obj,'epl_compressibility','epl compressibility [Pa^-1]');
                                 fielddisplay(obj,'epl_porosity','epl [dimensionless]');
-                                fielddisplay(obj,'epl_thickness','epl initial thickness [m]');
+                                fielddisplay(obj,'epl_initial_thickness','epl initial thickness [m]');
                                 fielddisplay(obj,'epl_conductivity','epl conductivity [m^2/s]');
             end
@@ -171 +171 @@
                                 WriteData(fid,'object',obj,'fieldname','epl_compressibility','format','Double');                        
                                 WriteData(fid,'object',obj,'fieldname','epl_porosity','format','Double');                       
-                                WriteData(fid,'object',obj,'fieldname','epl_thickness','format','Double');
-                                %WriteData(fid,'object',obj,'fieldname','epl_transmitivity','format','Double');
+                                WriteData(fid,'object',obj,'fieldname','epl_initial_thickness','format','Double');
                                 WriteData(fid,'object',obj,'fieldname','epl_conductivity','format','Double');
                         end