Changeset 494 for trunk/src/find_field_indices.m

Timestamp:

Jul 19, 2012, 11:50:39 AM (12 years ago)

Author:

sommeria

Message:

various bugs corrected after testing in Windows OS. Introduction
of filter tps

File:

• trunk/src/find_field_indices.m (modified) (1 diff)

trunk/src/find_field_indices.m

@@ -258 +258 @@
                 CellVarType{icell}.nbsites_tps=VarType.nbsites_tps(ilist);
                 CellVarType{icell}.subrange_tps=VarType.subrange_tps(ilist);
+                if isfield(Data,'ListDimName')
+                    dim_index=find(strcmp(tps_dimnames{2},Data.ListDimName));
+                    NbDim(icell)=Data.DimValue(dim_index);
+                else
                 NbDim(icell)=size(Data.(Data.ListVarName{VarType.coord_tps(ilist)}),2);
+                end
             end
             end