Changeset 511 for trunk/src/series


Ignore:
Timestamp:
Aug 2, 2012, 3:12:48 PM (12 years ago)
Author:
sommeria
Message:

cleaning of uvmat and related fcts

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/series/merge_proj.m

    r494 r511  
    225225                end
    226226            end
    227             if strcmp(Param.ProjObject.ProjMode,'filter')
    228                 check_tps=1;
    229             end
    230             if check_tps
    231                 SubDomain=1500; %default, estimated nbre of vectors in a subdomain used for tps
    232                 if isfield(Data{iview},'SubDomain')
    233                     SubDomain=Data{iview}.SubDomain;%
    234                 end
    235                 [Data{iview}.SubRange,Data{iview}.NbSites,Data{iview}.Coord_tps,Data{iview}.U_tps,Data{iview}.V_tps,tild,U_smooth,V_smooth,W_smooth,FF] =...
    236                     filter_tps([Data{iview}.X(Data{iview}.FF==0) Data{iview}.Y(Data{iview}.FF==0)],Data{iview}.U(Data{iview}.FF==0),Data{iview}.V(Data{iview}.FF==0),[],SubDomain,0);
    237                 nbvar=numel(Data{iview}.ListVarName);
    238                 Data{iview}.ListVarName=[Data{iview}.ListVarName {'SubRange','NbSites','Coord_tps','U_tps','V_tps'}];
    239                 Data{iview}.VarDimName=[Data{iview}.VarDimName {{'nb_coord','nb_bounds','nb_subdomain'},{'nb_subdomain'},...
    240                     {'nb_tps','nb_coord','nb_subdomain'},{'nb_tps','nb_subdomain'},{'nb_tps','nb_subdomain'}}];
    241                 Data{iview}.VarAttribute{nbvar+3}.Role='coord_tps';
    242                 Data{iview}.VarAttribute{nbvar+4}.Role='vector_x';
    243                 Data{iview}.VarAttribute{nbvar+5}.Role='vector_y';
    244                 if isfield(Data{iview},'ListDimName')%cleaning
    245                     Data{iview}=rmfield(Data{iview},'ListDimName');
    246                 end
    247                 if isfield(Data{iview},'DimValue')%cleaning
    248                     Data{iview}=rmfield(Data{iview},'DimValue');
    249                 end
     227            if ~isempty(Param.ProjObject)&& strcmp(Param.ProjObject.ProjMode,'filter')&&~isfield(Data{iview},'Coord_tps')
     228                Data{iview}=calc_tps(Data{iview});
    250229            end
    251230                 
Note: See TracChangeset for help on using the changeset viewer.