<SPAN LANG="en-US">{</SPAN></FONT>
    <FONT SIZE=3><SPAN LANG="en-US">double y1,y2;</SPAN></FONT>

    <FONT SIZE=3><SPAN LANG="en-US">y1=y[1];</SPAN></FONT>
    <FONT SIZE=3><SPAN LANG="en-US">y2=y[2];</SPAN></FONT>
    <FONT SIZE=3><SPAN LANG="en-US">y[1] = -1000.0*y1*(y1+y2-1.999987);</SPAN></FONT>
    <FONT SIZE=3><SPAN LANG="en-US">y[2] = -2500.0*y2*(y1+y2-2.0);</SPAN></FONT>
  <FONT SIZE=3><SPAN LANG="en-US">}</SPAN></FONT>


  <FONT SIZE=3><SPAN LANG="en-US">public void jacobian(int r, double j[][],