Changeset 2628

Timestamp:

11/09/09 11:58:42 (15 years ago)

Author:

Mathieu Morlighem

Message:

Added test in load model: Check that the model is readable

File:

• issm/trunk/src/m/utils/Model/loadmodel.m (modified) (1 diff)

issm/trunk/src/m/utils/Model/loadmodel.m

@@ -8 +8 @@
 %      loadmodel path
 
-%some checks
+%check nargout
 if nargout>1,
         error('loadmodel usage error: md=loadmodel(path)');
 end
+%check existence
 if ~exist(path)
         error(['loadmodel error message: file ' path ' does not exist']);
 end
+%check that the file is readable
+[stat,mess]=fileattrib('larsenc8.model');
+if( stat==0 | mess.UserRead~=1),
+        error(['loadmodel error message: file ' path ' is not readable (permission dinied).']);
+end
+%check number of variables
 if length(whos('-file',path))>1,
         error(['loadmodel error message: file ' path ' contains several variables. Only one model should be present.']);