Changeset 9827
- Timestamp:
- 09/16/11 16:42:39 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified issm/trunk/src/m/model/petscversion.m ΒΆ
r6860 r9827 16 16 tline=fgets(fid); 17 17 if ~ischar(tline), break, end 18 if length(tline)>=25, 19 if strcmpi(tline(1:23),'#define _PETSC_VERSION_'), 20 PETSC_VERSION=str2num(tline(25)); 21 end 18 if strncmp(tline,'#define _PETSC_MAJOR_',21), 19 PETSC_VERSION=str2num(tline(23)); 22 20 end 23 21 end
Note:
See TracChangeset
for help on using the changeset viewer.