-
Notifications
You must be signed in to change notification settings - Fork 6
Expand file tree
/
Copy pathPIXSetStation.m
More file actions
75 lines (61 loc) · 2.07 KB
/
Copy pathPIXSetStation.m
File metadata and controls
75 lines (61 loc) · 2.07 KB
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
72
73
74
function PIXSetStation( station )
% PIXSetStation( station )
%
% select the station at which to create pixel arrays and such
%
% IT IS AN ERROR TO CALL THIS FUNCTION TO CHANGE STATIONS IF YOU
% HAVE MODIFIED INFORMATION AT ANOTHER STATION! You must call PIXCommit
% or PIXForget prior to calling PIXStation if you have created
% packages, instruments or modified instruments.
global PIXPackages;
global PIXInstruments;
global PIXCoords;
global PIXStation;
global PIXModified;
if (~isempty(PIXStation) & PIXModified)
error(['Station ' PIXStation ' has modified data! PIXCommit or PIXForget']);
end;
PIXPath = strrep( which('PIXDatabase'), 'PIXDatabase.m', '' );
newstation = [PIXPath filesep 'data' filesep 'PIX' station '.mat'];
try
s = load(newstation);
PIXPackages = s.PIXPackages;
PIXInstruments = s.PIXInstruments;
PIXCoords = s.PIXCoords;
PIXStation = s.PIXStation;
catch
PIXPackages = [];
PIXInstruments = [];
PIXCoords = [];
PIXStation = station;
end;
PIXModified = 0;
%
%
% $Id: PIXSetStation.m 21 2016-02-11 22:21:37Z $
%
% $Log: PIXSetStation.m,v $
% Revision 1.4 1904/03/26 11:20:05 stanley
% auto insert keywords
%
%
%key pixel pixelDesign
%comment Select the station at which to create pixel arrays and such
%
%
% Copyright (C) 2017 Coastal Imaging Research Network
% and Oregon State University
% This program 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, version 3 of the
% License.
% This program 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 this program. If not, see
% <http://www.gnu.org/licenses/>.
% CIRN: https://coastal-imaging-research-network.github.io/
% CIL: http://cil-www.coas.oregonstate.edu
%