Changeset 675 for trunk/src/find_field_cells.m

Timestamp:

Aug 27, 2013, 11:25:21 PM (11 years ago)

Author:

sommeria

Message:

various bugs corrected

File:

• trunk/src/find_field_cells.m (modified) (2 diffs)

trunk/src/find_field_cells.m

@@ -176 +176 @@
                 CellInfo{icell}.NbCentres_tps= ivar_remain(ivardim);% nbre of sites for each tps subdomain
                 check_cell(ivar_remain(ivardim))=1;% mark the variable as selected
-            elseif strcmp(VarDimName{ivardim}{1},DimCell{2}) && strcmp(VarDimName{ivardim}{3},DimCell{3})
+            elseif strcmp(VarDimName{ivardim}{1},DimCell{2}) && numel(VarDimName{ivardim})>=3 && strcmp(VarDimName{ivardim}{3},DimCell{3})
                 CellInfo{icell}.SubRange_tps=ivar_remain(ivardim);% subrange definiton for tps
                 check_cell(ivar_remain(ivardim))=1;% mark the variable as selected
@@ -247 +247 @@
 end
 
-% group the remaining variables in cells sharing the same coordinate variables
+%% group the remaining variables in cells sharing the same coordinate variables
 NewCellInfo={};
 NewCellDimIndex={};