Ignore:
Timestamp:
Jul 19, 2012, 11:50:39 AM (9 years ago)
Author:
sommeria
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/find_field_indices.m

    r491 r494  
    258258                CellVarType{icell}.nbsites_tps=VarType.nbsites_tps(ilist);
    259259                CellVarType{icell}.subrange_tps=VarType.subrange_tps(ilist);
     260                if isfield(Data,'ListDimName')
     261                    dim_index=find(strcmp(tps_dimnames{2},Data.ListDimName));
     262                    NbDim(icell)=Data.DimValue(dim_index);
     263                else
    260264                NbDim(icell)=size(Data.(Data.ListVarName{VarType.coord_tps(ilist)}),2);
     265                end
    261266            end
    262267            end
Note: See TracChangeset for help on using the changeset viewer.