The QC (TSG and Sample) is now made only in AXE 1.

tsg_util/corTsgLinear.m

@@ -26,9 +26,11 @@ if dateMax > dateMin
    
   % intialisation
   % -------------
-  tsg.SSPS_ADJUSTED       = NaN * ones( size( tsg.SSPS ) );
-  tsg.SSPS_ADJUSTED_ERROR = NaN * ones( size( tsg.SSPS ) );
-  tsg.SSPS_ADJUSTED_QC    = NaN * ones( size( tsg.SSPS ) );
+  if isempty( tsg.SSPS_ADJUSTED )
+    tsg.SSPS_ADJUSTED       = tsg.SSPS;
+    tsg.SSPS_ADJUSTED_ERROR = NaN * ones( size( tsg.SSPS ) );
+    tsg.SSPS_ADJUSTED_QC    = tsg.SSPS_QC;
+  end
  
   % Find samples within TIME_WINDOWS with Good and probably Good QC
   % ---------------------------------------------------------------

tsg_util/corTsgMedian.m

@@ -43,9 +43,11 @@ if dateMax > dateMin
    
   % intialisation
   % -------------
-  tsg.SSPS_ADJUSTED       = NaN * ones( size( tsg.SSPS ) );
-  tsg.SSPS_ADJUSTED_ERROR = NaN * ones( size( tsg.SSPS ) );
-  tsg.SSPS_ADJUSTED_QC    = NaN * ones( size( tsg.SSPS ) );
+  if isempty( tsg.SSPS_ADJUSTED )
+    tsg.SSPS_ADJUSTED       = tsg.SSPS;
+    tsg.SSPS_ADJUSTED_ERROR = NaN * ones( size( tsg.SSPS ) );
+    tsg.SSPS_ADJUSTED_QC    = tsg.SSPS_QC;
+  end
   
   % Find the number of samples within the time limits.
   % --------------------------------------------------

tsg_util/erase_Line.m

@@ -6,7 +6,7 @@ function erase_Line( hAxes, PlotNum )
 % hAxes   ........ Handle to the graphic axes
 % PlotNum ........ Plot Number (used for the TAG)
 
-hLines = findobj( hAxes, '-regexp', ...
+hLines = findobj( hAxes(PlotNum), '-regexp', ...
                   'Tag', ['TAG_PLOT' num2str(PlotNum) '_LINE_']);
 if ~isempty( hLines )
   delete(hLines);

tsg_util/headerForm.m

@@ -96,7 +96,7 @@ for i=1:numel(nca_keys)
     'Style', 'Text', ...
     'Fontsize', tsg.fontSize-1, ...
     'HorizontalAlignment', 'left', ...
-    'Position',[left, bottom, .13, .0135], ...
+    'Position',[left, bottom, .2, .017], ...
     'TooltipString', char(s.comment), ...
     'String', char(s.name) );
   

tsg_util/plot_Sample.m

@@ -18,12 +18,12 @@ function plot_Sample( hTsgGUI, hAxes, PlotNum, Para, MyColor )
 sample    = getappdata( hTsgGUI, 'sample');
 tsg       = getappdata( hTsgGUI, 'tsg_data');
 
-axes( hAxes );
-set( hAxes, 'Box', 'on' );
+axes( hAxes(PlotNum) );
+set( hAxes(PlotNum), 'Box', 'on' );
 hold on
 
-% Extract the name of the parameter
-% ---------------------------------
+% Extract the name of the parameter (if SSPS_DIF is the argument)
+% ---------------------------------------------------------------
 pos = regexp( Para, '_', 'ONCE');
 if isempty( pos )
   parameter = Para;
@@ -96,9 +96,8 @@ if isempty(MyColor)
 
 else
 
-  % add comment !!!!
-  % ----------------------------------------------
-    
+  % Plot Parameter with MyColor specifies in the function arguments 
+  % ---------------------------------------------------------------
   if ~isempty( sample.([(Para) '_TYPE'])  <= 1 )
     line( sample.DAYD, sample.(Para),...
       'Tag', ['TAG_PLOT' num2str(PlotNum) '_LINE_' Para '_1'],...
@@ -119,6 +118,6 @@ hold off;
 
 % Write some 'Y' label
 % ------------------
-set(get(hAxes, 'Ylabel'), 'Interpreter', 'none', 'String', Para);
+set(get(hAxes(PlotNum), 'Ylabel'), 'Interpreter', 'none', 'String', Para);
 
 end

tsg_util/plot_Tsg.m

@@ -21,8 +21,8 @@ tsg = getappdata( hTsgGUI, 'tsg_data');
 
 if ~isempty( tsg.(Para) )
   
-  axes( hAxes );
-  set( hAxes, 'Box', 'on' );
+  axes( hAxes(PlotNum) );
+  set( hAxes(PlotNum), 'Box', 'on' );
   hold on
 
   if Linestyle
@@ -90,7 +90,7 @@ if ~isempty( tsg.(Para) )
 
   % Write some 'Y' label
   % ------------------
-  set(get(hAxes, 'Ylabel'), 'Interpreter', 'none', 'String', Para);
+  set(get(hAxes(PlotNum), 'Ylabel'), 'Interpreter', 'none', 'String', Para);
 
 end