Ignore:
Timestamp:
Mar 24, 2010, 8:47:23 PM (11 years ago)
Author:
sommeria
Message:

name_generator: remove unneeded indices at output
civ.m: & introduced at the end of system command lines (beginning by !) to allow matlab operations during civ in run mode
uvmat.m: debugging in dealing with projections
prove image pair movies superposed to velocity vectors
mouse: put circles along detected vectors

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/src/name_generator.m

    r19 r65  
    6060    num_i2=num_i1; %default
    6161end
     62if ~exist('num_j2','var') || isequal(num_i2,[])
     63    num_j2=num_j1; %default
     64end
    6265if ~exist('subdir','var')|| isempty(subdir)
    6366    subdir='' ; %default
    6467end
    65 %detection of mask or mean: filebase of the form [root '_' xxx 'm$$$'] with xxx a number and $$$ three characters
    66 % if length(filebase)>4 & filebase(end-3)=='m';
    67 %     basedouble=double(filebase);
    68 %     val=(48>basedouble)|(basedouble>57);% select the non-numerical characters
    69 %     i=length(filebase)-4;
    70 %     while val(i)==0 & i>0
    71 %         i=i-1;
    72 %     end
    73 %     nbslice=str2num(filebase(i+1:end-4));
    74 %     if ~isequal(nbslice,[])
    75 %         num_i1=mod(num_i1-1,nbslice)+1; %take the rest in the division
    76 %         if isequal(nom_type,'png_old')|isequal(nom_type,'#a')
    77 %             num_j1=1;% mask name must end by 'a'
    78 %         end
    79 %     end
    80 % end
     68num_i1_out=num_i1;%default output
     69num_j1_out=num_j1;%default output
     70num_i2_out=num_i2;%default output
     71num_j2_out=num_j2;%default output
     72
    8173test_pairs=isequal(nom_type,'netc_old')| isequal(nom_type,'netc_2D') | isequal(nom_type,'netc_3D')| isequal(nom_type,'_i1-i2_j1-j2')| ...
    8274  isequal(nom_type,'netc_series')| isequal(nom_type,'#_ab')| isequal(nom_type,'_i_j1-j2')| isequal(nom_type,'_i1-i2_j')| isequal(nom_type,'_i1-i2');
     
    8577if isequal(nom_type,'series_i')| isequal(nom_type,'_i');
    8678        filename=[filebase '_' num2str(num_i1) ext];
    87  %       idetect=(exist(filename,'file')==2);
     79        num_i2_out=num_i1;
     80        num_j1_out=[];
     81        num_j2_out=[];
    8882elseif length(nom_type)==5 && isequal(nom_type(1:3),'_%0')&& isequal(nom_type(5),'d');
    8983        filename=[filebase '_' num2str(num_i1,nom_type(2:5)) ext];
    90  %       idetect=(exist(filename,'file')==2);
     84        num_i2_out=num_i1;
     85        num_j2_out=num_j1;
    9186elseif isequal(nom_type,'series_i_j')| isequal(nom_type,'_i_j')
    9287        filename=[filebase '_' num2str(num_i1) '_' num2str(num_j1) ext];
    93  %       idetect=(exist(filename,'file')==2);
     88        num_i2_out=num_i1;
     89        num_j2_out=num_j1;
    9490elseif isequal(nom_type,'png_old')| isequal(nom_type,'#a')| isequal(nom_type,'#A')
    9591        filename=[filebase num2str(num_i1,'%03d') num2stra(num_j1,nom_type) ext];
    96    %     idetect=(exist(filename,'file')==2);
     92        num_i2_out=num_i1;
     93        num_j2_out=num_j1;
    9794elseif  length(nom_type)>=5 & isequal(nom_type(2:3),'%0') & isequal(nom_type(5),'d')  %isequal(nom_type,'_%04dA') %camera PCO Toulouse
    9895        filename=[filebase nom_type(1) num2str(num_i1,nom_type(2:4)) num2stra(num_j1,nom_type) ext];
    99  %       idetect=(exist(filename,'file')==2);         
     96        num_i2_out=num_i1;
     97        num_j2_out=num_j1;   
    10098elseif isequal(nom_type,'raw_SMD') %suffix a, b, c without extension
    10199        filename=[filebase num2str(num_i1,'%03d') num2stra(num_j1,nom_type)];
    102 %        idetect=(exist(filename,'file')==2);
     100        num_i2_out=num_i1;
     101        num_j2_out=num_j1;
    103102elseif isequal(nom_type,'ima_num')| isequal(nom_type,'#')
    104103        filename=[filebase num2str(num_i1) ext];
    105 %        idetect=(exist(filename,'file')==2);
     104        num_i2_out=num_i1;
     105        num_j1_out=[];
     106        num_j2_out=[];
    106107elseif length(nom_type)>=4 & isequal(nom_type(1:2),'%0') & isequal(nom_type(end),'d')
    107             filename=[filebase num2str(num_i1,nom_type) ext]; %test number with a 0 before
    108 %            idetect=(exist(filename,'file')==2);
     108        filename=[filebase num2str(num_i1,nom_type) ext]; %test number with a 0 before
     109        num_i2_out=num_i1;
     110        num_j1_out=[];
     111        num_j2_out=[];
    109112
    110113%case of derived file indexing (e.g. netcdf files)
    111114elseif test_pairs
    112     if (~exist('num_j2','var')| isequal(num_j2,[])) & test_2D
    113           num_j2=num_j1+1; %default if num_j2 undefined
    114     end
    115     if (~exist('num_i2','var')| isequal(num_i2,[])) & test_3D
    116           num_i2=num_i1+1; %default if num_i2 undefined
    117     end
    118115    filebasesub=filebase;
    119116    % get the root name filebasesub for the netcdf files
     
    123120    end
    124121     %inexistant pair if num_i2=0 or num_j2=0
    125     if isequal(num_i2,0)
    126         filename=[filebasesub '*-*_' num2str(num_i1) ext];
    127         return
    128     end
    129     if isequal(num_j2,0)
    130         filename=[filebasesub '_' num2str(num_i1) '_*-*' ext];
    131         return
    132     end
     122%     if isequal(num_i2,0)
     123%         filename=[filebasesub '*-*_' num2str(num_i1) ext];
     124%         return
     125%     end
     126%     if isequal(num_j2,0)
     127%         filename=[filebasesub '_' num2str(num_i1) '_*-*' ext];
     128%         return
     129%     end
    133130    % case of an imposed image pair (comp_input=1)
    134131    if  (exist('comp_input','var') & isequal(comp_input,1))
     
    139136                    filename=[filebasesub num2str(num_i1,'%03d') '_' num2stra(num_j1,nom_type) num2stra(num_j2,nom_type) ext];
    140137                end
     138                num_i2_out=num_i1;
    141139            elseif isequal(nom_type,'netc_2D')|isequal(nom_type,'_i_j1-j2')
    142140                if isequal(num2str(num_j1),num2str(num_j2))% case of displacements at the same time
     
    145143                    filename=[filebasesub '_' num2str(num_i1) '_' num2str(num_j1) '-' num2str(num_j2) ext];
    146144                end
     145                num_i2_out=num_i1;
    147146            elseif isequal(nom_type,'netc_3D') || isequal(nom_type,'_i1-i2_j')
    148147                if isequal(num2str(num_i1),num2str(num_i2))% case of displacements at the same time
     
    151150                    filename=[filebasesub '_' num2str(num_i1) '-' num2str(num_i2) '_' num2str(num_j1) ext];
    152151                end
     152                num_j2_out=num_j1;
    153153            elseif isequal(nom_type,'netc_series') || isequal(nom_type,'_i1-i2')
    154154                if isequal(num2str(num_i1),num2str(num_i2))% case of displacements at the same time
     
    157157                    filename=[filebasesub '_' num2str(num_i1) '-' num2str(num_i2) ext];
    158158                end
     159                num_j2_out=num_j1;
    159160            elseif isequal(nom_type,'_i1-i2_j1-j2')
    160161                if isequal(num2str(num_i1),num2str(num_i2))% case of displacements at the same time
     
    174175     % case of an image pair to determine (comp_input=0)
    175176    else
    176             [filename,num_i1,num_j1,num_i2,num_j2,idetect]=search_pair(filebasesub,num_i1,num_j1,num_i2,nom_type);
     177            [filename,num_i1_out,num_j1_out,num_i2_out,num_j2_out,idetect]=search_pair(filebasesub,num_i1,num_j1,num_i2,nom_type);
    177178    end
    178179   
     
    216217            idetect=(exist(filename,'file')==2);
    217218        else
    218             [filename,num_i1,num_j1,num_i2,num_j2,idetect]=search_pair(filebasesub,num_i1,num_j1,num_i2,nom_type);             
     219            [filename,num_i1_out,num_j1_out,num_i2_out,num_j2_out,idetect]=search_pair(filebasesub,num_i1,num_j1,num_i2,nom_type);             
    219220        end
    220221    end
     
    229230    idetect=(exist(filename,'file')==2); 
    230231end
    231 num_i1_out=num_i1;
    232 num_j1_out=num_j1;
    233 if exist('num_i2','var'), num_i2_out=num_i2; else, num_i2_out=[]; end;
    234 if exist('num_j2','var'), num_j2_out=num_j2; else, num_j2_out=[]; end;
    235232if ~isequal(subdir,'?'), subdir_out=subdir; else, subdir_out='';end;
    236233
Note: See TracChangeset for help on using the changeset viewer.