~v300 200
y#hYWm]hV\b\Dlg[D\Xj 
 yzw$PSSjTgMNRWWRZ]YdTQ 
 ~w156 4 410 740 0 321 0 0 ~f? 14 12 10
? 2 1 1 0 ? ? ? "Arial" ? ? ? 0 ? 0 0
"Times" 12 ? ? 7 0 c n 102 0 0 0 k 288
i"NEWTONS  METHOD"
? 1 26177 26178 26115 26178 1 1 1 1 0 0
0 0 -1 0 1 -1 -1 -1 -1 -1 0
1 1 0 2 0 ? ? ? ? ? ? ? ? 
~Q
]|Expr|[#b @`bb#_b#_b#_}))# b'3" *|: ;bP8&c0!*Simpson,Gs one,M|
  |third rule}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~V?v0 (panels)~p0
1 ~V?v0 ('Dx)~p0
1 ~V?v0 (I)~p0
1 ~V?v0 (n)~p0
1 ~V?v0 (i)~p0
1 ~V?v0 (y)~p0
1 ~V?v0 (x)~p0
1 ~V?c0 (b)~p0
1 ~V?c0 (a)~p0
1 ~V?c1 ('p)~p0
1 ~V?c3 ('N)~p0
1 ~V?f0 (f)~p0
1 ~V?f257 (cos)~p0
1 ~V?f256 (sin)~p0
1 ~V?f307 (ln)~p0
1 ~V?f160 (mod)~p0
1 ~V?f37 (ceiling)~p0
1 ~V?d16 (d)~p0
1 ~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})!# b$@`f }["! `f#}) # b$@|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})!# b$@" *|: ;bP8&c0!*input|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~A(f(x)=(x-2)/(x^2-6*x+5)^(1/3))~p1
1 ~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})!# b"0" *|: ;bP8&c0!*integrand|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
255 ~A(f(?x)=(?x-2)/(?x^2-6*?x+5)^(1/3))~p0
2 ~d~sb/_!!   }
b00&!  c#T"_c/__c/__!"}
^ _~A(x=~
 ?x)~p0
255 ~A(a=6)~p0
1 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})## b"0" *|: ;bP8&c0!*lower bound|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
255 ~A(b=12)~p0
1 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})## b"0" *|: ;bP8&c0!*upper bound|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
255 ~A(panels=40)~p0
1 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})'# b#8" *|: ;bP8&c0!*even number|
  | of panels}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
255 ~Q
]|Expr|[#b @`bb#_b#_b#_})## b$@" *|: ;bP8&c0!*approximate <c" #|
  |(&f,Hx,I dx}^a^b}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~A(I='Dx/3*(f(a)+f(b)+2*(Summation(i):(1):(n-1)*~
 (mod(i,2)+1)*f(a+i*'Dx))))~p1
1 ~d~A(I=13.424940068891962)~p0
255 ~sb/_!!   }
$&!  c#T"!c"H"_c/__c/__}
^ _~A(n=ceiling(~
 panels)+mod(ceiling(panels),2))~p0
2 ~d~A('Dx=(b-a)/n)~p0
2 ~d~Q
]|Expr|[#b @`bb#_b#_b#_})!# b$@["! ) # b$@|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})!# b$@" *|: ;bP8&c0!*check|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~A(Integral(f(x)*d*x):(a):(b))~p0
1 ~A(Integral(f(x)*d*x):(a):(b)=13.424935203111598)~p0
255 ~sb/^!!   }
$&!  c#T"!c&H#_c/__c/__}
^ _~Q
]|Expr|[#b @`bb#_b#_b#_})!# b"T["! ) # b"T|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})!# b"T" *|: ;bP8&c0!*Illustration|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~G1 1 230 362
1 1 3 2 10
(-2...14):(-3...5):(?=~
 0...2*'p):('p/5):(10)~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})!# b"0" *|: ;bP8&c0!*integrand|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~L1 255 ? (x,f(x)):(x=left...right)~p0
1 ~gc0 56 ? 0 -4096 -2509 0
2378 -3799 -2427 0
8192 -3072 -2222 0
10570 -2775 -2207 0
11065 -2713 -2248 0
11362 -2676 -2299 0
11671 -2637 -2402 0
11857 -2614 -2521 0
12050 -2590 -2778 0
12167 -2575 -3168 0
12242 -2566 -3938 0
12287 -2560 -12087 0
12288 -32768 -32768 0
12290 -2560 6923 0
12360 -2551 1415 0
12481 -2536 684 0
12607 -2520 378 0
12684 -2510 256 0
13575 -2399 -355 0
15062 -2213 -772 0
16912 -1982 -1113 0
19026 -1718 -1445 0
20876 -1486 -1732 0
23254 -1189 -2151 0
24575 -1024 -2444 0
25368 -925 -2663 0
26259 -814 -2981 0
27188 -697 -3488 0
27746 -628 -4019 0
28179 -574 -4826 0
28544 -528 -7127 0
28648 -515 -11809 0
28651 -32768 -32768 0
28684 -32768 -32768 0
28689 -510 10929 0
28872 -487 4331 0
29426 -418 2532 0
29596 -396 2332 0
30091 -335 1965 0
30388 -297 1827 0
30883 -236 1664 0
31399 -171 1549 0
31710 -132 1495 0
33560 99 1314 0
35938 396 1227 0
38052 661 1202 0
40430 958 1201 0
42280 1189 1210 0
44394 1453 1227 0
46244 1685 1246 0
48622 1982 1273 0
53114 2543 1328 0
54964 2775 1352 0
58928 3270 1404 0
61306 3567 1434 0
65535 4096 1488 0
~
 ~Q
]|Expr|[#b @`bb#_b#_b#_}`fb#@})!# b$@" *|: ;bP8&c0!*area|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~D2 3 1 16711680 ? ? (x,y):(x=a...b):(y=0...f(~
 x)):(?)~p0
