Changeset 635 for trunk/src/series/time_series.m

Timestamp:

May 19, 2013, 11:37:49 PM (11 years ago)

Author:

sommeria

Message:

 

File:

• trunk/src/series/time_series.m (modified) (3 diffs)

trunk/src/series/time_series.m

@@ -98 +98 @@
 nbfield_i=size(i1_series{1},2); %nb of fields for the i index
 nbfield=nbfield_j*nbfield_i; %total number of fields
-[first_i,tild,last_i,first_j,tild,last_j,errormsg]=get_index_range(Param.IndexRange);
-if ~isempty(errormsg),display(errormsg),return,end
+% [first_i,tild,last_i,first_j,tild,last_j,errormsg]=get_index_range(Param.IndexRange);
+% if ~isempty(errormsg),display(errormsg),return,end
 
 %% determine the file type on each line from the first input file
@@ -153 +153 @@
     return
 end
+
+%% settings for the output file
 NomTypeOut=nomtype2pair(NomType{1});% determine the index nomenclature type for the output file
+first_i=i1_series{1}(1);
+last_i=i1_series{1}(end);
+if isempty(j1_series{1})% if there is no second index j
+    first_j=1;last_j=1;
+else
+    first_j=j1_series{1}(1);
+    last_j=j1_series{1}(end);
+end
 
 %% Set field names and velocity types
@@ -210 +220 @@
 for index=1:nbfield
             update_waitbar(WaitbarHandle,index/nbfield)
-    if ~isempty(RUNHandle) &&ishandle(RUNHandle) && ~strcmp(get(RUNHandle,'BusyAction'),'queue')
+    if ~isempty(RUNHandle) && ~strcmp(get(RUNHandle,'BusyAction'),'queue')
         disp('program stopped by user')
         break % leave the loop if stop is ordered