: !b!=># #####᯾(~#>:> A(X)X:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::H(X)X(1X)A(AB4XX(B2X))(:0,4,0,39:0,6::X(2,4),W(2,4)2:10)"### GERZINT ###":L11<"KC85/2"32)"9.8.1985";:B232I?"GERZON-Integration mit Irregularitaeten";rA" an beiden Intervallenden";FI02:J04:X(I,J),W(I,J)::P6,8,0,39:0,4:L1Z" Die zu integrierende Funktion lautet:"dA$"":"F(X)=";A$:A$""1000 n10,14,4,35:5,1:L1Ex"Vom Datensatz 0 zum Datensatz 2"l"nimmt die Exaktheit (Potenz) ab""der Grad der Irregularitaet zu""Datensatz 0,1 oder 2 =";CC0C2C(C)(11);:15016,20,5,34:0,3:L1 "Eingabe der Grenzen"#"untere Grenze=";AK"obere Grenze=";B:B1BA:B4B1B1f22,24,6,33:0,7:L1"mindestens 10 Teilintervalle";"ANZAHL=";N:N10(11);(11);:22026,28,8,31:0,2:B31(N3):Q0:I4N7:QQH(B3I):I7;:I04:XX(C,I)B33QQ(H(X)H(1X))W(C,I)J:Q6B1B3Q:L10^:"Ergebnis="Qsմ""285:ԙ:80"2.805762E-2,.1284353,.3730326,.5522758,1.086579,.8469032,2.009605,.9736149,3.000253,.9987707 66.737997E-3,3.40342E-2,.1631957,.3387146,.768185B @.8775870,2.980304,1.067471,1.837508,1.182193} J3.346513E-4,2.535384E-3,3.985464E-2,.1240193,.4058646 T.6934629,1.484168,1.397765,2.903134,1.282197 TE66 :(517)1271040 IFPEEK(862)=0THENCALL-4096 (2000)TE407::ELSECALL-40964 IFPEEK(10846)=0THENCALL-4096X IFPEEK(11984)<>TETHENCALL-4096 $11021,42:11024,1757:11027,11069 )517,142:2000,87:10846,0:11984,0 .2B07:IFPEEK(11984)<>TETHENCALL-4096 $11021,42:11024,1757:11027,11069