beamlet3dfig18.m

来自「beamlet变化的工具箱」· M 代码 · 共 38 行

function Beamlet3Dfig18(OpenNewWindow,HaveTitle,LoadData)

LoadData=0;
if nargin<2
    HaveTitle=1;
end
if nargin<1
    OpenNewWindow=1;
end
if OpenNewWindow
    figure
end

V=helix(32,1);
p=patch(isosurface(V,0.06),'facecolor','g');
axis square
set(gca,'view',[0,0]);
light 
axis off

if HaveTitle
   title('A Noiseless Helix')
end

%
% Part of BeamLab Version:200
% Built:Friday,23-Aug-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%
%
% Part of BeamLab Version:200
% Built:Saturday,14-Sep-2002 00:00:00
% This is Copyrighted Material
% For Copying permissions see COPYING.m
% Comments? e-mail [e-mail]
%