Newer
Older
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
function plot_Interpolation( hMainFig, hPlotAxes, nPlot )
% Get tsg application data
% ------------------------
tsg = getappdata( hMainFig, 'tsg_data');
switch nPlot
% ---------------------------------------------------------------------
case 1
erase_Line( hPlotAxes, 1 );
% Find records with no position
% -----------------------------
if ~isempty( tsg.LATX ) && ~isempty( tsg.SSPS)
ind = find( isnan(tsg.LATX) == 1 | isnan(tsg.LONX) == 1);
if ~isempty( tsg.ssps_smooth )
plot_Tsg( hMainFig, hPlotAxes, 1, tsg.DAYD(ind), tsg.SSPS(ind), [],...
'SSPS_NOPOS','r','none','*',2);
end
ind = find( isnan(tsg.LATX) == 0 | isnan(tsg.LONX) == 0);
if ~isempty( tsg.SSPS )
plot_Tsg( hMainFig, hPlotAxes, 1, tsg.DAYD(ind), tsg.SSPS(ind), [],...
'SSPS','k','none','*',2);
end
end
% ---------------------------------------------------------------------
case 2
erase_Line( hPlotAxes, 2 );
if ~isempty( tsg.LATX )
plot_Tsg( hMainFig, hPlotAxes, 2, tsg.DAYD, tsg.LATX,[],...
'LATX','k','none','*',2);
end
% ---------------------------------------------------------------------
case 3
erase_Line( hPlotAxes, 3 );
if ~isempty( tsg.LONX )
plot_Tsg( hMainFig, hPlotAxes, 3, tsg.DAYD, tsg.LONX,[],...
'LONX','k','none','*',2);
end
end
axesCommonProp( hPlotAxes );
end