Mercurial > fem-fenics-eugenio
comparison inst/private/check_mf_files.m @ 261:f22588ae37af
Improve template meshfunction implementation
* inst/import_meshfunction_type.m: provide to the auxiliary functions a type name and
a valid identifier
* inst/private/generate_mf_*.m: add space before closing angle bracket to avoid parse
errors
| author | Eugenio Gianniti <eugenio.gianniti@mail.polimi.it> |
|---|---|
| date | Thu, 07 Aug 2014 11:13:54 +0200 |
| parents | 1e2a9be8083a |
| children |
comparison
equal
deleted
inserted
replaced
| 260:1e2a9be8083a | 261:f22588ae37af |
|---|---|
| 16 | 16 |
| 17 ## -*- texinfo -*- | 17 ## -*- texinfo -*- |
| 18 ## function for internal usage only | 18 ## function for internal usage only |
| 19 ## @end deftypefn | 19 ## @end deftypefn |
| 20 | 20 |
| 21 function found = check_mf_files (typename) | 21 function found = check_mf_files (label) |
| 22 if (! ischar (typename)) | 22 if (! ischar (label)) |
| 23 error ("check_mf_files: invalid argument"); | 23 error ("check_mf_files: invalid argument"); |
| 24 endif | 24 endif |
| 25 | 25 |
| 26 [~, err, ~] = stat (["MeshFunction_", typename, ".oct"]); | 26 [~, err, ~] = stat (["MeshFunction_", label, ".oct"]); |
| 27 read = (err == 0); | 27 read = (err == 0); |
| 28 [~, err, ~] = stat (["@meshfunction_", typename, "/save.oct"]); | 28 [~, err, ~] = stat (["@meshfunction_", label, "/save.oct"]); |
| 29 write = (err == 0); | 29 write = (err == 0); |
| 30 | 30 |
| 31 found = read && write; | 31 found = read && write; |
| 32 endfunction | 32 endfunction |