Changeset 1670

Timestamp:

08/13/09 15:16:59 (16 years ago)

Author:

Mathieu Morlighem

Message:

minor

File:

• issm/trunk/src/m/classes/public/ismodelselfconsistent.m (modified) (2 diffs)

issm/trunk/src/m/classes/public/ismodelselfconsistent.m

@@ -11 +11 @@
         error('ismodelselfconsistent error message: wrong usage');
 end
+
+%initialize output
+bool=1;
 
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%   COMMON CHECKS   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -499 +502 @@
 end
 
-%No problems, just return 1;
-bool=1;
-return;
+%ICE and MACAYEAL
+if (strcmpi(package,'ice') | strcmpi(package,'macayeal')),
+
+        if (isnan(md.eps_rel) & isnan(md.eps_abs)),
+                disp(['At least eps_rel must be positive since eps_res not supported by package ' package '!']);
+                bool=0; return;
+        end
+
+end