function fig = psurface()
% This is the machine-generated representation of a Handle Graphics object
% and its children.  Note that handle values may change when these objects
% are re-created. This may cause problems with any callbacks written to
% depend on the value of the handle at the time the object was saved.
%
% To reopen this object, just type the name of the M-file at the MATLAB
% prompt. The M-file and its associated MAT-file must be on your path.

load psurface

h0 = figure('Color',[0.8 0.8 0.8], ...
	'Colormap',mat0, ...
	'Name','3D parametric surfaces and vector fields', ...
	'PaperOrientation','landscape', ...
	'PaperPosition',[156 140.25 480 331.5], ...
	'PaperPositionMode','auto', ...
	'PaperUnits','points', ...
	'PointerShapeCData',mat1, ...
	'Position',[138 33 640 442], ...
	'Renderer','zbuffer', ...
	'RendererMode','manual', ...
	'Tag','Fig1');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[481 401 100 20], ...
	'String','s*cos(t)', ...
	'Style','edit', ...
	'Tag','xpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 421 120 20], ...
	'String','Parametrized Surface', ...
	'Style','text', ...
	'Tag','StaticText1');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 399 40 20], ...
	'String','x(s,t)=', ...
	'Style','text', ...
	'Tag','StaticText2');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 382 40 17], ...
	'String','y(s,t)=', ...
	'Style','text', ...
	'Tag','StaticText2');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[481 381 100 20], ...
	'String','s*sin(t)', ...
	'Style','edit', ...
	'Tag','ypsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[480 285 40 20], ...
	'String','0', ...
	'Style','edit', ...
	'Tag','tminpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[440 285 40 20], ...
	'String','tmin', ...
	'Style','text', ...
	'Tag','StaticText6');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[559 285 40 20], ...
	'String','6.4', ...
	'Style','edit', ...
	'Tag','tmaxpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'Enable','inactive', ...
	'ListboxTop',0, ...
	'Position',[520 285 40 20], ...
	'String','tmax', ...
	'Style','text', ...
	'Tag','StaticText7');
h1 = uicontrol('Parent',h0, ...
	'Callback',mat2, ...
	'ListboxTop',0, ...
	'Position',[438 153 120 20], ...
	'String','Graph the curve', ...
	'Tag','Pushbutton1');
h1 = uicontrol('Parent',h0, ...
	'Callback','delete(findobj(''Tag'',''surface''));', ...
	'ListboxTop',0, ...
	'Position',[578 153 40 20], ...
	'String','Clear', ...
	'Tag','Pushbutton2');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 104 120 20], ...
	'String','Vector field', ...
	'Style','text', ...
	'Tag','fypcurve');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 84 40 20], ...
	'String','Fx=', ...
	'Style','text', ...
	'Tag','fypcurve');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 64 40 20], ...
	'String','Fy=', ...
	'Style','text', ...
	'Tag','fypcurve');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[481 84 100 20], ...
	'String','-y', ...
	'Style','edit', ...
	'Tag','fxpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[761 101 100 20], ...
	'Style','edit', ...
	'Tag','fxpcurve');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[481 64 100 20], ...
	'String','x', ...
	'Style','edit', ...
	'Tag','fypsurface');
h1 = uicontrol('Parent',h0, ...
	'Callback',mat3, ...
	'ListboxTop',0, ...
	'Position',[441 21 120 20], ...
	'String','Plot the vector field', ...
	'Tag','Pushbutton3');
h1 = uicontrol('Parent',h0, ...
	'Callback','delete(findobj(''Tag'',''surfvfield3d''));', ...
	'ListboxTop',0, ...
	'Position',[581 21 40 20], ...
	'String','Clear', ...
	'Tag','Pushbutton4');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[479 267 40 20], ...
	'String','tscl', ...
	'Style','text', ...
	'Tag','StaticText11');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[519 267 40 20], ...
	'String','0.2', ...
	'Style','edit', ...
	'Tag','tsclpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[440 321 40 20], ...
	'String','smin', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[519 322 40 20], ...
	'String','smax', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[480 322 40 20], ...
	'String','0', ...
	'Style','edit', ...
	'Tag','sminpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[559 322 40 20], ...
	'String','5', ...
	'Style','edit', ...
	'Tag','smaxpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 44 40 20], ...
	'String','Fz=', ...
	'Style','text', ...
	'Tag','Fz=');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[481 44 100 20], ...
	'String','0', ...
	'Style','edit', ...
	'Tag','fzpsurface');
