# cook.ode
# a delay equation due to Ken Cooke
# x' = r x (1- x(n))
# where n=integer part of t
frac(t)=t-flr(t)
y=delay(x,frac(t))
x'=r*x*(1-y)
aux xd=y
par r=2.2
x(0)=.8
@ delay=2,total=100
done