home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 September / Chip_1999-09_cd.bin / ctenari / Trejbal / TRELL.PAK / SOURCE / ERSD.EXE / MATIKA.PAS < prev    next >
Pascal/Delphi Source File  |  1999-06-14  |  23KB  |  1,614 lines
  1. aum;tn aiitk
  2.  
  3. rifeenact
  4.  
  5. r i}t n s gi:f)nbu:abnst,ctiatrcaiis(on tng{e ;cs 7uo
  6. i r}n t g si)f:n:ubasnbttc,irtaciiadno(ognl ; i{ rdoz7
  7. n i}g r ) ti:fsnsu:etnbbrcboit,sniaagoan;n(   t{ka9r
  8. r t}i s n :igfbn)ube:n,lscaettadri( ioo{nnng e7;dl e
  9. n g}i ) r :itfsnsuta:nrvccioctnl,ighbo;ubn o,  rao kak o(r{aho zu
  10.  
  11. 1 0{
  12. o rouklh0osl1aiozcva  aa-en 
  13. t et csd0oie1pms  eb-ntb i
  14. r uto,ih0 la12un.o.c.r.cdk1 oo -oa, pzu0r l.ayo.vdd
  15. 1 0}
  16.  
  17. ;  }g   n  0if{0ru .tna sca':t 2)iu'gop=nnrbi abrdv teiyss n:_nibeatbt e,(dsaae
  18. 7 }   { ;i fgsvuneynirscrpettmkisoao:k n) c guicngsiinlsrioltr ostz(:seaa 
  19. ;  }g  n 50if0ru{1tn  scp*:tr )ieogovlnnosi dirp ctez sn a:_pnace ainz(se
  20.   ;} g 5 n0fi0{ur1 nt pcs/rt: ei)evogzonnid in crezitp ss c_:aipansea ln(a
  21.   ;} g 6 n7fi9{ur9 nt1acs at:k.i)o.orr2ne   g--de  at4rtn.oui.km:  (a79a
  22. i r}n t g sy;f:n u)d{ng  cneatinaire.ott.nscd :iadbrtabput, m_a. pa.,l(b usb
  23.   }; 8 g ynf{diu nrnautcakst.e:i.s)o2 rn -e - gc 3eam.tsi.n(n iauy:at
  24. i n}r g t ;ysf m:u{j)n egcarntafii, robitnb s .-:c. basybscs,_iaaptcala (unes
  25.  
  26.  
  27. nientmmoapeitl
  28.  
  29.  ud;ssose
  30.  
  31.  
  32. svu; ak]:r,0  p1sac[tp,gr,pnib
  33. d  ;,:gc6 n,sibatr,
  34. q ,;,lrf6,e,igma,e,djtu,,nabki,d, p,c:scoe,dd
  35.  
  36.  
  37.  
  38. ppu}ur  toj'sceavesb dtyaulhnricae 'r j hoeocc lohos rpi{arcna 5av ;du 
  39. :v ; akrir,en jgti,e
  40.   :;s  gt onr oi
  41.  
  42. gbine
  43.  
  44. 'c=;':
  45. =k0;:
  46. of orooddrt (  )ai1][:=0
  47. gbine
  48. ] ,;i j)[v,eaacd(lo
  49. ] in= [e'iah-f(t' r))no)oo)'rt',((+'a('=[c=]io]i]di[=e[a'=a(.0(r')ro)o
  50. : =;k 1
  51. den;
  52.  
  53. of orooddrt (  )bi1][:=0
  54. gbine
  55. ] ,;i j)[v,ebacd(lo
  56. ] in= [e'ibh-f(t' r))no)oo)'rt',((+'b('=[c=]io]i]di[=e[b'=b(.0(r')ro)o
  57. : =;k 1
  58. den;
  59.  
  60.  ic;nf:'e =ahk'bt=cy 1h
  61.  
  62. den;
  63.  
  64.  
  65.  
  66.  
  67. ep ;rrotuosadceke
  68.  
  69. iv:;najrtr,ee ig
  70. s t;:rgc6in
  71.  
  72. gbine
  73.  
  74. = ';:c'
  75. = :;0j
  76. : =;da0
  77. ( d;air)[:o]0=
  78. t oo(wndih  =ie)0l
  79. g enib
  80. ] ,;i k)[v,eaacd(lo
  81. e dn= oe0ich f t
  82. e gnb i
  83. a [;= ic: ]+c
  84. e h;n t1   +ai0ddf=a: j=
  85. n e;d 
  86. a (;[  1iir=]fo:=  j'() ,a'n'[.e)i'h ]=t
  87. = i;: -1i
  88. n d;e
  89. h e;tin0 f =0 a:=jd
  90. ] 1;=i[c'fa+- (]'( 1)ar[ [oat1 =h]):e='cn'+ 
  91. = :;ca
  92.  
  93.  
  94. = ';:c'
  95. = :;0j
  96. : =;db0
  97. ( d;bir)[:o]0=
  98. t oo(wndih  =ie)0l
  99. g enib
  100. ] ,;i k)[v,ebacd(lo
  101. e dn= oe0ich f t
  102. e gnb i
  103. b [;= ic: ]+c
  104. e h;n t1   +bi0ddf=b: j=
  105. n e;d 
  106. b (;[  1iir=]fo:=  j'() ,b'n'[.e)i'h ]=t
  107. = i;: -1i
  108. n d;e
  109. h e;tin0 f =0 b:=jd
  110. ] 1;=i[c'fb+- (]'( 1)br[ [obt1 =h]):e='cn'+ 
  111. = :;cb
  112.  
  113. b do w<deha lid
  114. g enib
  115. b =;+ :'' b0
  116. = :;b d1d b+
  117. n d;e
  118. e s}de  4ty{3in
  119. a do w<dehb lid
  120. g enib
  121. a =;+ :'' a0
  122. = :;a d1d a+
  123. n d;e
  124.  
  125. = :;acdd
  126.  
  127. = ';:c'
  128. a =;[a:]1p
  129. )  ;'it'-fh+' e'=nn=po :atap(
  130. b =;[b:]1p
  131. )  ;'it'-fh+' e'=nn=po :btbp(
  132. = ';:c+'p
  133.  
  134. = :;0j
  135. = ';:c'
  136.   ooofrdtod  r()1 a]=i[0:
  137. g enib
  138. ( a;r [1oii=)f]:' =j0n' 'o-n=t'e]()hi()t[a 
  139. n e;  h]citi:f [= 1acj=+
  140. n d;e
  141. = :;ca
  142.  
  143. = :;0j
  144. = ';:c'
  145.   ooofrdtod  r()1 b]=i[0:
  146. g enib
  147. ( b;r [1oii=)f]:' =j0n' 'o-n=t'e]()hi()t[b 
  148. n e;  h]citi:f [= 1bcj=+
  149. n d;e
  150. = :;cb
  151.  
  152. h e;tin' f 0' a''a:==
  153. h e;tin' f 0' b''b:==
  154.  
  155. den;
  156.  
  157.  
  158.  
  159. npa; rsteo_arcokuesed
  160. iv:;najrtr,ee ig
  161. s t;:rgc6in
  162.  
  163. gbine
  164.  
  165. = ';:c'
  166. = :;0j
  167. : =;da0
  168. ( d;air)[:o]0=
  169. t oo(wndih  =ie)0l
  170. g enib
  171. ] ,;i k)[v,eaacd(lo
  172. e dn= oe0ich f t
  173. e gnb i
  174. a [;= ic: ]+c
  175. e h;n t1   +ai0ddf=a: j=
  176. n e;d 
  177. a (;[  1iir=]fo:=  j'() ,a'n'[.e)i'h ]=t
  178. = i;: -1i
  179. n d;e
  180. h e;tin0 f =0 a:=jd
  181. ] 1;=i[c'fa+- (]'( 1)ar[ [oat1 =h]):e='cn'+ 
  182. = :;ca
  183.  
  184.  
  185. = ';:c'
  186. = :;0j
  187. : =;db0
  188. ( d;bir)[:o]0=
  189. t oo(wndih  =ie)0l
  190. g enib
  191. ] ,;i k)[v,ebacd(lo
  192. e dn= oe0ich f t
  193. e gnb i
  194. b [;= ic: ]+c
  195. e h;n t1   +bi0ddf=b: j=
  196. n e;d 
  197. b (;[  1iir=]fo:=  j'() ,b'n'[.e)i'h ]=t
  198. = i;: -1i
  199. n d;e
  200. h e;tin0 f =0 b:=jd
  201. ] 1;=i[c'fb+- (]'( 1)br[ [obt1 =h]):e='cn'+ 
  202. = :;cb
  203.  
  204. a d;=c+d:db
  205.  
  206. = ';:c'
  207. a =;[a:]1p
  208. )  ;'it'-fh+' e'=nn=po :atap(
  209. b =;[b:]1p
  210. )  ;'it'-fh+' e'=nn=po :btbp(
  211. = ';:c+'p
  212.  
  213. = :;0j
  214. = ';:c'
  215.   ooofrdtod  r()1 a]=i[0:
  216. g enib
  217. ( a;r [1oii=)f]:' =j0n' 'o-n=t'e]()hi()t[a 
  218. n e;  h]citi:f [= 1acj=+
  219. n d;e
  220. = :;ca
  221.  
  222. = :;0j
  223. = ';:c'
  224.   ooofrdtod  r()1 b]=i[0:
  225. g enib
  226. ( b;r [1oii=)f]:' =j0n' 'o-n=t'e]()hi()t[b 
  227. n e;  h]citi:f [= 1bcj=+
  228. n d;e
  229. = :;cb
  230.  
  231. h e;tin' f 0' a''a:==
  232. h e;tin' f 0' b''b:==
  233.  
  234. den;
  235.  
  236.  
  237.  
  238.  
  239.  pd;ereyrosnuceidet
  240.  
  241. iv ;na:rtr ee sg
  242.  
  243. gbine
  244.  
  245.  
  246. 0i>n fdet ch
  247. gbine
  248.  
  249. : =;p ''c
  250. = ]n' 1e-i[h'fct  
  251. e gnb i
  252. : =;d '' 
  253. : =;p ''c -
  254. c (;[ d]0 rs]fo[)o c ro+d tdos = :2:d=
  255. : c;=  d
  256. n e;d 
  257.  
  258. = :;' d'
  259. d (;r c)oi[]=:0
  260. : =;j 0
  261. o ton (d wi eh=)li0
  262. e gnb i
  263. c [;= id: ]+d
  264. = :;j j1+ 
  265. h e;t nd   +did'cf:,= ='j
  266. = :;i i1- 
  267. n e;d 
  268.   joe <dlwc ihd
  269. e gnb i
  270. = ';: 0dd '+ 
  271. : =;j j1  +
  272. h t;e  dn d+  c'di=,:fj'= 
  273. n e;d 
  274. t  ;h 'dei,+nf''  =0dd]':[1=
  275.  
  276. : =;c d
  277.  
  278. d (;r c)oi[]=:0
  279. = :;' d'
  280. : =;j 0
  281. o ton (d wi eh=)li0
  282. e gnb i
  283. = ';] 01i '=[ ):ci j(ft t hnone
  284. e h;n td   +d 1]:i=i=fj[c 
  285. : =;i i1  -
  286. n e;d 
  287. : =;c d
  288. d (;r c)oi[]=:0
  289. = ]n' ie,i[h'fct  
  290. e gnb i
  291. : d;=  '' 
  292. i -;  1]o  st d[ foc1o +=rdd: :=s
  293. c :;  =d 
  294. n e;d 
  295.  
  296. h t;e  cni'+ f-'c '-:c='=p
  297.  
  298. den;
  299.  
  300. t h;  e'' n0'i '=fc=c :
  301. t  ;h ''e -0ni'' f==c c:
  302.  
  303. den;
  304.  
  305.  
  306.  
  307.  
  308.  
  309. np ;aretsore_cusdede
  310.  
  311. iv ;na:rtr ee sg
  312.  
  313. gbine
  314.  
  315. =ip;'fb'+ (+'( ')ad= pn:t=aph' ce+) n'
  316. =ip;'fb'- (-'( ')ad= pn:t=aph' ce+) n'
  317. =ip;'fb'+ (-'( ')ad= pn:t=aph' ce-) n'
  318. =ip;'fb'- (+'( ')ad= pn:t=aph' ce-) n'
  319.  
  320.  
  321. 0i>n fdet ch
  322. gbine
  323.  
  324. = :;' d'
  325. d (;r c)oi[]=:0
  326. : =;j 0
  327. o ton (d wi eh=)li0
  328. e gnb i
  329. c [;= id: ]+d
  330. = :;j j1+ 
  331. h e;t nd   +did'cf:,= ='j
  332. = :;i i1- 
  333. n e;d 
  334.   joe <dlwc ihd
  335. e gnb i
  336. = ';: 0dd '+ 
  337. : =;j j1  +
  338. h t;e  dn d+  c'di=,:fj'= 
  339. n e;d 
  340. t  ;h 'dei,+nf''  =0dd]':[1=
  341.  
  342. : =;c d
  343.  
  344. d (;r c)oi[]=:0
  345. = :;' d'
  346. : =;j 0
  347. o ton (d wi eh=)li0
  348. e gnb i
  349. = ';] 01i '=[ ):ci j(ft t hnone
  350. e h;n td   +d 1]:i=i=fj[c 
  351. : =;i i1  -
  352. n e;d 
  353. : =;c d
  354. d (;r c)oi[]=:0
  355. = ]n' ie,i[h'fct  
  356. e gnb i
  357. : d;=  '' 
  358. i -;  1]o  st d[ foc1o +=rdd: :=s
  359. c :;  =d 
  360. n e;d 
  361.  
  362. den;
  363.  
  364. h t;e  cni'+ f-'c '-:c='=p
  365.  
  366.  
  367. den;
  368.  
  369.  
  370.  
  371.  
  372.  
  373.  
  374.  
  375.  pe;rrrlooulzcdide
  376. gbine
  377.  
  378. : =;ps0
  379. ( b;di[1rf0=o ]:<o)p)r s]dt 0(hn[ae
  380. = :;0k
  381.   n)lie]:fh0= t[os arp0(d=
  382. o r;=ed):l(]lsb0 e[
  383.  
  384. ( bodw[drhk oi])=l)))e)1]  +k(al[(n<aodk(r (d
  385. g enib
  386. = k;: +1k
  387. n d;e
  388.   on=ire)fdh] (t0ob [r[)ad0](
  389. g enib
  390. ] k;, [)i ae,v(dcalo
  391. ] k;, [)j be,v(dcalo
  392. t h;  e1j n=<i :ifsp 
  393. n d;e
  394.  
  395. = 1npi esfth 
  396. g enib
  397. : c;=  a
  398. : a;=  b
  399. : b;=  c
  400. n d;e
  401.  
  402. = ';:c'
  403. d (;rwacoh[+<i0')l]0]e)'0  =[od:croc(d 
  404. = :;0m
  405. d (;rwaboh[+<i0')l]0]e)'0  =[od:brob(d 
  406. ( d;air)[:o]0=
  407.  
  408.  
  409.  
  410. t oo(wndih  =ie)0l
  411. g enib
  412. ] ,;i j)[v,eaacd(lo
  413. ] ,;i k)[v,ebacd(lo
  414. j -;= km:l-
  415. < 0nl  e ithf
  416. e gnb i
  417. = :;l l0+  1
  418. m :;  =1 
  419. e nd 
  420.   e;m s0:el=
  421. l ,;( k)rsust
  422. = k;: u]]cs1i[[
  423. = i;: -1i
  424. n d;e
  425.  
  426.  
  427. k  }of{ r:le=2uk09nc; e 
  428. = ';:d'
  429.   ooofrdtod  r()1 c]=q[0:
  430. g enib
  431. ' 0;= '1]i)=qf :[ tfcnh (oent
  432. n e;  h]ditq:f [= 1cdf=+
  433. n d;e
  434. = :;dc
  435.  
  436. ' =;+ipc'fc+) (' ( -tsd'hpn=e=a:n1 c )
  437. ' =;-ipc'fc+) (' ( -tsd'hpn=e=a:n0 c )
  438.  
  439.  
  440.  
  441. den;
  442.  
  443.  
  444.  
  445.  pe;srrtooutucdece
  446. gbine
  447.  
  448.  
  449. d (;rwbaoh[+<i0')l]0]e)'0  =[od:aroa(d 
  450. d (;rwaboh[+<i0')l]0]e)'0  =[od:brob(d 
  451. = :;0m
  452. = :;ac
  453. ( d;air)[:o]0=
  454. t oo(wndih  =ie)0l
  455. g enib
  456. ] ,;i j)[v,eaacd(lo
  457. ] ,;i k)[v,ebacd(lo
  458. j +;= km:l+
  459. > 9nl  e ithf
  460. e gnb i
  461. = l;: -0l 1
  462. : m;=  1
  463. e nd 
  464.   e;m s0:el=
  465. l ,;( k)rsust
  466. = k;: u]]cs1i[[
  467. = i;: -1i
  468. n d;e
  469. n e; ihccft+:  '=m11'=
  470.  
  471. h e;tinc f +' c'-c:-'p='=
  472.  
  473. den;
  474.  
  475.  
  476.  
  477.  
  478.  
  479. epr; rubnodoaces
  480.  
  481. ,vj;ia r,r:er  g,n eo,it,pn
  482. t s;r  ]i :0n  1gcx[
  483.   :;x  gb sn, tixar
  484.  
  485. gbine
  486. (ib;d:[)r=0]o
  487. =p0;:
  488. 'd=;':
  489. tw(oohidni=  l0)e
  490. gbine
  491. ] ,;i k)[v,ebacd(lo
  492. d (;r a)oj[]=:0
  493. = :;' c'
  494. : =;o 0
  495. o ton (d wj eh=)li0
  496. e gnb i
  497. n :;  =0 
  498. j ];[ ,)a le( ,dlvcoa
  499. o t;   lk 1+  =ndf:=oom: r n
  500. t h;  eo0 n+>  noin= f:
  501. o :;  =0 
  502. e lo  idn h > w9
  503. b en  gi 
  504. = :;nn0-61
  505. : =;oo16+
  506. e  ;n  d
  507. ( r;n t), sxc 
  508. = :;c ccx  +
  509. : =;j j1  -
  510. n e;d 
  511. o (;, r)cstx
  512. e h;n tc i +cf0x: >c=o
  513. > 0np  e ithf
  514. e gnb i
  515.   o;p t'   0d 1'of=+ o:ccrr=: 
  516. n e;d 
  517.  
  518.   tc' h='ie:=fndd  
  519. l ees 
  520. e gnb i
  521.  
  522. x :;a =a 
  523. x :;b =b 
  524. : a;=  c
  525. : b;=  d
  526. e s;k ota 
  527. u c;o ets t
  528. : d;=  c
  529. : =;a ax 
  530. : =;b bx 
  531.  
  532. n e;d 
  533. = i;: -1i
  534. = p;: +1p
  535. den;
  536.  
  537. =cd;:
  538.  
  539.  
  540.  
  541.  
  542. den;
  543.  
  544.  
  545.  
  546.  
  547.  
  548. ,fb;aubgan:n(csitttreirtcoisunn:o g)s
  549.  
  550. gbine
  551.  
  552. = a;:aa
  553. = b;:bb
  554.  
  555. r a;honac
  556. c hn'iye=fbhc at(n' to)
  557. g enib
  558.  
  559. k e;aost
  560.  
  561. : =;ua0
  562. p =;bi''(f--  ''d()=na :aptp =hc)'e '-n
  563. d nn iae(f hb )tp(' =a-)'p''+=
  564. g enib
  565. : =;p ''c -
  566. u :;a =1 
  567. z d;o ilr l
  568. c e;u tco :=s
  569. n d;e
  570. d nn iae(f hb )tp(' =a+)'p''-=
  571. g enib
  572. u :;a =1 
  573. z d;o ilr l
  574. c e;u tco :=s
  575. n d;e
  576.  
  577.  
  578. e h;nitt f ts 0eoa=cuu
  579.  
  580. t e;idsyne
  581.  
  582. n d;e
  583. e t;cs:cuo=
  584.  
  585. den;
  586. }{
  587.  
  588.  
  589.  
  590.  
  591.  
  592.  
  593.  
  594. ,fb;aubgan:n(csilttriirtdoisznn:o g)r
  595.  
  596. gbine
  597.  
  598. = a;:aa
  599. = b;:bb
  600.  
  601. r a;honac
  602. c hn'iye=fbhc at(n' to)
  603. g enib
  604.  
  605. e k;s ato
  606.  
  607. : =;ua0
  608.  
  609. p =;bi''(f--  ''d()=na :aptp =hc)'e '-n
  610. d nn iae(f hb )tp(' =a-)'p''+=
  611. g enib
  612. : =;p ''c -
  613. u :;a =1 
  614. u c;o ets t
  615. d i;z lco :=r
  616. n d;e
  617. d nn iae(f hb )tp(' =a+)'p''-=
  618. g enib
  619. u :;a =1 
  620. u c;o ets t
  621. d i;z lco :=r
  622.  
  623. n d;e
  624.  
  625. e h;nitl f lr 0ioa=dzu
  626.  
  627. t e;idsyne
  628.  
  629. n d;e
  630. i l;dr:czo=
  631.  
  632. den;
  633. }{
  634.  
  635.  
  636.  
  637.  
  638. bfb;,u:gansnacti(trrtiitaonsrng:k )
  639.  vi;:anr rtea egg
  640.   s;: t]  r0b i1xxn[,ag
  641.  
  642. gbine
  643.  
  644. aa=;a:
  645. bb=;b:
  646.  
  647. r a;honac
  648. c hn'iye=fbhc at(n' to)
  649. g enib
  650.  
  651.  
  652. sne;oakt_sa
  653. =gc;:ad
  654. =xa;:ap
  655. =xb;:bp
  656.  
  657. ons;ba
  658.  
  659. =ax;:pa
  660. =bx;:pb
  661. =cg;:da
  662. end;sa_tes
  663.  
  664. den;
  665.  
  666. :kt;=rac
  667.  
  668. oen}kne  dcb{; o ns7a
  669.  
  670.  
  671.  
  672. bfb;,u,gcnanccai:t(rsihttousrno:i r)nokg
  673. gbine
  674.  
  675.  
  676. aa=;a:
  677. ab=;a:
  678.  
  679. r a;honac
  680. c hn'iye=fbhc at(n' to)
  681. g enib
  682.  
  683.  
  684. sne;oakt_sa
  685.  
  686. {
  687. nwl;(re)aitp
  688. nwl;(re)aitd
  689. lwn;er()tia
  690. }
  691.  
  692.  
  693. dvb;,a,)clbeo(bd
  694. ,vc;]ad)1l,e[(cdcco
  695. dia};f=   :ybdt8dbn> a{ant desk hnot
  696. hie;tfn2   =1cc:>dd
  697.  
  698.  
  699. (waothddoi= nlb) ed
  700. gbine
  701. d (;r a)oi[]=:0
  702. : =;k 0
  703. ] ,;i j)[v,eaacd(lo
  704. c (;d  1=id=2fn:) ak (  tj)nh>4e
  705. c (;d  1=id=1fn:) ak (  tj)nh>0e
  706.  
  707.   {
  708. e l;t n)iw(jr
  709. e l;t n)iw(kr
  710.   }
  711.  
  712. = :;' c'
  713. [ 0;a ]](f)mdo-[rr1ao  + mdco:o=t= : 1c
  714. : =;a c
  715.  
  716. = 1nk  e ithf
  717. e gnb i
  718. : =;l 1
  719. o ton (d wl eh=)lii
  720. e gnb i
  721. l -;] i), [ejvad,a(ocl
  722. = :;j jk+ 
  723.  
  724.   00t 1=h <:eijknf  
  725. e le  s
  726. e bng  i
  727. k :;  =1 
  728. = :;j j0-  1
  729. e n;  d
  730. j (;, r)k tsus
  731. : ];= l]k -1uai[s[
  732. = :;l l1+ 
  733. n e;d 
  734. n e;d 
  735.  
  736.  2}  1 ;iiaf{n+  e'kkc1=oe'1rt= ee:tkrahcp ee n
  737. = a;: d1da-
  738. den;
  739.  
  740. =ca;:
  741. 'b=;+p:'
  742. =cb;:dd
  743. =b:;0d
  744. eih;nft'   0cc'':='=
  745. end;sa_tes
  746.  
  747. den;
  748.  
  749. hou;:koc=r
  750.  
  751. eec}nn  odohk;ku  ro{
  752.  
  753.  
  754.  
  755.  
  756.  
  757. ,fb;aubgan:n(csiottrnirteoislnn:e g)d
  758.  
  759. ,vk;jakgjr,n, liihlrih t,,:sqq 
  760. , j;i ,r, kez ,g ade:ddt dbni,
  761.   p;:pr 6cac1h
  762.  
  763. gbine
  764.  
  765. aa=;a:
  766. bb=;b:
  767.  
  768. r a;honac
  769. c hn'iye=fbhc at(n' to)
  770. g enib
  771.  
  772.  
  773. sne;oakt_sa
  774. 0a';:+'6=a
  775. aad;=d+6:
  776. =a:;addd
  777. =b:;bddd
  778. =i';pf+'b '+(()' a =dpt:n=hpa'ep +nc)' 
  779. =i';pf+'b '-(()' a =dpt:n=hpa'ep -nc)' 
  780. =i';pf-'b '-(()' a =dpt:n=hpa'ep +nc)' 
  781. =i';pf-'b '+(()' a =dpt:n=hpa'ep -nc)' 
  782.  
  783. 'a=;+p:'
  784. 'b=;+p:'
  785. 'c=;':
  786. =h:;ah
  787. 'a=;':
  788. =z0;:
  789. =k';:k'
  790.  
  791. ofro oddor( t h) ih]1:[0=
  792. gbine
  793. + h;a h]=a[i:
  794. : i;= ia
  795. : j;= jb
  796. i l;d ()zcijo:ijr=,
  797. = :;i ai
  798. = :;j bj
  799.  
  800.   {
  801. ( n;' l)xwe'xrtxxi
  802. e l;t n)iw(ar
  803.   }
  804.  
  805.  
  806. 1 ]n[ =eci'h(f-tt ' on)
  807. e gnb i
  808. : j;=  01 
  809. k :;  =1 
  810.  
  811. e lo  idk h = w1
  812. b en  gi 
  813. : =;jj16-
  814. ( r;jt),6sii
  815. j j;:b=6
  816. q q;:a=6
  817.    
  818. r a;kt)=6(b:i,iii
  819. : b;=ii6
  820. d i;zl)o6(irqi=cq,:
  821. : b;=jj6
  822. : a;=qq6
  823.  
  824. 6 {
  825. t e;il)r6naw(
  826. e t;li)n6ri(wi
  827. t e;il)r6ncw(
  828. e a;rdn6l
  829. 6 }
  830.  
  831. [ 1nc]e(6=ht'toi- nf') 
  832. b engi6
  833. ( r;jt),8sii
  834. = :;kkik8ki+
  835. l l;:c=8
  836. o to  do91 r=)df:](ol0ar [
  837. b engi8
  838.   );t1]h0+le1i[n<a il+lf(ll tl:no=
  839. e ;n8d
  840. : a;=ll8
  841. z :;=18
  842. k :;=08
  843. e ;n6d
  844.  
  845. e  ;n  d
  846.  
  847. i t;r e)w lk  nk {(
  848. e a;rdn6l
  849.    } 
  850.  
  851. e nd 
  852. l ees 
  853. e gnb i
  854.  
  855. n e;  h'k t0ki ':f1+= =kkz
  856.  
  857. n e;d 
  858.  
  859. nee}onc kd i ;s { myyk12c
  860.  
  861.  
  862. =k0;:
  863. of orooddrt (  )ai1][:=0
  864. gbine
  865. , ];jvi),a[eclado(
  866. )  ;0it1=fh=j e:(nnkto 
  867. den;
  868. =is;:fo)k u'kkc1 =e'n1t,e (khtk
  869. dcd;+dadb:=d
  870. kc=;k:
  871. end;sa_tes
  872. hie;tfnc   +'ccp-p:p'p=c=
  873.  
  874. den;
  875.  
  876. odn;:eec=l
  877.  
  878. oen}kne  dci{; n de1el2
  879.  
  880.  
  881.  
  882.  
  883. af:;ausg(ntnocriltirsintiogscn): 
  884. :v ; a rkrie, ngjite,
  885.   k;: ar  nac zh
  886.  
  887. gbine
  888. aa=;a:
  889. 'c=;':
  890. =k0;:
  891. =z:;'nk'xa
  892.  
  893. of orooddrt (  )ai1][:=0
  894. gbine
  895. ] ,;i j)[v,eaacd(lo
  896. r (no ae)i[h'fit- ])'(=)=('']c.,io''[d)=aeo](=rir0([o)a
  897. + c;a =][c:i
  898. den;
  899.  
  900. =ac;:
  901. 'c=;':
  902. hie;tfn'   -'az'-[n='1a:=]k
  903. of orooddrt (  )ai1][:=0
  904. gbine
  905. ] ,;i j)[v,eaacd(lo
  906. = 'n] .eii'h[f)ta o)((r)r(('oca,)o['0di==e]
  907. + c;a =][c:i
  908. den;
  909.  
  910. =ac;:
  911. (ic;d:[)r=0]o
  912. =k0;:
  913. 'c=;':
  914. iw o>hed0il 
  915. gbine
  916. ] ,;i j)[v,eaacd(lo
  917. h e;t nc i +0fc]= :iec=[doa
  918. i [n] ae=i(h'f t, r '(o))( 0)a)= ['kai.(n]' d=
  919. e gnb i
  920. k :;  =1 
  921. = ';: ,cc '+ 
  922. n e;d 
  923. = i;: -1i
  924. den;
  925.  
  926. hit;ef cn '+ c,'c['0:1='=]
  927. ]i0n)f[e] ch=c(t'[d ,or'
  928. gbine
  929. = :;ca
  930. = ';:c'
  931. 0 [;]fa])o(i-rd[1 ra io+d: co=o= 1t:c 
  932. den;
  933.  
  934. tih; fec  n+'z '-nc-'a:'=k=
  935.  
  936. oc:;li=cs
  937. den;
  938.  
  939.  
  940.  
  941. afa;(u:gsnsnictictrr_iitnonseng:p )
  942. jvj;:a,r rkei ,gnijet,
  943.  
  944. gbine
  945.  
  946. aa=;a:
  947.  
  948. =k0;:
  949. 'c=;':
  950. =j0;:
  951. (ia;d:[)r=0]o
  952. tw(oohidni=  l0)e
  953. gbine
  954. a [n( 0edi]hrf)to - >i3
  955. e gnb i
  956. o  nr )e  'h( ,tai' [f=)i ]'](i.=a['
  957. b en  gi 
  958. k :;=15
  959. j :;=i5
  960. e  ;n  d
  961. n e;d 
  962. , ];j i)jv[e,aadcl(o
  963. t h;  ec)in+0f ]= cie(:[dc=ao
  964. = i;: -1i
  965. den;
  966.  
  967.  
  968.  in;cfe': h0=kt0c= '+0
  969. [i0;af]'( )0d(-'rk1+o=)c=1 =j)t:( hc ae dnn
  970. [ia;0f('] d0)(r0)ko' ==+t1jch)(=e  :nadc n
  971.  
  972. =ac;:
  973. =k0;:
  974. 'c=;':
  975. of orooddrt (  )ai1][:=0
  976. gbine
  977. 0 ';'i=1)f]=  i:tn[khoa et(n
  978. n  ;eic]hf:it =[ kca1=+
  979. den;
  980. eih;nft'   0cc'':='=
  981.  
  982. ips;ce:c_n=
  983. den;
  984.  
  985.  
  986.  
  987.  
  988. afa;(u:gnnsnectiptrr_iitsonsing:c )
  989.  v ;ia:rnrjet ,gei
  990.  
  991. gbine
  992.  
  993. aa=;a:
  994. ab=;a:
  995. aor;ncha
  996. hicnyf'eb =hanct'o( )t
  997. gbine
  998.  
  999. 'c=;':
  1000. of orooddrt (  )ai1][:=0
  1001. gbine
  1002. , ];jvi),a[eclado(
  1003. h e;tin] f i  c[0c:a=o=+edc
  1004. den;
  1005.  
  1006. =ac;:
  1007. 'c=;':
  1008. (ia;d:[)r=0]o
  1009. tw(oohidni=  l0)e
  1010. gbine
  1011. [ a;i =c]c:+
  1012. - 1;)  c]it+0fh'[ e,ain'(= =doc:r
  1013. - 4;)  c]it+0fh'[ e.ain'(= =doc:r
  1014. - 7;)  c]it+0fh'[ e.ain'(= =doc:r
  1015. 1 -;0 )c i]+tf0'h [.eia'n=(= od:cr
  1016. 1 -;3 )c i]+tf0'h [.eia'n=(= od:cr
  1017. 1 -;6 )c i]+tf0'h [.eia'n=(= od:cr
  1018. 1 -;9 )c i]+tf0'h [.eia'n=(= od:cr
  1019. = i;: -1i
  1020. den;
  1021. =j1;:
  1022. )i'; f.2t '=h(=:ec]jn[1 
  1023. 'a=;':
  1024. [f0;co]](r)id  [ridco:o+ = aoja=t :
  1025. <w);2h]a i0+dl['oea0  ('aod=:r
  1026. ti ;hf3ae <+no)' r],ad00:(['=a
  1027.  it;4fha< e+)on']r 00da'[(:=a
  1028. =ca;:
  1029.  
  1030. den;
  1031. ecn;pi:c_s=
  1032. den;
  1033.  
  1034.  
  1035.  
  1036. :fa;iuagnn(ntcmieturgitteoasrnd:) 
  1037. evn;da,d,rtrc yoirdwsoe ekn:m, 
  1038.  
  1039. gbine
  1040.  
  1041. sGi;eec)mt,n,Ddekaedotnyre,t(
  1042. 'c=;':
  1043. 'b=;':
  1044. osk;rt,)(rb
  1045. ti bhf2=e  :na>c a
  1046. [eb;3l=]]s:4+ec[b 
  1047. .c';':+c=
  1048. ssi;etc)mr,b(
  1049. hit;ef bn 0+ m1'be<0:sc'=i
  1050. 'c+;.:bc'=+
  1051. esn;dt,)(rb
  1052. eih;nftb   +bd0':e10=n<'
  1053. bc+;=:c
  1054. md:;ua=ct
  1055.  
  1056.  
  1057. den;
  1058.  
  1059.  
  1060.  
  1061.  
  1062.  
  1063. if:;nuagtnanec(igtsreiatrocs)n :
  1064. hvu;,andsrdr,  omh:w,h 
  1065.  
  1066. gbine
  1067.  
  1068. ,Gm;he,)htsd(T,neihum
  1069. 'c=;':
  1070. 2i>n faet ah
  1071. gbine
  1072. ( s;r ,)tsb
  1073. e h;n tb i +bf0': 10=s<'
  1074. ' :;= 'b:c+
  1075. den;
  1076. ms,;(tb)r
  1077. nie; fhbb t+:m '=<00'1
  1078. 'c+;::bc'=+
  1079. hsh;,t()br
  1080. ein;hf bt b+ h:'0h=01<'
  1081. bc+;=:c
  1082. :c=;sac
  1083.  
  1084. den;
  1085.  
  1086.  
  1087.  
  1088.  
  1089. af,;aubg(nbnsc:iutsrlittpors_ni:t n)adg
  1090. cvi;,asrrreeo mgk ,e,iutp,nnljdiu,, sdn: e
  1091. d  ;a:]p6 5,s1dkt[aurgrsin,
  1092.  
  1093.  
  1094.  po}{rc ohm8crueat dna;uadtr  devt_ saaotdncu ahpur
  1095. iv ;na:rtr ee ig
  1096.  
  1097. gbine
  1098.  
  1099.  
  1100. 'p=;oa:'kd
  1101. =k:;'us'
  1102. ofro oddor( t a) ia]1:[0=
  1103. gbine
  1104. ] ,;ivj)[a,ealcda(o
  1105. s u}+ik af=za :e[csmiouz]dke;e b =n 0e{1 h1t
  1106. n e; ih]kftiu  [sa'a:a.a=['+ki=su]
  1107. den;
  1108.  
  1109.  
  1110. kiu;(:s)d=[]ro0
  1111. pia; fd'n :aei=bh<'yt6ch 
  1112.  
  1113. urk;sa=][d:1
  1114. =i]n'f2e. [h'kst u
  1115. gbine
  1116. ' +;0 r''ra.=ad':d+
  1117. a r'd  .:in'=fe+r h]akt3du [+s's'[.u04'k']=+
  1118. u k;s +'[ed.3la']sr++e=]k :4urd[sa
  1119. ned
  1120. sele
  1121. gbine
  1122. k +;u d'sra.[ar'2d=+]:
  1123. a r'd  .:in'=fe+r h]akt4du [+s's'[.u05'k']=+
  1124. u k;s +'[ed.4la']sr++e=]k :5urd[sa
  1125.  
  1126. den;
  1127.  
  1128. aid]rf:i  =[nkrseuauhsdkt[++ ik]'-u1.2s-'][i=
  1129. sele
  1130. gbine
  1131. uis]kf[i+ i[dk-sau3urs]k=[++:ik]d-u1a4s-r][i =i[n'-se.2uh']kt +
  1132. =e:;'ld'csaahepby 
  1133. den;
  1134.  
  1135. =kr;:uads
  1136.  
  1137.  
  1138. ]v,;1ai)[l,es(cduko
  1139. hie;tfn'   a)npb0oay=tdhe(:cdc='o
  1140. ]v,;2ai)[l,es(cduko
  1141. hie;tfn'   a)npb0oay=tdhe(:cdc='o
  1142. ]v,;4ai)[l,es(cduko
  1143. hie;tfn'   a)npb0oay=tdhe(:cdc='o
  1144. ]v,;5ai)[l,es(cduko
  1145. hie;tfn'   a)npb0oay=tdhe(:cdc='o
  1146. ]v,;7ai)[l,es(cduko
  1147. hie;tfn'   a)npb0oay=tdhe(:cdc='o
  1148. ]v,;8ai)[l,es(cduko
  1149. hie;tfn'   a)npb0oay=tdhe(:cdc='o
  1150. [i0nsf]eu )hko>t(r8 d
  1151. gbine
  1152. ] 9;,v[)iase,ludc(ko
  1153. h t;ei 'nf)a  0bpn=yaoehdtdc:(o'=c
  1154. 0 ];1v,)[aiesl,du(cok
  1155. h t;ei 'nf)a  0bpn=yaoehdtdc:(o'=c
  1156. den;
  1157. [is;6fu'] ka=n(b'o y.tdh'(nc)(a')k = u):ts'dh[.ae3'pn]= 
  1158. svu;[ak)2l+e](]d,k1oiu[c,s
  1159. pi ;afn'd ea:ihb=>ty'3 hc1
  1160. svu;[ak)5l+e](]d,k4oiu[c,s
  1161. pi ;afn'd ea:ihb=>ty'1 hc2
  1162.  
  1163.  
  1164. nee}onc kd y ;on{ cahr6
  1165.  
  1166.  
  1167.  
  1168.  pk;erarrolaucedden
  1169. gbine
  1170.  
  1171. t h; ie11fn3=  =cmd:ienus
  1172. t h; ie82fn2=  =cmd:ienus
  1173. t h; ie13fn3=  =cmd:ienus
  1174. t h; ie04fn3=  =cmd:ienus
  1175. t h; ie15fn3=  =cmd:ienus
  1176. t h; ie06fn3=  =cmd:ienus
  1177. t h; ie17fn3=  =cmd:ienus
  1178. t h; ie18fn3=  =cmd:ienus
  1179. t h; ie09fn3=  =cmd:ienus
  1180. t  ;hi01ef13n == mc:deiuns
  1181. t  ;hi10ef13n == mc:deiuns
  1182. t  ;hi21ef13n == mc:deiuns
  1183.  
  1184. den;
  1185.  
  1186.  
  1187.  
  1188.  
  1189.  pv;eryiroptucocdec
  1190. gbine
  1191.  
  1192. nde;+edspn=ul:
  1193. nkd;eaarl
  1194. uwno<hdddi  elen
  1195. gbine
  1196.  
  1197. nkd;eaarl
  1198. edn;de-u=ndn:
  1199. mme;=es1:si+cic
  1200.  
  1201. >icn1fie2 sh met
  1202. gbine
  1203. c i;:ms1=e
  1204. r =;or:1kok+
  1205. den;
  1206.  
  1207. den;
  1208.  
  1209. nee}onc kd u ; t  vc{yo7p
  1210.  
  1211.  
  1212.  
  1213.  
  1214.  
  1215. gbine
  1216.  
  1217. =d:;'as'ctuah_lbyp
  1218. uvl;sap),l,ec(bdob
  1219. =ien0fde  ohtc
  1220. gbine
  1221.  
  1222. noa;ac_trhd
  1223.  
  1224. ci'nhf=ey dhbnataop 't()
  1225. gbine
  1226.  
  1227. kiu;(:s)d=[]ro0
  1228. ni }ef h 6ktk1o ur's{ .[ y'ikk=-rt]2a
  1229. gbine
  1230. s [;uv8)ka]e+l,d](ro7koc[uk,s
  1231. [ 5;sv])ua,eklmd+(eo]ksc4ui,[sc
  1232. s [;uv2)ka]e+l,d](do1kec[un,s
  1233.  
  1234. c o;cvpity
  1235.  
  1236. : =;dr''a
  1237. n  ;eir0hfo0t k1 r:-9o=k9kro>
  1238. n e;,sd)kt(sur
  1239. n  ;eikshfuut sk d:+0e='1n'0<
  1240. u k;sr='+a:.'d
  1241. i s;cse),tmskr(u
  1242. e n;hi stfku  uk0ms+1e:'<s=0ci'
  1243. + d;kra'uar.sd='+:
  1244. k o;,sr)kt(sur
  1245. n  ;eikshfuut sk r:+0o='1k'0<
  1246. a r;dr=s+a:ukd
  1247.  
  1248. ned
  1249. sele
  1250. db }le{ ogkui3ohn1ry  
  1251.  
  1252. [ s;9vu)]ake+l+dk(]ouk8csu[,[ssk1[uo07kr]]+,
  1253. [ 5;sv])ua,eklmd+(eo]ksc4ui,[sc
  1254. s [;uv2)ka]e+l,d](do1kec[un,s
  1255.  
  1256. c o;cvpity
  1257.  
  1258. : =;dr''a
  1259. n e;,sd)kt(sur
  1260. n  ;eikshfuut sk d:+0e='1n'0<
  1261. u k;sr='+a:.'d
  1262. i s;cse),tmskr(u
  1263. e n;hi stfku  uk0ms+1e:'<s=0ci'
  1264. + d;kra'uar.sd='+:
  1265. k o;,sr)kt(sur
  1266. n  ;eikshfuut sk r:+0o='1k'0<
  1267. n e; ihskftuu  ksr0+:o0'=k10'<
  1268. e n;hi stfku  uk0rs+0o:'0k=01<'
  1269. a r;dr=s+a:ukd
  1270.  
  1271.  
  1272. nee}onc kd u ;vt{ ycpo7
  1273.  
  1274. sdu;:ald=tpar_
  1275.  
  1276. den;
  1277.  
  1278. ce }enp ndryo;ork cu  ed{
  1279.  
  1280. den;
  1281.  
  1282.  
  1283.  
  1284.  
  1285.  
  1286. af,;aubg(nbnsc:iutsrlittpors_ni:s n)acg
  1287. lv,;,amrkr,e, ngjp,e,rotie,n,ppip,  rp:
  1288. u k;s ,g2 sn  ui:rkr a,tsd
  1289.  
  1290.  
  1291.  
  1292.  pd;erejrosuucirdef
  1293. ivn; atr:reei g
  1294.  
  1295. gbine
  1296. =k:;'us'
  1297. rfoodo d(ro r t)ai ]d:10[=
  1298. gbine
  1299. i ];[ ,)dvjeaa,drlco(
  1300. n  ;e k]hiuitfs[  :d)(=a0ckr=ou+eds
  1301. a d;r ['(ii: f]'r =+o('s)(,u'('k:r)='a):=d s][auiink[]d d= na'(er.ih('>t )1 r ))o
  1302. den;
  1303. =rk;:ausd
  1304.  
  1305. :pp;=re0
  1306. [i0ndf]ea )hro>t(r0 d
  1307. gbine
  1308.  
  1309. [id;2fad] ra=((r'( +:od''rn0)da')( = r):ta1dhd>ae[)rn0] 
  1310.  
  1311. :pp;=re1
  1312. [i0ndf]ea )hro<t(r6 d
  1313. gbine
  1314. [ dn0iae]frh) (t<od 3r
  1315. g enib
  1316.   1;t =dh )aei]rnf0+  ['rod0ara'ddr=:(
  1317. 0 ';0 =d: :a'rdr+a
  1318. n ed
  1319. l see
  1320. g enib
  1321. a r;d ('[ d00ir0]fo') (+=( d3rda)anr da=t[ :h3)de]'an=:r '
  1322. n d;e
  1323. t  ;hi4'ef=0n )' o]+rr0dad[ad(dr:ra=
  1324.  
  1325. ned
  1326. sele
  1327. gbine
  1328. [i0ndf]ea )hro<t(r9 d
  1329. gbine
  1330. p e;: r2=p
  1331.   t;7 h'=ie0)fn']  +0ord[raadddra(:=r
  1332. ned
  1333. sele
  1334. gbine
  1335. [ dn0 ae]irh)f(t< d 1or2
  1336. e gnb i
  1337. e r;p p3:  =
  1338. 0 1;  ='t )0h ]'ei0+nf[d  daroararr=dd(:
  1339. e nd 
  1340. p r;  e0eep=sl:
  1341. den;
  1342. den;
  1343.  
  1344.  
  1345.  
  1346. [idn0fae] rh)r(t]ad =dr''[o:
  1347. gbine
  1348.   t'0ih01fe0< n')o +]rrd0daa[(drdr:=a
  1349. r p;ee 0ple=:s
  1350. den;
  1351.  
  1352.  
  1353. 1f0}o {r u  osfidai: cl=) t1]ur 0r t[unodta ak orusr(rtd
  1354. gbine
  1355. i ];[ ,)dvjeaa,drlco(
  1356. i (n=  e6irh)fot    on))ro3) t=9((i=i(
  1357. e gnb i
  1358. 0 =;)e0 5d=to:hicpef(en tr nop
  1359. e nd 
  1360. l ees 
  1361. e gnb i
  1362. ' =;: ]0' i=) [: idptfaeh rren(pnot 
  1363. n e;d 
  1364. den;
  1365.  
  1366. een}cno  dkuv; ry {eb 
  1367. ce }enp ndryo;ork cu  ed{
  1368.  
  1369.  
  1370.  
  1371.  pe;srrtjouoecdnde
  1372. nvi;ta:rerieg 
  1373.  
  1374. gbine
  1375.  ion>fre  dh)o(t]ra 0da)[([]bb0
  1376. gbine
  1377. : =;draaa
  1378. = :;baab
  1379. = r;:badb
  1380. den;
  1381.  
  1382. 0i[n]fae) ah>o(t5rd 
  1383. gbine
  1384. t  ;h 8'ei<0nf)0  ]:bo0'br[+:dbb=(bb
  1385. den;
  1386.  
  1387. 0i[n]fae) ah>o(t8rd 
  1388. gbine
  1389.   t;0 h'1ie0<fn0)  :]ob'0rb+[d:bb(=bb
  1390. den;
  1391.  
  1392. hie;tfnp   rpppperr=rpe:p>p
  1393.  
  1394. eec}nn  odpyk;rr  ou{ cd  e
  1395.  
  1396.  
  1397.  
  1398.  
  1399.  ps;erporootuccidet
  1400. ivn; atr:reei g
  1401.  
  1402. gbine
  1403.  
  1404. =ipn1fee  rhtp
  1405. gbine
  1406. 4 [;]ka]+ua5as=[a:
  1407. , j;sv,)uaceklod(
  1408. 4 [;]kb]+ub5bs=[b:
  1409. , k;sv,)uaceklod(
  1410. = :;0m
  1411. j =;+l:k
  1412. l  o>wed5hl 9i
  1413. g enib
  1414. = l;: -0l 6
  1415. = :;m m1+ 
  1416. n d;e
  1417. , l;rs()atrd
  1418. < 2;)w d]hda0ior[l +der'a a0rod'(r:=d
  1419. : ';'r=d+a:ard
  1420.  
  1421. 1 [;]ka]+ua2as=[a:
  1422. , j;sv,)uaceklod(
  1423. 1 [;]kb]+ub2bs=[b:
  1424. , k;sv,)uaceklod(
  1425. + j;kl=m+:
  1426.   d;3wo42h 2>il-ll:l e=
  1427. , l;ks()utrs
  1428. < 2;)w s]hdu0iok[l +sek'u u0kos'(r:=d
  1429. u k;sr=d+a:ard
  1430.  
  1431. u s;lc:dpa=a_sr
  1432. den;
  1433.  
  1434.  
  1435. =ipn2fee  rhtp
  1436. gbine
  1437. 7 [;]ka]+ua8as=[a:
  1438. , j;sv,)uaceklod(
  1439. 7 [;]kb]+ub8bs=[b:
  1440. , k;sv,)uaceklod(
  1441. = :;0m
  1442. j =;+l:k
  1443. l  o>wed5hl 9i
  1444. g enib
  1445. = l;: -0l 6
  1446. = :;m m1+ 
  1447. n d;e
  1448. , l;rs()atrd
  1449. < 2;)w d]hda0ior[l +der'a a0rod'(r:=d
  1450. : ';'r=d+a:ard
  1451.  
  1452. 4 [;]ka]+ua5as=[a:
  1453. , j;sv,)uaceklod(
  1454. 4 [;]kb]+ub5bs=[b:
  1455. , k;sv,)uaceklod(
  1456. + j;kl=m+:
  1457. = :;0m
  1458. l  o>wed5hl 9i
  1459. g enib
  1460. = l;: -0l 6
  1461. = :;m m1+ 
  1462. n d;e
  1463. , l;ks()utrs
  1464. < 2;)w s]hdu0iok[l +sek'u u0kos'(r:=d
  1465. + ';kr:dua'asd=r+:
  1466.  
  1467.  
  1468. 1 [;]ka]+ua2as=[a:
  1469. , j;sv,)uaceklod(
  1470. 1 [;]kb]+ub2bs=[b:
  1471. , k;sv,)uaceklod(
  1472. + j;kl=m+:
  1473.   d;3wo42h 2>il-ll:l e=
  1474. , l;ks()utrs
  1475. < 2;)w s]hdu0iok[l +sek'u u0kos'(r:=d
  1476. u k;sr=d+a:ard
  1477.  
  1478. u s;lc:dpa=a_sr
  1479. den;
  1480.  
  1481.  
  1482. =ipn3fee  rhtp
  1483. gbine
  1484. 0 1;]k[]+ua1asa1a:=[
  1485. , j;sv,)uaceklod(
  1486. 0 1;]k[]+ub1bsb1b:=[
  1487. , k;sv,)uaceklod(
  1488. = :;0m
  1489. j =;+l:k
  1490. l  o>wed2hl 4i
  1491. g enib
  1492. = l;: -5l 2
  1493. = :;m m1+ 
  1494. n d;e
  1495. , l;rs()atrd
  1496. < 2;)w d]hda0ior[l +der'a a0rod'(r:=d
  1497. : ';'r=d+a:ard
  1498.  
  1499. 7 [;]ka]+ua8as=[a:
  1500. , j;sv,)uaceklod(
  1501. 7 [;]kb]+ub8bs=[b:
  1502. , k;sv,)uaceklod(
  1503. + j;kl=m+:
  1504. = :;0m
  1505. l  o>wed5hl 9i
  1506. g enib
  1507. = l;: -0l 6
  1508. = :;m m1+ 
  1509. n d;e
  1510. , l;ks()utrs
  1511. < 2;)w s]hdu0iok[l +sek'u u0kos'(r:=d
  1512. + ';kr:dua'asd=r+:
  1513.  
  1514.  
  1515. 4 [;]ka]+ua5as=[a:
  1516. , j;sv,)uaceklod(
  1517. 4 [;]kb]+ub5bs=[b:
  1518. , k;sv,)uaceklod(
  1519. + j;kl=m+:
  1520. = :;0m
  1521. l  o>wed5hl 9i
  1522. g enib
  1523. = l;: -0l 6
  1524. = :;m m1+ 
  1525. n d;e
  1526. , l;ks()utrs
  1527. < 2;)w s]hdu0iok[l +sek'u u0kos'(r:=d
  1528. + ';kr:dua'asd=r+:
  1529.  
  1530.  
  1531. 1 [;]ka]+ua2as=[a:
  1532. , j;sv,)uaceklod(
  1533. 1 [;]kb]+ub2bs=[b:
  1534. , k;sv,)uaceklod(
  1535. + j;kl=m+:
  1536.   d;3wo42h 2>il-ll:l e=
  1537. , l;ks()utrs
  1538. < 2;)w s]hdu0iok[l +sek'u u0kos'(r:=d
  1539. u k;sr=d+a:ard
  1540.  
  1541. u s;lc:dpa=a_sr
  1542. den;
  1543.  
  1544.  
  1545. cee} nn pdoyr;kro  uc {de 
  1546.  
  1547.  
  1548.  
  1549.  
  1550. abt}cee agkuzi m npa{ rrog6
  1551.  
  1552. =r:;aada
  1553. fdr;ieujs
  1554. ra=;aa:d
  1555.  
  1556. pp=;rr:pep
  1557. =r:;badb
  1558.  it;)fhj0 eu=nnrpo fetdir(esp
  1559. rb=;ab:d
  1560.  
  1561.  i);tf0th =oenpnnoed tres(pj
  1562.  
  1563. {
  1564. nw(;lrp)eirpt
  1565. nwl;(re)aita
  1566. (wn;prl)riepet
  1567. nwl;(re)bitb
  1568. }
  1569.  
  1570.  it;)fho0 et=nnipo tetscr(pop
  1571.  
  1572. aic;sf '_ nappeblrhyuethsp c:= '=0
  1573.  
  1574. den;
  1575.  
  1576.  
  1577.  
  1578.  f } u  ;n{0gc 0nta.iia ro 'tnu2s p':dr=)eabgsvbn_i ie yrtnnt(aisa t:adeb,esb
  1579. :v ; akrir,en jgti,e
  1580. :  ;  sgs tnu rik
  1581.  
  1582. gbine
  1583. (ka;hua)us,'o:b1r=b'ko,
  1584.  
  1585. ci'nhf=ey shbnutaok 't()
  1586. gbine
  1587. kiu;(:s)d=[]ro0
  1588. =k0;:
  1589. -j=;1:
  1590. aw onh)ddi0  l>)(ei0k (=
  1591. gbine
  1592. k (;u  1sir=[fo:i  k]() =k'n'u,e.s'h'[=t)i] 
  1593. = i;: -1i
  1594. = j;: +1j
  1595. den;
  1596. hie;tfn0   =0kj:=
  1597.  
  1598. kv,;,ac)bloeb(d
  1599. 0i);=f 0e t=dnh:ooekctn (
  1600.  it;)fh'0 e,>(n'kj +(=ks 0uud)skn :=a
  1601.  
  1602. jw o<hedkil 
  1603. gbine
  1604. u k;sk='+u:0's
  1605. j =;+j:1
  1606. den;
  1607. den;
  1608. :dt;=eesks_u
  1609. oen}kne  dce{; c fk1un5
  1610.  
  1611.  
  1612.  
  1613. oek}nn  ed{uc.t  1iu5n
  1614.