# Fisher equation
par D=1,h=.2,r=1
u0=u1
u[1..100]'=r*u[j]*(1-u[j])+D*(u[j+1]-2*u[j]+u[j-1])/(h*h)
u101=u100
init u1=1
@ dt=.025,total=20
done