fcrr<ocjra,Yn rc^u/i'ą.2u:j3^(-u owe
cAc
deax~ ail
*L =-5 - 0
xs = CxL+- xR)/2
while ajbs (xR "xL)> o.ooi
yL = -xLA2 HG
<jR - -xRAZM6
ys = ~xsA2'M&
if (41- <0
xR = xs
ete>eif (yR-ys)<0
xL = xs
exid
xs =0.5(x:l_+xR)
ex\d
xs y-£zero(-f ,-3)