clear;
load APG3/u300

ui=0.6408;
ut=0.0215;
re=400;
upl=u300(:,2);
ypl=u300(:,1);

%plot velocity profile in wall scaling
semilogx(ypl,upl)

%plot velocity profile in simulation coordinates
u=upl.*ut;
y=ypl./ut./400;
plot(y,u)
