%% Draw Isosurface with Lighting
% Load the flow data set, which represents the speed profile of a submerged jet within an infinite tank. Draw the isosurface at the data value of -3 and prepare the isosurface for lighting by:
% Recalculating the isosurface normals based on the volume data.
% Setting the face and edge color.
% Specifying the view.
% Adding lights.

[x,y,z,v] = flow;
p = patch(isosurface(x,y,z,v,-3));
isonormals(x,y,z,v,p)
p.FaceColor = 'red';
p.EdgeColor = 'none';
daspect([1 1 1])
view(3); 
axis tight
camlight 
lighting gouraud

% Copyright 2012 The MathWorks, Inc.