# chuas scroll chaos
x'=a*(y-if(x>=1)then(m1*x+(m0-m1))\
                else(if((x+1)>0)then(m0*x)else(m1*x-(m0-m1))))
y'=x-y+z
z'=-b*y
par a=9,b=14.28
par m0=-0.1428,m1=0.2856
init x=.1,y=.1,z=.1
@ total=200
done