1 ~gs9 9 0 0 ? -1057030144 0 -1024 0
-1057030144 0 -725 0
-1057030144 0 -425 0
-1057030144 0 -126 0
-1057030144 0 174 0
-1057030144 0 473 0
-1057030144 0 773 0
-1057030144 0 1072 0
-1057030144 0 1371 0
-1057030144 384 -1024 0
-1057030144 384 -742 0
-1057030144 384 -461 0
-1057030144 384 -179 0
-1057030144 384 103 0
-1057030144 384 384 0
-1057030144 384 666 0
-1057030144 384 947 0
-1057030144 384 1229 0
-1057030144 768 -1024 0
-1057030144 768 -746 0
-1057030144 768 -468 0
-1057030144 768 -190 0
-1057030144 768 88 0
-1057030144 768 366 0
-1057030144 768 644 0
-1057030144 768 922 0
-1057030144 768 1200 0
-1057030144 1152 -1024 0
-1057030144 1152 -745 0
-1057030144 1152 -466 0
-1057030144 1152 -187 0
-1057030144 1152 92 0
-1057030144 1152 371 0
-1057030144 1152 650 0
-1057030144 1152 929 0
-1057030144 1152 1208 0
-1057030144 1536 -1024 0
-1057030144 1536 -742 0
-1057030144 1536 -460 0
-1057030144 1536 -177 0
-1057030144 1536 105 0
-1057030144 1536 387 0
-1057030144 1536 669 0
-1057030144 1536 952 0
-1057030144 1536 1234 0
-1057030144 1920 -1024 0
-1057030144 1920 -738 0
-1057030144 1920 -451 0
-1057030144 1920 -165 0
-1057030144 1920 122 0
-1057030144 1920 408 0
-1057030144 1920 694 0
-1057030144 1920 981 0
-1057030144 1920 1267 0
-1057030144 2304 -1024 0
-1057030144 2304 -733 0
-1057030144 2304 -442 0
-1057030144 2304 -151 0
-1057030144 2304 140 0
-1057030144 2304 431 0
-1057030144 2304 722 0
-1057030144 2304 1013 0
-1057030144 2304 1304 0
-1057030144 2688 -1024 0
-1057030144 2688 -728 0
-1057030144 2688 -432 0
-1057030144 2688 -136 0
-1057030144 2688 160 0
-1057030144 2688 456 0
-1057030144 2688 751 0
-1057030144 2688 1047 0
-1057030144 2688 1343 0
-1057030144 3072 -1024 0
-1057030144 3072 -723 0
-1057030144 3072 -422 0
-1057030144 3072 -121 0
-1057030144 3072 180 0
-1057030144 3072 480 0
-1057030144 3072 781 0
-1057030144 3072 1082 0
-1057030144 3072 1383 0
~
 ~Q
]|Expr|[#b @`bb#_b#_b#_})!# b"0" *|: ;bP8&c0!*declarations|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~V?c64 (left)~p0
1 ~V?c65 (right)~p0
1 ~V?c66 (bottom)~p0
1 ~V?c67 (top)~p0
1 ~Q
]|Expr|[#b @`bb#_b#_b#_})%# b"0" *|: ;bP8&c0!*axes and grids|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~X1 0 (x,0):(x=left...right):(x)~p0
1 ~gc1 2 ? 0 -4096 -1024 0
65535 4096 -1024 0
~X2 0 (~
 0,y):(y=bottom...top):(y)~p0
1 ~gc1 2 ? 0 -3072 -4096 0
65535 -3072 4096 0
~R11184810 ? (~
 x,y):(y=bottom...top):(x=left...right):(0)~p0
1 ~gc1 2 ? 0 -3072 -4096 0
65535 -3072 4096 0
~gc1 2 ? 0 -512 -4096 0
65535 -512 4096 0
~gc1 2 ? 0 2048 -4096 0
65535 2048 4096 0
~
 ~R11184810 ? (x,y):(x=left...right):(y=bottom...~
 top):(0)~p0
1 ~gc1 2 ? 0 -4096 -3072 0
65535 4096 -3072 0
~gc1 2 ? 0 -4096 -1024 0
65535 4096 -1024 0
~gc1 2 ? 0 -4096 1024 0
65535 4096 1024 0
~gc1 2 ? 0 -4096 3072 0
65535 4096 3072 0
~t~p0
1 ~c2
22 -1 20 -1 23 -1 ~c13
32 -1 31 -1 24 -1 9 -1 22 -1 12 -1 26 -1 8 -1 28 -1 1 -1 33 -1 4 -1 34 -1 2 -1 ~c7
37 -1 36 -1 26 -1 8 -1 24 -1 9 -1 22 -1 12 -1 ~e