Changeset 632 for trunk/src/series
- Timestamp:
- May 6, 2013, 6:51:00 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/series/merge_proj.m
r626 r632 44 44 if isstruct(Param) && isequal(Param.Action.RUN,0) 45 45 ParamOut.AllowInputSort='off';% allow alphabetic sorting of the list of input file SubDir (options 'off'/'on', 'off' by default) 46 ParamOut.WholeIndexRange='o n';% prescribes the file index ranges from min to max (options 'off'/'on', 'off' by default)46 ParamOut.WholeIndexRange='off';% prescribes the file index ranges from min to max (options 'off'/'on', 'off' by default) 47 47 ParamOut.NbSlice='off'; %nbre of slices ('off' by default) 48 48 ParamOut.VelType='one';% menu for selecting the velocity type (options 'off'/'one'/'two', 'off' by default) … … 64 64 65 65 %%%%%%%%%%%% STANDARD PART (DO NOT EDIT) %%%%%%%%%%%% 66 ParamOut=[] %default output66 ParamOut=[]; %default output 67 67 %% read input parameters from an xml file if input is a file name (batch mode) 68 68 checkrun=1; … … 134 134 135 135 %% coordinate transform or other user defined transform 136 % transform_fct='';%default fct handle137 % if isfield(Param,'FieldTransform')&&~isempty(Param.FieldTransform.TransformName)138 % if isdeployed139 % transform_fct=Param.FieldTransform.TransformName;140 % dd=phys([]);%activate phys for compilation141 % else142 % currentdir=pwd;143 % cd(Param.FieldTransform.TransformPath)144 % transform_fct=str2func(Param.FieldTransform.TransformName);145 % cd (currentdir)146 % end147 % end148 136 transform_fct='';%default fct handle 149 137 if isfield(Param,'FieldTransform')&&~isempty(Param.FieldTransform.TransformName) … … 166 154 end 167 155 for iview=1:NbView 168 156 if ~isequal(CheckImage{iview},CheckImage{1})||~isequal(CheckNc{iview},CheckNc{1}) 169 157 displ_uvmat('ERROR','input set of input series: need either netcdf either image series',checkrun) 170 return158 return 171 159 end 172 160 end 173 161 NomTypeOut=NomType;% output file index will indicate the first and last ref index in the series 174 % if checkrun==1175 % ParamOut.Specific=[];%no specific parameter176 % return %stop here for interactive input (option Param.Specific='?')177 % end178 162 179 163 %% Set field names and velocity types … … 213 197 end 214 198 215 %% transform the input field (e.g; phys) if requested 199 %% transform the input field (e.g; phys) if requested (no transform involving two input fields) 216 200 if ~isempty(transform_fct) 217 201 if nargin(transform_fct)>=2 … … 221 205 end 222 206 end 223 % Data{iview}=phys(Data{iview},XmlData{iview}); 207 224 208 %% check whether tps is needed, then calculate tps coefficients if needed 225 check_tps=0; 226 if isfield(Param.InputFields,'FieldName') 227 if ischar(Param.InputFields.FieldName) 228 Param.InputFields.FieldName={Param.InputFields.FieldName}; 229 end 230 else 231 Param.InputFields.FieldName={}; 232 end 233 for ilist=1:numel(Param.InputFields.FieldName) 234 switch Param.InputFields.FieldName{ilist} 235 case {'vort','div','strain'} 236 check_tps=1; 237 end 238 end 239 240 %% calculate tps coeff if needed 209 % check_tps=0; 210 % if isfield(Param.InputFields,'FieldName') 211 % if ischar(Param.InputFields.FieldName) 212 % Param.InputFields.FieldName={Param.InputFields.FieldName}; 213 % end 214 % else 215 % Param.InputFields.FieldName={}; 216 % end 217 % for ilist=1:numel(Param.InputFields.FieldName) 218 % switch Param.InputFields.FieldName{ilist} 219 % case {'vort','div','strain'} 220 % check_tps=1; 221 % end 222 % end 223 224 225 %% calculate tps coefficients if needed 241 226 check_proj_tps= isfield(Param,'ProjObject')&&~isempty(Param.ProjObject)&& strcmp(Param.ProjObject.ProjMode,'interp_tps')&&~isfield(Data{iview},'Coord_tps'); 242 227 Data{iview}=tps_coeff_field(Data{iview},check_proj_tps);
Note: See TracChangeset
for help on using the changeset viewer.