# 50 lorenz equations x[1..50]'=s*(y[j]-x[j]) y[1..50]'=r*x[j]-y[j]-x[j]*z[j] z[1..50]'=-b*z[j]+x[j]*y[j] par r=27,s=10,b=2.66 init x[1..50]=-7.5,y[j]=-3.6 init z[1..50]=30.00[j]1 @ total=50,dt=.02 done