<![CDATA[ //Setup dt = .01; ScaleWindow(-2.2,-2.6, 3.0, 2.6); DrawAxes(-2,-2,3,2); i=-2; j=-2; StepModel(); ]]>
<![CDATA[ //executed in loop() doPlot(i,j); i+=1; if(i>2){ i=-2; j+=1; } if (j<3){ setTimeout('loop()',100); } ]]>