Changeset 213 for trunk/src/proj_field.m
 Timestamp:
 Mar 4, 2011, 12:07:38 AM (13 years ago)
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

trunk/src/proj_field.m
r212 r213 208 208 209 209 else 210 if length(ivar_X)>1  length(ivar_Y)>1 length(ivar_Z)>1210 if length(ivar_X)>1  length(ivar_Y)>1  length(ivar_Z)>1 211 211 errormsg='multiple coordinate input in proj_field.m'; 212 212 return … … 238 238 test3D=1; 239 239 end 240 if length(ivar_F)>1  length(ivar_FF)>1240 if length(ivar_F)>1  length(ivar_FF)>1 241 241 msgbox_uvmat('ERROR','multiple flag input in proj_field.m') 242 242 return … … 748 748 elseif isequal(ProjMode,'filter') %filtering 749 749 npoint=floor(linelength/DX)+1;% nbre of points in the profile (interval DX) 750 Xproj= [linelength/(2*npoint):linelength/npoint:linelengthlinelength/(2*npoint)];750 Xproj=linelength/(2*npoint):linelength/npoint:linelengthlinelength/(2*npoint); 751 751 siz=size(X_sel); 752 752 xregij=cos(theta(ip))*Xproj'*ones(1,siz(2))+ObjectData.Coord(ip,1); … … 887 887 eval(['ProjData.' VarName{ivar} '=((sum(A_out,1)/npY))'';']); 888 888 elseif nbcolor==3 889 vec_B(ind_in, [1:3])=vec_A(ICOMB,:);889 vec_B(ind_in,1:3)=vec_A(ICOMB,:); 890 890 vec_B(ind_out,1)=zeros(size(ind_out)); 891 891 vec_B(ind_out,2)=zeros(size(ind_out)); … … 1328 1328 end 1329 1329 npX=1+round(abs(Coord{NbDim}(end)Coord{NbDim}(1))/DX);%nbre of points after interpol 1330 for idim= [1:NbDim]1330 for idim=1:NbDim 1331 1331 if test_interp(idim) 1332 1332 DimValue(idim)=1+round(abs(Coord{idim}(end)Coord{idim}(1))/abs(DCoord_min(idim)));%nbre of points after possible interpolation on a regular gri
Note: See TracChangeset
for help on using the changeset viewer.