%Book Example 15.2 Plotter
% MAE 6263
% Charles O'Neill
%

load psioutf.dat
load omegaoutf.dat
load uveloutf.dat
load vveloutf.dat

%psi=contour(uveloutf)
%psi=contour(vveloutf)
%psi=contour(sqrt(vveloutf.^2.+uveloutf.^2))


%clabel(psi)
hold on
axis equal
colormap('gray')
%break;

quiver(uveloutf,vveloutf)
