From: Subject: Date: Sun, 4 Feb 2007 18:22:15 -0500 MIME-Version: 1.0 Content-Type: text/html; charset="Windows-1252" Content-Transfer-Encoding: 7bit Content-Location: http://www.ecs.umass.edu/ece/sdp/sdp04/janaswamy/runbike.m X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3028

function [] = runbike(phase, frequency)
% for a given phase limit and frequency ...
y=linspace(0,15,375);
p=linspace(phase,phase,375);
L=299792458/(frequency*10^6);
% calculate the distance from the finish line
%    for many values of y
x=bike(y,frequency,p);
slope=(y(375)-y(2))/(x(375)-x(2))
theta=atan((x(375)-x(2))/(y(375)-y(2)))
plot(x,y,-x,y,x,-y,-x,-y)