!VA0RUN 3ŢƽvXLt 0 !    [ DƢ`Ӆ_[օZ+i-/1X,i.02Y YL hh wxLĢ V`| J z:|I &Å"'Å#  _ Eˠ"H) Gh zFELi ˩ " ##i p"ьLӡhh+=,>zi+{i,Lhh=+iz>,i{Lǥ,ɣ=+iz>,iL => Ơ_`0 G8Iȹ0ȹ0 GI)` =`+iz>,i{hhLPRODnBY`PER-ERICSMEDBERG8 ؅``8 `ӱх`"":416246 " ^DEFINE FUNCTION^"M" Y(X)=";dB0:(56)32B141663:" ";:N199::780,(1):781,(646):60065:N199:A$:A$""16X(7735B1536):(X32X58X44)(0)1212A(A$):(A13A58(0)86)X3226<(A40A32)A44(A57A65)12v((0)11(77341536B)61(A94A222))A$;:16 A157A148A$;:1612"32DFN":"RUN30":"": 41185 ! D(X)(Y(X1E6)Y(X1E6))2E6"413662#T51201024((56)32):B$" ":300O$"STATE RANGE (X0,XN)="h&198,0:A,B:AB36t'"";B$(SBA:D1S159:HY(B):LH* N0159:YY(AND11E9),H(HY(HY))2:L(LY(YL))2::"":DHL.48:560Z((H)(L)(HL))2E2F1:Z100F10:Z10F100:Z1F1E3:Z.1F1E4e4Z.01FI1E5:D.01FI1E7k68X(A(AB)1595):E%X8:K2(7XE%8):MT712:272:T716,255:MT704:272֩:"";:EE%:A0E0<B0E20>M121:C(M1)5:C(C)68*?A$(((L(21M)20D)F.5)F)g@E);(21794(E0E20));"":E1((A$)1)(E13));A$oB70DE);(21691(E0E20))FMHY(HD1604.5):E%Y8:YY8E%:MT720:K8:272:MY,255:MT736:K0:272JMY,255:OE%1:L0O21LH0O1(N"";:N1O:"";:xPA$(220124(O1O21)):A$A$A$:A$A$A$:C$(21895(O1O21)):A$A$C$RA$A$A$ : A$ C$A$A$: A$TZ((A)(B)(BA))2VQA:PS4:QQD:DS:50:DQQ:M1:X2:A$"":F100F10F10:M0:X18WNM3X:Y(A$):VV(QNP)F:VV((VV)((VV).5))FcXA$A$(B$,N5(N1)(Y5)Y)(VV):qYB10F1ZC$B$((BF.5)F):N22(A$):(A$,2);]M0(C$,N);" ";߬^N7602047:NT,0::T1287,255`O(56)32:CN94: N0159:97::N03:36875N,0::122LaY(DLY(AND11E9))D15913:36878,10b(D(AND1)).336875,0:36876,260(Y2):100ɭc36876,0:36875,2305(N2(N2))10(N3(N3))15(N5(N5))dY%Y8:X%(N5)8:PPX%Y%22:ZZPP38400512O:PPPP76801536O(fQQ(PP):QQ32108ChCNCN1:CN160CN161_jPP,CN:ZZ,0:QQCN:114ql(QQ95)114nCNCN1:CN160CN161pPP,CN:118̮rCCTQQ8(Y7):CC,(CC)(2(7((N5)7)))ҮtvMTCN8:XTQQ8 xI07:MI,(XI)::QQCN:1142z198,0:"NEW INTERVAL? YES NO"E|A$:A$""124a~198,0:A$"Y""":36rA$"N"122"WANT GRAPHICAL DATA?"A$:A$""138198,0:A$"N"162̯A$"Y"136쯎"WANT AXIS INTERSECT.?"A$:A$""144198,0:A$"Y"170'A$"N"142G"WANT EXTREMAL POINTS?"[A$: A$""150t198,0: A$"Y" 184A$"N"148W1W0:300"WANT AN INTEGRAL? "ɰA$:A$""158ఠ198,0:A$"Y"240A$"N"156W0:300,198,0:"STATE AN APPROX.VALUE":B$;""3XMD(X)0XX.01:174vYXY(X)D(X):((YX)1E4)0180XY:176Y((Y)(Y1000).5)1000"INTERS.X=";Y:142鱸198,0:"GIVE RANGE OF SEARCH":"";B$"";A,B:AB184W1"SEARCHING!"VW1:F1Y(A):D1D(A):S1(D1):HY(A):LY(A):MIL:MAHk XAB(BA)99 Y(X)H HY(X) Y(X)L LY(X) (D(X))(D1) 200 212ֲD1D(X):F1Y(X) MAH HMA MIL LMI X&"TOP VALUE=";(H1000.5)1000Y"LEAST VALUE=";(L1000.5)1000;"":W1:148h D10 A1X(BA)992:B1X(BA)97PA1:N2:K1D(P)CP(B1A1)N:NN2׳ (D(C))(K1)PC: 218B1C:A1P ((Y(P)Y(C))1000)02282163P(A1B1)2:P1(P100.5)100D K10 236~"MIN.IN(";P1;",";(Y(P)1000.5)1000;")":MIY(P)"MAX.IN(";P1;",";(Y(P)1000.5)1000;")":MAY(P)Ĵ198,0:"RANGE OF INTEGRATION":B$"";A,B:AB240N2:X0,H(BA)N:SY(A)Y(B)=M1 N1 2cSS4Y(AMH)2Y(A(M1)H):s N2 258XHS3(HS3L)15((XD)1000)0SX:262DX:LHS3:N2Nʵ246۵CC((A))1"":CC);"";B CC);"ݝY(X)DX =";(S1000.5)1000S A;"":" FOR THE INTEGRAND:":"";:41455\154rI07:MI,K::," MENU:"1" FOR SERVICE PRESS: "Ŷ6" F1 = PLOT THE GRAPH";" F2 = NEW FUNCTION"@" F3 = AXIS INTERSECT."E" F4 = EXPOSE FUNCTION":J" F5 = FIND MAX.& MIN."WO" F6 = CORR.IN EQUAT."tT" F7 = EVAL. INTEGRAL"W" STOP RETURNS MENU"Y198,0^A$:A$""350ȷh"":A(A$):A13336׷rA134170|A135184A136240 A137"":414035A139" ";:41455::41403EA138300"THE PRESENT FUNCTION:":" ";:41455::"PRESS ANY KEY FOR MENU"A$:A$""420300