F'=s*(Tot-F-A)-d*P*F+c*P*A
A'=d*P*F+b*(Tot-F-A)-am*A-c*P*A
init F=1000, A=5000
par s=0.01, c=0.6,d=0.5, b=0.02, am=0.005, P=133, Tot=10000
@ maxstor=1000000, bound=100000
@ xlo=0,xhi=10000,ylo=0,yhi=10000,xp=F,yp=A
done