h1 = axes('Parent',h0, ...
	'CameraUpVector',[0 1 0], ...
	'CameraUpVectorMode','manual', ...
	'Color',[1 1 1], ...
	'ColorOrder',mat4, ...
	'NextPlot','add', ...
	'Position',[0.09375 0.1809954751131222 0.5 0.6787330316742082], ...
	'Tag','Axes1', ...
	'XColor',[0 0 0], ...
	'XLim',[-5 5], ...
	'XLimMode','manual', ...
	'YColor',[0 0 0], ...
	'YLim',[-5 5], ...
	'YLimMode','manual', ...
	'ZColor',[0 0 0], ...
	'ZLim',[0 5], ...
	'ZLimMode','manual');
h2 = text('Parent',h1, ...
	'Color',[0 0 0], ...
	'HandleVisibility','off', ...
	'HorizontalAlignment','center', ...
	'Position',[-0.01567398119122299 -5.802675585284282 45.80127018922194], ...
	'Tag','Axes1Text4', ...
	'VerticalAlignment','cap');
set(get(h2,'Parent'),'XLabel',h2);
h2 = text('Parent',h1, ...
	'Color',[0 0 0], ...
	'HandleVisibility','off', ...
	'HorizontalAlignment','center', ...
	'Position',[-5.689655172413793 -0.05016722408026819 45.80127018922194], ...
	'Rotation',90, ...
	'Tag','Axes1Text3', ...
	'VerticalAlignment','baseline');
set(get(h2,'Parent'),'YLabel',h2);
h2 = text('Parent',h1, ...
	'Color',[0 0 0], ...
	'HandleVisibility','off', ...
	'HorizontalAlignment','right', ...
	'Position',[-6.912225705329154 7.040133779264213 45.80127018922194], ...
	'Tag','Axes1Text2', ...
	'Visible','off');
set(get(h2,'Parent'),'ZLabel',h2);
h2 = text('Parent',h1, ...
	'Color',[0 0 0], ...
	'HandleVisibility','off', ...
	'HorizontalAlignment','center', ...
	'Position',[-0.01567398119122299 5.234113712374581 45.80127018922194], ...
	'Tag','Axes1Text1', ...
	'VerticalAlignment','bottom');
set(get(h2,'Parent'),'Title',h2);
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[441 362 40 20], ...
	'String','z(s,t)=', ...
	'Style','text', ...
	'Tag','StaticText8');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[481 361 100 20], ...
	'String','t', ...
	'Style','edit', ...
	'Tag','zpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[519 304 40 20], ...
	'String','0.5', ...
	'Style','edit', ...
	'Tag','ssclpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[479 304 40 20], ...
	'String','sscl', ...
	'Style','text', ...
	'Tag','StaticText11');
h1 = uicontrol('Parent',h0, ...
	'Callback',mat5, ...
	'ListboxTop',0, ...
	'Position',[438 154 120 20], ...
	'String','Graph the surface', ...
	'Tag','Pushbutton1');
h1 = uicontrol('Parent',h0, ...
	'Units','points', ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[351 97.5 106.5 15], ...
	'String','Click here for wire frame', ...
	'Style','radiobutton', ...
	'Tag','Radiobutton1');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[563 239 40 20], ...
	'String','5', ...
	'Style','edit', ...
	'Tag','xmaxpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[524 239 40 20], ...
	'String','xmax', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[444 238 40 20], ...
	'String','xmin', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[563 219 40 20], ...
	'String','5', ...
	'Style','edit', ...
	'Tag','ymaxpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[484 219 40 20], ...
	'String','-5', ...
	'Style','edit', ...
	'Tag','yminpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[523 219 40 20], ...
	'String','ymax', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[444 219 40 20], ...
	'String','ymin', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[563 199 40 20], ...
	'String','5', ...
	'Style','edit', ...
	'Tag','zmaxpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[484 199 40 20], ...
	'String','0', ...
	'Style','edit', ...
	'Tag','zminpsurface');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[523 199 40 20], ...
	'String','zmax', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[0.752941176470588 0.752941176470588 0.752941176470588], ...
	'ListboxTop',0, ...
	'Position',[444 200 40 20], ...
	'String','zmin', ...
	'Style','text', ...
	'Tag','StaticText12');
h1 = uicontrol('Parent',h0, ...
	'BackgroundColor',[1 1 1], ...
	'ListboxTop',0, ...
	'Position',[484 238 40 20], ...
	'String','-5', ...
	'Style','edit', ...
	'Tag','xminpsurface');
if nargout > 0, fig = h0; end