Last change
on this file since 456 was
128,
checked in by sommeria, 14 years ago
|
series: give writting access to the group for all subdirectories produced
uvmat.fig: change of vect and scalar frames (to be consistent with view_field)
uvmat: various cleaning
plot_field: various cleaning to improve axes definition and avoid blinking
geometry_calib: improved dispay of point coordiantes, improved link with dataview for REPLICATE.
struct2nc: repair bug , file was not closed.
cell2tab: cleaning
dataview: improve the browser
civ: solve pb of image naming
|
File size:
1.3 KB
|
Rev | Line | |
---|
[29] | 1 | %'read_geometry_calib': read data on the GUI geometry_calib |
---|
| 2 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
---|
| 3 | function data=read_geometry_calib(Coord_cell) |
---|
| 4 | nb_defining_points=length(Coord_cell); |
---|
| 5 | iline=0; |
---|
[36] | 6 | data.Coord=[];%default |
---|
[29] | 7 | for i=1:nb_defining_points |
---|
| 8 | coord_str=Coord_cell{i};%character string of line number i |
---|
| 9 | k=findstr('|',coord_str);%find separators '|' |
---|
| 10 | if length(k)>=4 % test for separators '|' |
---|
[128] | 11 | data1=str2double(coord_str(1:k(1)-2)); |
---|
| 12 | data2=str2double(coord_str(k(1)+2:k(2)-2)); |
---|
| 13 | data3=str2double(coord_str(k(2)+2:k(3)-2)); |
---|
| 14 | data4=str2double(coord_str(k(3)+2:k(4)-2)); |
---|
| 15 | data5=str2double(coord_str(k(4)+2:end)); |
---|
| 16 | if ~isnan(data1)||~isnan(data2)||~isnan(data3)||~isnan(data4)||~isnan(data5) |
---|
[29] | 17 | iline=iline+1; |
---|
[128] | 18 | if ~isnan(data1) |
---|
[29] | 19 | data.Coord(iline,1)=data1; |
---|
| 20 | end |
---|
[128] | 21 | if ~isnan(data2) |
---|
[29] | 22 | data.Coord(iline,2)=data2; |
---|
| 23 | end |
---|
[128] | 24 | if ~isnan(data3) |
---|
[29] | 25 | data.Coord(iline,3)=data3; |
---|
| 26 | end |
---|
[128] | 27 | if ~isnan(data4) |
---|
[29] | 28 | data.Coord(iline,4)=data4; |
---|
| 29 | end |
---|
[128] | 30 | if isnan(data5) |
---|
[29] | 31 | data.Coord(iline,5)=0; |
---|
| 32 | else |
---|
| 33 | data.Coord(iline,5)=data5; |
---|
| 34 | end |
---|
| 35 | end |
---|
| 36 | end |
---|
| 37 | end |
---|
| 38 | data.Style='points'; |
---|
Note: See
TracBrowser
for help on using the repository browser.