Ignore:
Timestamp:
Mar 15, 2010, 5:42:11 PM (11 years ago)
Author:
gostiaux
Message:

various bug fixes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/struct2nc_toolbox.m

    r19 r46  
    8989        siz=size(VarVal);
    9090        VarDimIndex=Data.VarDimIndex{ivar}; %indices of the variable dimensions in the list of dimensions
    91         VarDimName=Data.VarDimName{ivar};%NEW
    92         if ischar(VarDimName)%NEW
    93             VarDimName={VarDimName};%NEW
    94         end%NEW
    95         testrange=(numel(VarDimName)==1 && strcmp(VarDimName{1},ListVarName{ivar}) && numel(VarVal)==2); %NEW
     91        VarDimName=Data.VarDimName{ivar};
     92        if ischar(VarDimName)
     93            VarDimName={VarDimName};
     94        end
     95        testrange=(numel(VarDimName)==1 && strcmp(VarDimName{1},ListVarName{ivar}) && numel(VarVal)==2);
    9696        testline=isequal(length(siz),2) & isequal(siz(1),1)& isequal(siz(2), Data.DimValue(VarDimIndex));
    9797        testcolumn=isequal(length(siz),2) & isequal(siz(1), Data.DimValue(VarDimIndex))& isequal(siz(2),1);
     
    100100            break
    101101        end
    102         if testline || testrange%NEW
     102        if testline || testrange
    103103           dimname=Data.ListDimName{VarDimIndex};
    104            if testrange%NEW
    105                VarVal=linspace(VarVal(1),VarVal(2),Data.DimValue(VarDimIndex));%NEW
    106            end%NEW
     104           if testrange
     105               VarVal=linspace(VarVal(1),VarVal(2),Data.DimValue(VarDimIndex));
     106           end
    107107           nc{ListVarName{ivar}}=ncfloat(dimname);%vector of x coordinates
    108108           nc{ListVarName{ivar}}(:) = VarVal'; 
     
    113113        %write variable attributes
    114114        if testattr
    115             for ivar=1:length(VarAttribute) 
    116                 if isstruct(VarAttribute{ivar})
    117                     attr_names=fields(VarAttribute{ivar});
     115            for ivarattr=1:length(VarAttribute) 
     116                if isstruct(VarAttribute{ivarattr})
     117                    attr_names=fields(VarAttribute{ivarattr});
    118118                    for iattr=1:length(attr_names)
    119119                        eval(['attr_val=VarAttribute{ivar}.' attr_names{iattr} ';']);
Note: See TracChangeset for help on using the changeset viewer.