-
Notifications
You must be signed in to change notification settings - Fork 9
/
Copy pathgetRowNumber.m
71 lines (70 loc) · 2.66 KB
/
getRowNumber.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
function [rowNumber]=getRowNumber(fromBus,toBus,type,fid1)
%This is a helper function that locate characters in certain line in the
%ATP file. It returns the row number of that line in the ATP file.
%This file is part of ATPMAT
%For more information, please go to https://bitbucket.org/ahmadmabdullah/atpmat
% ATPMAT is free software: you can redistribute it and/or modify
% it under the terms of the GNU General Public License as published
% by the Free Software Foundation, either version 3 of the License,
% or (at your option) any later version.
%
% ATPMAT is distributed in the hope that it will be useful,
% but WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
% GNU General Public License for more details.
%
% You should have received a copy of the GNU General Public License
% along with MATPOWER. If not, see <http://www.gnu.org/licenses/>.
%
% Additional permission under GNU GPL version 3 section 7
%
% If you modify ATPMAT, or any covered work, to interface with
% other modules (such as MATLAB code and MEX-files) available in a
% MATLAB(R) or comparable environment containing parts covered
% under other licensing terms, the licensors of MATPOWER grant
% you additional permission to convey the resulting work.
firstCharacterPlace=3;
secondCharacerPlace=9;
rowNumber=0;
switch type
case {'BRANCH','SWITCH','SOURCE'}
rowNumber=1;
while (1)
line=fgetl(fid1);
if line==-1
rowNumber=0;
break;
end
if length(line)<13
line='*************';
end
if (strcmp(line(firstCharacterPlace:firstCharacterPlace+length(fromBus)-1),fromBus)==1)&&(strcmp(line(secondCharacerPlace:secondCharacerPlace+length(toBus)-1),toBus)==1)
break;
end
rowNumber=rowNumber+1;
end
end
fseek(fid1,0,-1);
if rowNumber==0
switch type
case {'BRANCH','SWITCH','SOURCE'}
rowNumber=1;
while (1)
line=fgetl(fid1);
if line==-1
rowNumber=0;
break;
end
if length(line)<13
line='*************';
end
if rowNumber==1202
fprintf('found');
end
if (strcmp(line(firstCharacterPlace:firstCharacterPlace+length(toBus)-1),toBus)==1)&&(strcmp(line(secondCharacerPlace:secondCharacerPlace+length(fromBus)-1),fromBus)==1)
break;
end
rowNumber=rowNumber+1;
end
end
end