KWADRATEN
FILE INFORMATION
FILENAME(S): KWADRATEN
FILE TYPE(S): PRG
FILE SIZE: 14.6K
FIRST SEEN: 2025-12-02 00:02:03
APPEARS ON: 1 disk(s)
FILE HASH
ee2f1b2f2a2819f5f04819682becaa7ce21832327fa9b135a55421e8bcbea89a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | KWADRATEN | PRG | earthshaker | 12 | 1 |
⚠ CORRUPT DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 31 30 30 30 00 15 08 14 00 |.......1000.....|
00000010: 89 31 30 31 30 00 21 08 64 00 99 22 93 22 3B 3A |.1010.!.d..".";:|
00000020: 8E 00 51 08 6E 00 99 C8 28 22 13 11 11 11 11 11 |..Q.n...("......|
00000030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000040: 11 11 11 22 2C B6 28 B5 28 56 45 AA 31 29 29 29 |...",.(.(VE.1)))|
00000050: 3B 00 61 08 70 00 99 A6 B6 28 48 4F 29 29 3B 3A |;.a.p....(HO));:|
00000060: 8E 00 86 08 78 00 48 4F B2 C2 28 32 30 39 29 AA |....x.HO..(209).|
00000070: 32 35 36 AC C2 28 32 31 30 29 AB 31 30 32 34 AA |256..(210).1024.|
00000080: C2 28 32 31 31 29 00 A4 08 79 00 56 45 B2 B5 28 |.(211)...y.VE..(|
00000090: 48 4F AD 34 30 29 3A 48 4F B2 48 4F AB 34 30 AC |HO.40):HO.HO.40.|
000000A0: 56 45 3A 8E 00 AF 08 C8 00 A1 49 4E 24 3A 8E 00 |VE:.......IN$:..|
000000B0: C4 08 D2 00 A1 49 4E 24 3A 8B 49 4E 24 B2 22 22 |.....IN$:.IN$.""|
000000C0: 89 32 31 30 00 CA 08 DC 00 8E 00 F7 08 FA 00 97 |.210............|
000000D0: 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 38 2C |54296,15:.54278,|
000000E0: 32 35 35 3A 97 35 34 32 37 33 2C 39 35 3A 97 35 |255:.54273,95:.5|
000000F0: 34 32 37 36 2C 31 37 00 09 09 FB 00 81 4F 4F B2 |4276,17......OO.|
00000100: 31 A4 32 30 30 3A 82 4F 4F 00 2A 09 FC 00 97 35 |1.200:.OO.*....5|
00000110: 34 32 37 36 2C 30 3A 97 35 34 32 37 37 2C 30 3A |4276,0:.54277,0:|
00000120: 97 35 34 32 37 38 2C 30 3A 8E 00 38 09 04 01 52 |.54278,0:..8...R|
00000130: 56 B2 BB 28 31 29 3A 8E 00 46 09 0E 01 46 52 B2 |V..(1):..F...FR.|
00000140: B8 28 30 29 3A 8E 00 6F 09 2C 01 53 52 24 B2 C4 |.(0):..o.,.SR$..|
00000150: 28 53 52 29 3A 8B C8 28 53 52 24 2C 31 29 B2 22 |(SR):..(SR$,1)."|
00000160: 20 22 A7 53 52 24 B2 CA 28 53 52 24 2C 32 29 00 | ".SR$..(SR$,2).|
00000170: 75 09 2D 01 8E 00 9A 09 36 01 53 52 24 B2 22 22 |u.-.....6.SR$.""|
00000180: 3A 8B 53 52 B1 B2 31 30 AE 28 43 54 AB 43 4E AB |:.SR..10.(CT.CN.|
00000190: B4 28 43 4E 29 29 A7 33 31 38 00 B5 09 37 01 8B |.(CN)).318...7..|
000001A0: 53 52 B3 AB 2E 35 AC 31 30 AE AB 43 4E A7 53 52 |SR...5.10..CN.SR|
000001B0: 24 B2 22 2D 22 00 DC 09 38 01 53 52 24 B2 53 52 |$."-"...8.SR$.SR|
000001C0: 24 AA CA 28 C4 28 B5 28 B6 28 53 52 29 AA 2E 35 |$..(.(.(.(SR)..5|
000001D0: AC 31 30 AE AB 43 4E 29 29 2C 32 29 00 07 0A 39 |.10..CN)),2)...9|
000001E0: 01 8B C3 28 53 52 24 29 B3 43 54 AB 43 4E AA 28 |...(SR$).CT.CN.(|
000001F0: 43 4E B3 B1 30 29 A7 53 52 24 B2 22 20 22 AA 53 |CN..0).SR$." ".S|
00000200: 52 24 3A 89 33 31 33 00 21 0A 3A 01 8B 43 4E B2 |R$:.313.!.:..CN.|
00000210: 30 B0 B6 28 53 52 29 B1 B2 31 45 31 30 89 33 31 |0..(SR)..1E10.31|
00000220: 36 00 55 0A 3B 01 53 52 24 B2 53 52 24 AA CA 28 |6.U.;.SR$.SR$..(|
00000230: C4 28 31 AA B6 28 53 52 29 AB B5 28 B6 28 53 52 |.(1..(SR)..(.(SR|
00000240: 29 29 AA 2E 35 AC 31 30 AE AB 43 4E 29 2C 33 2C |))..5.10..CN),3,|
00000250: 43 4E AA 31 29 00 75 0A 3C 01 8B C3 28 53 52 24 |CN.1).u.<...(SR$|
00000260: 29 B3 43 54 A7 53 52 24 B2 53 52 24 AA 22 20 22 |).CT.SR$.SR$." "|
00000270: 3A 89 33 31 36 00 8B 0A 3D 01 8B C3 28 53 52 24 |:.316...=...(SR$|
00000280: 29 B1 43 54 A7 53 52 24 B2 22 22 00 AB 0A 3E 01 |).CT.SR$.""...>.|
00000290: 8B C3 28 53 52 24 29 B3 43 54 A7 53 52 24 B2 53 |..(SR$).CT.SR$.S|
000002A0: 52 24 AA 22 2A 22 3A 89 33 31 38 00 B1 0A 3F 01 |R$."*":.318...?.|
000002B0: 8E 00 C7 0A 5E 01 9F 34 2C 34 3A 98 34 2C 53 52 |....^..4,4:.4,SR|
000002C0: 24 3B 3A A0 34 3A 8E 00 D8 0A 68 01 9F 34 2C 34 |$;:.4:....h..4,4|
000002D0: 3A 98 34 3A A0 34 3A 8E 00 FC 0A E8 03 41 B2 31 |:.4:.4:......A.1|
000002E0: 30 30 30 3A 89 32 30 3A 8F 20 4B 4C 45 49 4E 53 |000:.20:. KLEINS|
000002F0: 54 45 20 4B 57 41 44 52 41 54 45 4E 00 32 0B F2 |TE KWADRATEN.2..|
00000300: 03 86 41 28 36 2C 36 29 2C 42 28 36 29 2C 50 28 |..A(6,6),B(6),P(|
00000310: 36 29 3A 8F 20 56 4F 4F 52 20 4F 50 4C 2E 20 4C |6):. VOOR OPL. L|
00000320: 49 4E 2E 20 53 54 45 4C 53 45 4C 20 56 45 52 47 |IN. STELSEL VERG|
00000330: 4C 2E 00 5F 0B FC 03 4D 50 B2 39 39 3A 8F 20 4D |L.._...MP.99:. M|
00000340: 50 20 3D 20 4D 41 58 49 4D 41 41 4C 20 41 41 4E |P = MAXIMAAL AAN|
00000350: 54 41 4C 20 4D 45 45 54 50 55 4E 54 45 4E 2E 00 |TAL MEETPUNTEN..|
00000360: 70 0B 06 04 86 55 28 4D 50 29 2C 56 28 4D 50 29 |p....U(MP),V(MP)|
00000370: 00 92 0B 10 04 4E 50 B2 30 3A 8F 20 4E 50 20 3D |.....NP.0:. NP =|
00000380: 20 41 41 4E 54 41 4C 20 4D 45 45 54 50 55 4E 54 | AANTAL MEETPUNT|
00000390: 45 4E 00 B7 0B 1A 04 4E B2 31 3A 8F 20 50 4F 4C |EN.....N.1:. POL|
000003A0: 59 4E 4F 4F 4D 20 4E 4F 47 20 4E 49 45 54 20 42 |YNOOM NOG NIET B|
000003B0: 45 52 45 4B 45 4E 44 00 E9 0B 24 04 47 B2 31 3A |EREKEND...$.G.1:|
000003C0: 8D 31 37 30 30 30 3A 46 B2 31 3A 8D 31 37 35 30 |.17000:F.1:.1750|
000003D0: 30 3A 8F 20 44 45 46 41 55 4C 54 20 46 55 4E 4B |0:. DEFAULT FUNK|
000003E0: 54 49 45 53 20 47 2C 20 46 00 05 0C 2E 04 8D 32 |TIES G, F......2|
000003F0: 38 30 30 30 3A 8F 20 42 52 45 45 44 54 45 20 53 |8000:. BREEDTE S|
00000400: 43 48 45 52 4D 00 29 0C 38 04 42 4B B2 B5 28 28 |CHERM.).8.BK..((|
00000410: 42 53 AB 31 33 29 AD 33 29 3A 8F 20 42 52 45 45 |BS.13).3):. BREE|
00000420: 44 54 45 20 4B 4F 4C 4F 4D 00 34 0C 42 04 8D 32 |DTE KOLOM.4.B..2|
00000430: 30 30 30 30 00 3D 0C 4C 04 8D 31 30 30 00 61 0C |0000.=.L..100.a.|
00000440: 56 04 99 22 20 20 20 20 20 20 20 20 20 20 CB CC |V.." ..|
00000450: C5 C9 CE D3 D4 C5 2D CB D7 C1 C4 D2 C1 D4 C5 CE |......-.........|
00000460: 22 00 90 0C 60 04 99 22 3D 3D 3D 3D 3D 3D 3D 3D |"...`.."========|
00000470: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000480: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 |==============="|
00000490: 00 96 0C 6A 04 99 00 C4 0C 74 04 99 22 C4 49 54 |...j.....t..".IT|
000004A0: 20 50 52 4F 47 52 41 4D 4D 41 20 42 45 52 45 4B | PROGRAMMA BEREK|
000004B0: 45 4E 54 20 42 49 4A 20 45 45 4E 20 47 45 47 45 |ENT BIJ EEN GEGE|
000004C0: 56 45 4E 22 00 E4 0C 7E 04 99 22 53 45 54 20 56 |VEN"...~.."SET V|
000004D0: 41 4E 20 20 4E 20 20 4D 45 45 54 50 55 4E 54 45 |AN N MEETPUNTE|
000004E0: 4E 20 3A 22 00 EA 0C 88 04 99 00 19 0D 92 04 99 |N :"............|
000004F0: 22 20 20 20 28 D5 31 2C D6 31 29 20 2C 20 28 D5 |" (.1,.1) , (.|
00000500: 32 2C D6 32 29 20 2C 2E 2E 2E 2E 2E 2E 2E 2E 2C |2,.2) ,........,|
00000510: 20 28 D5 4E 2C D6 4E 29 22 00 1F 0D 9C 04 99 00 | (.N,.N)".......|
00000520: 4E 0D A6 04 99 22 44 49 45 20 50 4F 4C 59 4E 4F |N...."DIE POLYNO|
00000530: 4F 4D 20 28 20 4D 45 54 20 47 52 41 41 44 20 31 |OM ( MET GRAAD 1|
00000540: 2C 32 2C 33 2C 34 20 4F 46 20 35 20 29 22 00 7A |,2,3,4 OF 5 )".z|
00000550: 0D B0 04 99 22 44 49 45 20 27 5A 4F 20 47 4F 45 |...."DIE 'ZO GOE|
00000560: 44 20 4D 4F 47 45 4C 49 4A 4B 27 20 44 4F 4F 52 |D MOGELIJK' DOOR|
00000570: 20 44 45 20 53 45 54 20 3A 22 00 80 0D BA 04 99 | DE SET :"......|
00000580: 00 AF 0D C4 04 99 22 20 20 20 28 47 28 D5 31 29 |......" (G(.1)|
00000590: 2C 46 28 D6 31 29 29 20 2C 2E 2E 2E 2E 2E 2E 2C |,F(.1)) ,......,|
000005A0: 20 28 47 28 D5 4E 29 2C 46 28 D6 4E 29 29 22 00 | (G(.N),F(.N))".|
000005B0: B5 0D CE 04 99 00 E4 0D D8 04 99 22 56 41 4E 20 |..........."VAN |
000005C0: 50 55 4E 54 45 4E 20 4C 4F 4F 50 54 2C 20 57 41 |PUNTEN LOOPT, WA|
000005D0: 41 52 42 49 4A 20 47 20 45 4E 20 46 20 20 44 4F |ARBIJ G EN F DO|
000005E0: 4F 52 20 22 00 0F 0E E2 04 99 22 44 45 20 47 45 |OR "......"DE GE|
000005F0: 42 52 55 49 4B 45 52 20 47 45 47 45 56 45 4E 20 |BRUIKER GEGEVEN |
00000600: 46 55 4E 4B 54 49 45 53 20 5A 49 4A 4E 2E 22 00 |FUNKTIES ZIJN.".|
00000610: 1A 0E EC 04 8D 32 30 30 30 30 00 23 0E F6 04 8D |.....20000.#....|
00000620: 31 30 30 00 50 0E 00 05 99 22 C4 45 20 41 4C 47 |100.P....".E ALG|
00000630: 45 4D 45 4E 45 20 56 4F 52 4D 20 56 41 4E 20 44 |EMENE VORM VAN D|
00000640: 45 20 50 4F 4C 59 4E 4F 4F 4D 20 49 53 20 3A 22 |E POLYNOOM IS :"|
00000650: 00 56 0E 0A 05 99 00 84 0E 14 05 99 22 20 D9 3D |.V.........." .=|
00000660: 57 35 2A D8 5E 35 2B 57 34 2A D8 5E 34 2B 57 33 |W5*.^5+W4*.^4+W3|
00000670: 2A D8 5E 33 2B 57 32 2A D8 5E 32 2B 57 31 2A D8 |*.^3+W2*.^2+W1*.|
00000680: 2B 57 30 22 00 8A 0E 1E 05 99 00 A8 0E 28 05 99 |+W0".........(..|
00000690: 22 C8 49 45 52 42 49 4A 20 43 4F 52 52 45 53 50 |".IERBIJ CORRESP|
000006A0: 4F 4E 44 45 45 52 54 22 00 AE 0E 32 05 99 00 DC |ONDEERT"...2....|
000006B0: 0E 3C 05 99 22 20 20 20 20 D8 20 4D 45 54 20 45 |.<.." . MET E|
000006C0: 45 4E 20 46 55 4E 4B 54 49 45 20 56 41 4E 20 D5 |EN FUNKTIE VAN .|
000006D0: 20 3A 20 D8 20 3D 20 47 28 D5 29 22 00 0A 0F 46 | : . = G(.)"...F|
000006E0: 05 99 22 20 20 20 20 D9 20 4D 45 54 20 45 45 4E |.." . MET EEN|
000006F0: 20 46 55 4E 4B 54 49 45 20 56 41 4E 20 D6 20 3A | FUNKTIE VAN . :|
00000700: 20 D9 20 3D 20 46 28 D6 29 22 00 10 0F 50 05 99 | . = F(.)"...P..|
00000710: 00 3E 0F 5A 05 99 22 57 30 20 54 2F 4D 20 57 35 |.>.Z.."W0 T/M W5|
00000720: 20 20 57 4F 52 44 45 4E 20 5A 4F 44 41 4E 49 47 | WORDEN ZODANIG|
00000730: 20 42 45 52 45 4B 45 4E 44 20 44 41 54 22 00 4D | BEREKEND DAT".M|
00000740: 0F 64 05 99 22 47 45 4C 44 54 20 3A 22 00 53 0F |.d.."GELDT :".S.|
00000750: 6E 05 99 00 81 0F 78 05 99 22 20 D3 CF CD 28 49 |n.....x.." ...(I|
00000760: 3D 31 20 54 2F 4D 20 4E 29 28 20 28 46 28 D6 49 |=1 T/M N)( (F(.I|
00000770: 29 2D 57 35 2A 47 28 D5 49 29 5E 35 2E 2E 2E 2E |)-W5*G(.I)^5....|
00000780: 22 00 AF 0F 82 05 99 22 20 2E 2E 2E 2E 2D 57 31 |"......" ....-W1|
00000790: 2A 47 28 D5 49 29 2D 57 30 29 5E 32 20 29 20 20 |*G(.I)-W0)^2 ) |
000007A0: 20 3D 20 20 20 20 4D 49 4E 49 4D 41 41 4C 22 00 | = MINIMAAL".|
000007B0: BA 0F 8C 05 8D 32 30 30 30 30 00 C3 0F 96 05 8D |.....20000......|
000007C0: 31 30 30 00 E8 0F A0 05 99 22 C8 49 45 52 20 56 |100......".IER V|
000007D0: 4F 4C 47 45 4E 20 44 45 20 4D 4F 47 45 4C 49 4A |OLGEN DE MOGELIJ|
000007E0: 4B 48 45 44 45 4E 3A 22 00 EE 0F AA 05 99 00 0C |KHEDEN:"........|
000007F0: 10 B4 05 99 22 20 20 20 20 31 2E 20 D9 20 3D 20 |...." 1. . = |
00000800: 57 31 2A D8 20 20 20 2B 20 57 30 22 00 33 10 BE |W1*. + W0".3..|
00000810: 05 99 22 20 20 20 20 32 2E 20 D9 20 3D 20 57 32 |.." 2. . = W2|
00000820: 2A D8 5E 32 20 2B 20 57 31 2A D8 20 20 20 2B 20 |*.^2 + W1*. + |
00000830: 57 30 22 00 62 10 C8 05 99 22 20 20 20 20 33 2E |W0".b...." 3.|
00000840: 20 D9 20 3D 20 57 33 2A D8 5E 33 20 2B 20 57 32 | . = W3*.^3 + W2|
00000850: 2A D8 5E 32 20 2B 20 57 31 2A D8 20 20 2B 20 57 |*.^2 + W1*. + W|
00000860: 30 22 00 8F 10 D2 05 99 22 20 20 20 20 34 2E 20 |0"......" 4. |
00000870: D9 20 3D 20 57 34 2A D8 5E 34 20 2B 20 57 33 2A |. = W4*.^4 + W3*|
00000880: D8 5E 33 20 2B 20 57 32 2A D8 5E 32 20 2B 22 00 |.^3 + W2*.^2 +".|
00000890: AD 10 DC 05 99 22 20 20 20 20 20 20 20 20 20 20 |....." |
000008A0: 20 57 31 2A D8 20 20 20 2B 20 57 30 22 00 DA 10 | W1*. + W0"...|
000008B0: E6 05 99 22 20 20 20 20 35 2E 20 D9 20 3D 20 57 |..." 5. . = W|
000008C0: 35 2A D8 5E 35 20 2B 20 57 34 2A D8 5E 34 20 2B |5*.^5 + W4*.^4 +|
000008D0: 20 57 33 2A D8 5E 33 20 2B 22 00 01 11 F0 05 99 | W3*.^3 +"......|
000008E0: 22 20 20 20 20 20 20 20 20 20 20 20 57 32 2A 58 |" W2*X|
000008F0: 5E 32 20 2B 20 57 31 2A D8 20 20 20 2B 20 57 30 |^2 + W1*. + W0|
00000900: 22 00 27 11 FA 05 99 22 20 20 20 20 36 2E 20 C9 |".'...." 6. .|
00000910: 4E 56 4F 45 52 45 4E 20 53 45 54 20 4D 45 45 54 |NVOEREN SET MEET|
00000920: 50 55 4E 54 45 4E 22 00 52 11 04 06 99 22 20 20 |PUNTEN".R...." |
00000930: 20 20 37 2E 20 C9 4E 56 4F 45 52 45 4E 20 46 55 | 7. .NVOEREN FU|
00000940: 4E 4B 54 49 45 53 20 20 20 47 20 20 45 4E 20 20 |NKTIES G EN |
00000950: 46 22 00 81 11 0E 06 99 22 20 20 20 20 38 2E 20 |F"......" 8. |
00000960: D2 45 53 55 4C 54 41 54 45 4E 2B 20 54 41 42 45 |.ESULTATEN+ TABE|
00000970: 4C 20 4D 45 54 20 4D 45 45 54 50 55 4E 54 45 4E |L MET MEETPUNTEN|
00000980: 22 00 A9 11 18 06 99 22 20 20 20 20 39 2E 20 C5 |"......" 9. .|
00000990: 49 4E 44 45 20 45 58 45 4B 55 54 49 45 20 50 52 |INDE EXEKUTIE PR|
000009A0: 4F 47 52 41 4D 4D 41 2E 22 00 AF 11 22 06 99 00 |OGRAMMA."..."...|
000009B0: D6 11 2C 06 99 22 D5 57 20 4B 45 55 5A 45 20 20 |..,..".W KEUZE |
000009C0: 20 20 20 20 20 20 28 31 2C 32 2C 2E 2E 2E 2E 2E | (1,2,.....|
000009D0: 2C 39 29 20 22 3B 00 E4 11 36 06 8D 32 31 30 3A |,9) ";...6..210:|
000009E0: 99 49 4E 24 00 10 12 40 06 48 B2 C5 28 49 4E 24 |.IN$...@.H..(IN$|
000009F0: 29 3A 8B 28 48 B3 31 29 20 B0 28 48 B1 39 29 20 |):.(H.1) .(H.9) |
00000A00: B0 28 B5 28 48 29 B3 B1 48 29 20 A7 31 35 38 30 |.(.(H)..H) .1580|
00000A10: 00 1F 12 4A 06 8B 48 B2 39 20 A7 31 36 34 30 00 |...J..H.9 .1640.|
00000A20: 52 12 54 06 91 48 20 8D 32 30 30 30 2C 33 30 30 |R.T..H .2000,300|
00000A30: 30 2C 34 30 30 30 2C 35 30 30 30 2C 36 30 30 30 |0,4000,5000,6000|
00000A40: 2C 31 35 30 30 30 2C 31 36 30 30 30 2C 31 38 30 |,15000,16000,180|
00000A50: 30 30 00 5C 12 5E 06 89 31 34 33 30 00 62 12 68 |00.\.^..1430.b.h|
00000A60: 06 99 00 83 12 72 06 99 22 C5 49 4E 44 45 20 45 |.....r..".INDE E|
00000A70: 58 45 4B 55 54 49 45 20 50 52 4F 47 52 41 4D 4D |XEKUTIE PROGRAMM|
00000A80: 41 2E 22 00 89 12 7C 06 80 00 A6 12 D0 07 8F 20 |A."...|........ |
00000A90: 4F 50 4C 4F 53 53 45 4E 20 20 59 3D 20 57 31 2A |OPLOSSEN Y= W1*|
00000AA0: 58 20 2B 20 57 30 00 BD 12 DA 07 8F 20 52 45 47 |X + W0...... REG|
00000AB0: 45 4C 53 20 32 30 30 30 2D 32 33 37 30 00 C6 12 |ELS 2000-2370...|
00000AC0: E4 07 8D 31 30 30 00 E9 12 EE 07 99 22 C2 45 52 |...100......".ER|
00000AD0: 45 4B 45 4E 49 4E 47 20 52 45 47 52 45 53 53 49 |EKENING REGRESSI|
00000AE0: 45 2D 52 45 43 48 54 45 22 00 EF 12 F8 07 99 00 |E-RECHTE".......|
00000AF0: 06 13 02 08 99 22 20 20 D9 20 3D 20 57 31 2A D8 |....." . = W1*.|
00000B00: 20 2B 20 57 30 22 00 0C 13 0C 08 99 00 1F 13 16 | + W0"..........|
00000B10: 08 41 32 B2 30 3A 41 31 B2 30 3A 41 30 B2 30 00 |.A2.0:A1.0:A0.0.|
00000B20: 2D 13 20 08 42 31 B2 30 3A 42 30 B2 30 00 3A 13 |-. .B1.0:B0.0.:.|
00000B30: 2A 08 81 49 B2 31 20 A4 4E 50 00 6D 13 34 08 55 |*..I.1 .NP.m.4.U|
00000B40: B2 55 28 49 29 3A 91 47 20 8D 31 37 30 31 30 2C |.U(I):.G .17010,|
00000B50: 31 37 30 36 30 2C 31 37 31 31 30 2C 31 37 31 36 |17060,17110,1716|
00000B60: 30 2C 31 37 32 31 30 2C 31 37 32 36 30 00 A0 13 |0,17210,17260...|
00000B70: 3E 08 56 B2 56 28 49 29 3A 91 46 20 8D 31 37 35 |>.V.V(I):.F .175|
00000B80: 31 30 2C 31 37 35 36 30 2C 31 37 36 31 30 2C 31 |10,17560,17610,1|
00000B90: 37 36 36 30 2C 31 37 37 31 30 2C 31 37 37 36 30 |7660,17710,17760|
00000BA0: 00 D0 13 48 08 48 B2 31 3A 41 30 B2 41 30 AA 48 |...H.H.1:A0.A0.H|
00000BB0: 3A 42 30 B2 42 30 AA 59 3A 48 B2 48 AC 58 3A 41 |:B0.B0.Y:H.H.X:A|
00000BC0: 31 B2 41 31 AA 48 3A 42 31 B2 42 31 AA 59 AC 48 |1.A1.H:B1.B1.Y.H|
00000BD0: 00 E2 13 52 08 48 B2 48 AC 58 3A 41 32 B2 41 32 |...R.H.H.X:A2.A2|
00000BE0: AA 48 00 E9 13 5C 08 82 49 00 F7 13 66 08 41 28 |.H...\..I...f.A(|
00000BF0: 31 2C 31 29 B2 41 32 00 0F 14 70 08 41 28 31 2C |1,1).A2...p.A(1,|
00000C00: 32 29 B2 41 31 3A 41 28 32 2C 31 29 B2 41 31 00 |2).A1:A(2,1).A1.|
00000C10: 1D 14 7A 08 41 28 32 2C 32 29 B2 41 30 00 31 14 |..z.A(2,2).A0.1.|
00000C20: 84 08 42 28 31 29 B2 42 31 3A 42 28 32 29 B2 42 |..B(1).B1:B(2).B|
00000C30: 30 00 65 14 8E 08 8F 20 44 45 20 43 4F 45 46 46 |0.e.... DE COEFF|
00000C40: 49 43 49 45 4E 54 45 4E 2D 4D 41 54 52 49 58 20 |ICIENTEN-MATRIX |
00000C50: 41 20 45 4E 20 56 45 4B 54 4F 52 20 42 20 5A 49 |A EN VEKTOR B ZI|
00000C60: 4A 4E 20 4E 55 00 8D 14 98 08 8F 20 42 45 52 45 |JN NU...... BERE|
00000C70: 4B 45 4E 44 2E 20 4C 4F 53 20 4E 55 20 20 57 20 |KEND. LOS NU W |
00000C80: 20 4F 50 20 55 49 54 20 20 41 57 3D 42 00 AE 14 | OP UIT AW=B...|
00000C90: A2 08 4E B2 32 3A 8D 31 30 30 30 30 3A 8F 20 4C |..N.2:.10000:. L|
00000CA0: 55 2D 44 45 43 4F 4D 50 4F 53 49 54 49 45 00 C6 |U-DECOMPOSITIE..|
00000CB0: 14 AC 08 8B 46 54 B2 31 20 A7 8D 32 31 30 30 30 |....FT.1 ..21000|
00000CC0: 3A 89 32 33 36 30 00 E9 14 B6 08 8D 31 31 30 30 |:.2360......1100|
00000CD0: 30 3A 8D 31 32 30 30 30 3A 8F 20 4F 50 4C 4F 53 |0:.12000:. OPLOS|
00000CE0: 53 45 4E 20 56 41 4E 20 57 00 FD 14 C0 08 57 31 |SEN VAN W.....W1|
00000CF0: B2 42 28 31 29 3A 57 30 B2 42 28 32 29 00 2C 15 |.B(1):W0.B(2).,.|
00000D00: CA 08 99 22 C4 45 20 50 41 52 41 4D 45 54 45 52 |...".E PARAMETER|
00000D10: 53 20 20 57 30 20 45 4E 20 57 31 20 20 5A 49 4A |S W0 EN W1 ZIJ|
00000D20: 4E 20 42 45 52 45 4B 45 4E 44 3A 22 00 32 15 D4 |N BEREKEND:".2..|
00000D30: 08 99 00 44 15 DE 08 99 22 20 20 57 30 20 3D 20 |...D...." W0 = |
00000D40: 22 3B 57 30 00 56 15 E8 08 99 22 20 20 57 31 20 |";W0.V...." W1 |
00000D50: 3D 20 22 3B 57 31 00 5C 15 F2 08 99 00 6E 15 FC |= ";W1.\.....n..|
00000D60: 08 99 22 C5 52 20 47 45 4C 44 54 20 3A 22 00 74 |..".R GELDT :".t|
00000D70: 15 06 09 99 00 9A 15 10 09 99 22 20 20 D6 20 3D |.........." . =|
00000D80: 20 49 4E 56 45 52 53 45 2D 46 20 28 57 31 2A 47 | INVERSE-F (W1*G|
00000D90: 28 D5 29 20 2B 20 57 30 29 22 00 A0 15 1A 09 99 |(.) + W0)"......|
00000DA0: 00 C4 15 24 09 99 22 57 41 41 52 42 49 4A 20 20 |...$.."WAARBIJ |
00000DB0: 49 4E 56 45 52 53 45 2D 46 28 D9 29 20 3D 20 22 |INVERSE-F(.) = "|
00000DC0: 3B 46 31 24 00 E7 15 2E 09 99 22 20 20 20 20 20 |;F1$......" |
00000DD0: 20 20 20 20 20 20 20 20 20 20 20 20 47 28 D5 29 | G(.)|
00000DE0: 20 3D 20 22 3B 47 24 00 F2 15 38 09 8D 32 30 30 | = ";G$...8..200|
00000DF0: 30 30 00 F8 15 42 09 8E 00 1E 16 B8 0B 8F 20 4F |00...B........ O|
00000E00: 50 4C 4F 53 53 45 4E 20 20 59 20 3D 20 57 32 2A |PLOSSEN Y = W2*|
00000E10: 58 5E 32 20 2B 20 57 31 2A 58 20 2B 57 30 00 35 |X^2 + W1*X +W0.5|
00000E20: 16 C2 0B 8F 20 52 45 47 45 4C 53 20 33 30 30 30 |.... REGELS 3000|
00000E30: 2D 33 34 30 30 00 3E 16 CC 0B 8D 31 30 30 00 63 |-3400.>....100.c|
00000E40: 16 D6 0B 99 22 C2 45 52 45 4B 45 4E 49 4E 47 20 |....".EREKENING |
00000E50: 52 45 47 52 45 53 53 49 45 2D 50 41 52 41 42 4F |REGRESSIE-PARABO|
00000E60: 4F 4C 22 00 69 16 E0 0B 99 00 89 16 EA 0B 99 22 |OL".i.........."|
00000E70: 20 20 D9 20 3D 20 57 32 2A D8 5E 32 20 2B 20 57 | . = W2*.^2 + W|
00000E80: 31 2A D8 20 2B 20 57 30 22 00 8F 16 F4 0B 99 00 |1*. + W0".......|
00000E90: AC 16 FE 0B 41 34 B2 30 3A 41 33 B2 30 3A 41 32 |....A4.0:A3.0:A2|
00000EA0: B2 30 3A 41 31 B2 30 3A 41 30 B2 30 00 BF 16 08 |.0:A1.0:A0.0....|
00000EB0: 0C 42 32 B2 30 3A 42 31 B2 30 3A 42 30 B2 30 00 |.B2.0:B1.0:B0.0.|
00000EC0: CC 16 12 0C 81 49 B2 31 20 A4 4E 50 00 FF 16 1C |.....I.1 .NP....|
00000ED0: 0C 55 B2 55 28 49 29 3A 91 47 20 8D 31 37 30 31 |.U.U(I):.G .1701|
00000EE0: 30 2C 31 37 30 36 30 2C 31 37 31 31 30 2C 31 37 |0,17060,17110,17|
00000EF0: 31 36 30 2C 31 37 32 31 30 2C 31 37 32 36 30 00 |160,17210,17260.|
00000F00: 32 17 26 0C 56 B2 56 28 49 29 3A 91 46 20 8D 31 |2.&.V.V(I):.F .1|
00000F10: 37 35 31 30 2C 31 37 35 36 30 2C 31 37 36 31 30 |7510,17560,17610|
00000F20: 2C 31 37 36 36 30 2C 31 37 37 31 30 2C 31 37 37 |,17660,17710,177|
00000F30: 36 30 00 62 17 30 0C 48 B2 31 3A 41 30 B2 41 30 |60.b.0.H.1:A0.A0|
00000F40: AA 48 3A 42 30 B2 42 30 AA 59 3A 48 B2 48 AC 58 |.H:B0.B0.Y:H.H.X|
00000F50: 3A 41 31 B2 41 31 AA 48 3A 42 31 B2 42 31 AA 59 |:A1.A1.H:B1.B1.Y|
00000F60: AC 48 00 9A 17 3A 0C 48 B2 48 AC 58 3A 41 32 B2 |.H...:.H.H.X:A2.|
00000F70: 41 32 AA 48 3A 42 32 B2 42 32 AA 59 AC 48 3A 48 |A2.H:B2.B2.Y.H:H|
00000F80: B2 48 AC 58 3A 41 33 B2 41 33 AA 48 3A 48 B2 48 |.H.X:A3.A3.H:H.H|
00000F90: AC 58 3A 41 34 B2 41 34 AA 48 00 A1 17 44 0C 82 |.X:A4.A4.H...D..|
00000FA0: 49 00 AF 17 4E 0C 41 28 31 2C 31 29 B2 41 34 00 |I...N.A(1,1).A4.|
00000FB0: C7 17 58 0C 41 28 31 2C 32 29 B2 41 33 3A 41 28 |..X.A(1,2).A3:A(|
00000FC0: 32 2C 31 29 B2 41 33 00 E9 17 62 0C 41 28 31 2C |2,1).A3...b.A(1,|
00000FD0: 33 29 B2 41 32 3A 41 28 32 2C 32 29 B2 41 32 3A |3).A2:A(2,2).A2:|
00000FE0: 41 28 33 2C 31 29 B2 41 32 00 01 18 6C 0C 41 28 |A(3,1).A2...l.A(|
00000FF0: 32 2C 33 29 B2 41 31 3A 41 28 33 2C 32 29 B2 41 |2,3).A1:A(3,2).A|
00001000: 31 00 0F 18 76 0C 41 28 33 2C 33 29 B2 41 30 00 |1...v.A(3,3).A0.|
00001010: 2B 18 80 0C 42 28 31 29 B2 42 32 3A 42 28 32 29 |+...B(1).B2:B(2)|
00001020: B2 42 31 3A 42 28 33 29 B2 42 30 00 5F 18 8A 0C |.B1:B(3).B0._...|
00001030: 8F 20 44 45 20 43 4F 45 46 46 49 43 49 45 4E 54 |. DE COEFFICIENT|
00001040: 45 4E 2D 4D 41 54 52 49 58 20 41 20 45 4E 20 56 |EN-MATRIX A EN V|
00001050: 45 4B 54 4F 52 20 42 20 5A 49 4A 4E 20 4E 55 00 |EKTOR B ZIJN NU.|
00001060: 87 18 94 0C 8F 20 42 45 52 45 4B 45 4E 44 2E 20 |..... BEREKEND. |
00001070: 4C 4F 53 20 4E 55 20 20 57 20 20 4F 50 20 55 49 |LOS NU W OP UI|
00001080: 54 20 20 41 57 3D 42 00 A8 18 9E 0C 4E B2 33 3A |T AW=B.....N.3:|
00001090: 8D 31 30 30 30 30 3A 8F 20 4C 55 2D 44 45 43 4F |.10000:. LU-DECO|
000010A0: 4D 50 4F 53 49 54 49 45 00 C0 18 A8 0C 8B 46 54 |MPOSITIE......FT|
000010B0: B2 31 20 A7 8D 32 31 30 30 30 3A 89 33 33 39 30 |.1 ..21000:.3390|
000010C0: 00 E3 18 B2 0C 8D 31 31 30 30 30 3A 8D 31 32 30 |......11000:.120|
000010D0: 30 30 3A 8F 20 4F 50 4C 4F 53 53 45 4E 20 56 41 |00:. OPLOSSEN VA|
000010E0: 4E 20 57 00 FF 18 BC 0C 57 32 B2 42 28 31 29 3A |N W.....W2.B(1):|
000010F0: 57 31 B2 42 28 32 29 3A 57 30 B2 42 28 33 29 00 |W1.B(2):W0.B(3).|
00001100: 2D 19 C6 0C 99 22 C4 45 20 50 41 52 41 4D 45 54 |-....".E PARAMET|
00001110: 45 52 53 20 57 30 20 54 2F 4D 20 57 32 20 5A 49 |ERS W0 T/M W2 ZI|
00001120: 4A 4E 20 42 45 52 45 4B 45 4E 44 3A 22 00 33 19 |JN BEREKEND:".3.|
00001130: D0 0C 99 00 45 19 DA 0C 99 22 20 20 57 30 20 3D |....E...." W0 =|
00001140: 20 22 3B 57 30 00 57 19 E4 0C 99 22 20 20 57 31 | ";W0.W...." W1|
00001150: 20 3D 20 22 3B 57 31 00 69 19 EE 0C 99 22 20 20 | = ";W1.i...." |
00001160: 57 32 20 3D 20 22 3B 57 32 00 6F 19 F8 0C 99 00 |W2 = ";W2.o.....|
00001170: 81 19 02 0D 99 22 C5 52 20 47 45 4C 44 54 20 3A |.....".R GELDT :|
00001180: 22 00 87 19 0C 0D 99 00 B6 19 16 0D 99 22 D6 3D |"............".=|
00001190: 20 49 4E 56 45 52 53 45 20 46 20 28 57 32 2A 47 | INVERSE F (W2*G|
000011A0: 28 D5 29 5E 32 20 2B 20 57 31 2A 47 28 D5 29 20 |(.)^2 + W1*G(.) |
000011B0: 2B 20 57 30 29 22 00 BC 19 20 0D 99 00 E0 19 2A |+ W0)"... .....*|
000011C0: 0D 99 22 D7 41 41 52 42 49 4A 20 20 49 4E 56 45 |..".AARBIJ INVE|
000011D0: 52 53 45 2D 46 28 D9 29 20 3D 20 22 3B 46 31 24 |RSE-F(.) = ";F1$|
000011E0: 00 03 1A 34 0D 99 22 20 20 20 20 20 20 20 20 20 |...4.." |
000011F0: 20 20 20 20 20 20 20 20 47 28 D5 29 20 3D 20 22 | G(.) = "|
00001200: 3B 47 24 00 0E 1A 3E 0D 8D 32 30 30 30 30 00 14 |;G$...>..20000..|
00001210: 1A 48 0D 8E 00 44 1A A0 0F 8F 20 4F 50 4C 4F 53 |.H...D.... OPLOS|
00001220: 53 45 4E 20 20 59 20 3D 20 57 33 2A 58 5E 33 20 |SEN Y = W3*X^3 |
00001230: 2B 20 57 32 2A 58 5E 32 20 2B 20 57 31 2A 58 20 |+ W2*X^2 + W1*X |
00001240: 2B 20 57 30 00 5B 1A AA 0F 8F 20 52 45 47 45 4C |+ W0.[.... REGEL|
00001250: 53 20 34 30 30 30 2D 34 34 35 30 00 64 1A B4 0F |S 4000-4450.d...|
00001260: 8D 31 30 30 00 93 1A BE 0F 99 22 C2 45 52 45 4B |.100......".EREK|
00001270: 45 4E 49 4E 47 20 52 45 47 52 45 53 53 49 45 2D |ENING REGRESSIE-|
00001280: 20 33 45 2D 4D 41 43 48 54 53 50 4F 4C 59 4E 4F | 3E-MACHTSPOLYNO|
00001290: 4F 4D 22 00 99 1A C8 0F 99 00 C2 1A D2 0F 99 22 |OM"............"|
000012A0: 20 20 D9 20 3D 20 57 33 2A D8 5E 33 20 2B 20 57 | . = W3*.^3 + W|
000012B0: 32 2A D8 5E 32 20 2B 20 57 31 2A D8 20 2B 20 57 |2*.^2 + W1*. + W|
000012C0: 30 22 00 C8 1A DC 0F 99 00 EF 1A E6 0F 41 36 B2 |0"...........A6.|
000012D0: 30 3A 41 35 B2 30 3A 41 34 B2 30 3A 41 33 B2 30 |0:A5.0:A4.0:A3.0|
000012E0: 3A 41 32 B2 30 3A 41 31 B2 30 3A 41 30 B2 30 00 |:A2.0:A1.0:A0.0.|
000012F0: 07 1B F0 0F 42 33 B2 30 3A 42 32 B2 30 3A 42 31 |....B3.0:B2.0:B1|
00001300: B2 30 3A 42 30 B2 30 00 14 1B FA 0F 81 49 B2 31 |.0:B0.0......I.1|
00001310: 20 A4 4E 50 00 47 1B 04 10 55 B2 55 28 49 29 3A | .NP.G...U.U(I):|
00001320: 91 47 20 8D 31 37 30 31 30 2C 31 37 30 36 30 2C |.G .17010,17060,|
00001330: 31 37 31 31 30 2C 31 37 31 36 30 2C 31 37 32 31 |17110,17160,1721|
00001340: 30 2C 31 37 32 36 30 00 7A 1B 0E 10 56 B2 56 28 |0,17260.z...V.V(|
00001350: 49 29 3A 91 46 20 8D 31 37 35 31 30 2C 31 37 35 |I):.F .17510,175|
00001360: 36 30 2C 31 37 36 31 30 2C 31 37 36 36 30 2C 31 |60,17610,17660,1|
00001370: 37 37 31 30 2C 31 37 37 36 30 00 AA 1B 18 10 48 |7710,17760.....H|
00001380: B2 31 3A 41 30 B2 41 30 AA 48 3A 42 30 B2 42 30 |.1:A0.A0.H:B0.B0|
00001390: AA 59 3A 48 B2 48 AC 58 3A 41 31 B2 41 4C 29 48 |.Y:H.H.X:A1.AL)H|
000013A0: 3A 42 31 B2 42 31 AA 59 AC 48 00 DE 1B 22 10 48 |:B1.B1.Y.H...".H|
000013B0: B2 48 AC 58 3A 41 32 B2 41 32 AA 48 3A 42 32 B2 |.H.X:A2.A2.H:B2.|
000013C0: 42 32 AA 59 AC 48 3A 48 B2 48 AC 58 3A 41 33 B2 |B2.Y.H:H.H.X:A3.|
000013D0: 41 33 AA 48 3A 42 33 B2 42 33 AA 59 AC 48 00 0C |A3.H:B3.B3.Y.H..|
000013E0: 1C 2C 10 48 B2 48 AC 58 3A 41 34 B2 41 34 AA 48 |.,.H.H.X:A4.A4.H|
000013F0: 3A 48 B2 48 AC 58 3A 41 35 B2 41 35 AA 48 3A 48 |:H.H.X:A5.A5.H:H|
00001400: B2 48 AC 58 3A 41 36 B2 41 36 AA 48 00 13 1C 36 |.H.X:A6.A6.H...6|
00001410: 10 82 49 00 21 1C 40 10 41 28 31 2C 31 29 B2 41 |..I.!.@.A(1,1).A|
00001420: 36 00 39 1C 4A 10 41 28 31 2C 32 29 B2 41 35 3A |6.9.J.A(1,2).A5:|
00001430: 41 28 32 2C 31 29 B2 41 35 00 5B 1C 54 10 41 28 |A(2,1).A5.[.T.A(|
00001440: 31 2C 33 29 B2 41 34 3A 41 28 32 2C 32 29 B2 41 |1,3).A4:A(2,2).A|
00001450: 34 3A 41 28 33 2C 31 29 B2 41 34 00 87 1C 5E 10 |4:A(3,1).A4...^.|
00001460: 41 28 31 2C 34 29 B2 41 33 3A 41 28 32 2C 33 29 |A(1,4).A3:A(2,3)|
00001470: B2 41 33 3A 41 28 33 2C 32 29 B2 41 33 3A 41 28 |.A3:A(3,2).A3:A(|
00001480: 34 2C 31 29 B2 41 33 00 A9 1C 68 10 41 28 32 2C |4,1).A3...h.A(2,|
00001490: 34 29 B2 41 32 3A 41 28 33 2C 33 29 B2 41 32 3A |4).A2:A(3,3).A2:|
000014A0: 41 28 34 2C 32 29 B2 41 32 00 C1 1C 72 10 41 28 |A(4,2).A2...r.A(|
000014B0: 33 2C 34 29 B2 41 31 3A 41 28 34 2C 33 29 B2 41 |3,4).A1:A(4,3).A|
000014C0: 31 00 CF 1C 7C 10 41 28 34 2C 34 29 B2 41 30 00 |1...|.A(4,4).A0.|
000014D0: F3 1C 86 10 42 28 31 29 B2 42 33 3A 42 28 32 29 |....B(1).B3:B(2)|
000014E0: B2 42 32 3A 42 28 33 29 B2 42 31 3A 42 28 34 29 |.B2:B(3).B1:B(4)|
000014F0: B2 42 30 00 27 1D 90 10 8F 20 44 45 20 43 4F 45 |.B0.'.... DE COE|
00001500: 46 46 49 43 49 45 4E 54 45 4E 2D 4D 41 54 52 49 |FFICIENTEN-MATRI|
00001510: 58 20 41 20 45 4E 20 56 45 4B 54 4F 52 20 42 20 |X A EN VEKTOR B |
00001520: 5A 49 4A 4E 20 4E 55 00 4F 1D 9A 10 8F 20 42 45 |ZIJN NU.O.... BE|
00001530: 52 45 4B 45 4E 44 2E 20 4C 4F 53 20 4E 55 20 20 |REKEND. LOS NU |
00001540: 57 20 20 4F 50 20 55 49 54 20 20 41 57 3D 42 00 |W OP UIT AW=B.|
00001550: 70 1D A4 10 4E B2 34 3A 8D 31 30 30 30 30 3A 8F |p...N.4:.10000:.|
00001560: 20 4C 55 2D 44 45 43 4F 4D 50 4F 53 49 54 49 45 | LU-DECOMPOSITIE|
00001570: 00 88 1D AE 10 8B 46 54 B2 31 20 A7 8D 32 31 30 |......FT.1 ..210|
00001580: 30 30 3A 89 34 34 34 30 00 AB 1D B8 10 8D 31 31 |00:.4440......11|
00001590: 30 30 30 3A 8D 31 32 30 30 30 3A 8F 20 4F 50 4C |000:.12000:. OPL|
000015A0: 4F 53 53 45 4E 20 56 41 4E 20 57 00 CF 1D C2 10 |OSSEN VAN W.....|
000015B0: 57 33 B2 42 28 31 29 3A 57 32 B2 42 28 32 29 3A |W3.B(1):W2.B(2):|
000015C0: 57 31 B2 42 28 33 29 3A 57 30 B2 42 28 34 29 00 |W1.B(3):W0.B(4).|
000015D0: FE 1D CC 10 99 22 C4 45 20 50 41 52 41 4D 45 54 |.....".E PARAMET|
000015E0: 45 52 53 20 57 30 20 54 2F 4D 20 57 33 20 5A 49 |ERS W0 T/M W3 ZI|
000015F0: 4A 4E 20 42 45 52 45 4B 45 4E 44 20 3A 22 00 04 |JN BEREKEND :"..|
00001600: 1E D6 10 99 00 16 1E E0 10 99 22 20 20 57 30 20 |.........." W0 |
00001610: 3D 20 22 3B 57 30 00 28 1E EA 10 99 22 20 20 57 |= ";W0.(...." W|
00001620: 31 20 3D 20 22 3B 57 31 00 3A 1E F4 10 99 22 20 |1 = ";W1.:...." |
00001630: 20 57 32 20 3D 20 22 3B 57 32 00 4C 1E FE 10 99 | W2 = ";W2.L....|
00001640: 22 20 20 57 33 20 3D 20 22 3B 57 33 00 52 1E 08 |" W3 = ";W3.R..|
00001650: 11 99 00 64 1E 12 11 99 22 C5 52 20 47 45 4C 44 |...d....".R GELD|
00001660: 54 20 3A 22 00 6A 1E 1C 11 99 00 99 1E 26 11 99 |T :".j.......&..|
00001670: 22 20 D6 20 3D 20 49 4E 56 45 52 53 45 20 46 20 |" . = INVERSE F |
00001680: 28 57 33 2A 47 28 D5 29 5E 33 20 2B 20 57 32 2A |(W3*G(.)^3 + W2*|
00001690: 47 28 D5 29 5E 32 20 2B 22 00 C1 1E 30 11 99 22 |G(.)^2 +"...0.."|
000016A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000016B0: 57 31 2A 47 28 D5 29 20 20 20 2B 20 57 30 20 29 |W1*G(.) + W0 )|
000016C0: 22 00 C7 1E 3A 11 99 00 EB 1E 44 11 99 22 D7 41 |"...:.....D..".A|
000016D0: 41 52 42 49 4A 20 20 49 4E 56 45 52 53 45 2D 46 |ARBIJ INVERSE-F|
000016E0: 28 D9 29 20 3D 20 22 3B 46 31 24 00 0E 1F 4E 11 |(.) = ";F1$...N.|
000016F0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00001700: 20 20 20 47 28 D5 29 20 3D 20 22 3B 47 24 00 19 | G(.) = ";G$..|
00001710: 1F 58 11 8D 32 30 30 30 30 00 1F 1F 62 11 8E 00 |.X..20000...b...|
00001720: 4E 1F 88 13 8F 20 4F 50 4C 4F 53 53 45 4E 20 20 |N.... OPLOSSEN |
00001730: 59 20 3D 20 57 34 2A 58 5E 34 20 2B 20 57 33 2A |Y = W4*X^4 + W3*|
00001740: 58 5E 33 20 2B 20 57 32 2A 58 5E 32 20 2B 00 6E |X^3 + W2*X^2 +.n|
00001750: 1F 92 13 8F 20 20 20 20 20 20 20 20 20 20 20 20 |.... |
00001760: 20 20 20 57 31 2A 58 20 20 20 2B 20 57 30 00 85 | W1*X + W0..|
00001770: 1F 9C 13 8F 20 52 45 47 45 4C 53 20 35 30 30 30 |.... REGELS 5000|
00001780: 2D 35 35 31 30 00 8E 1F A6 13 8D 31 30 30 00 BD |-5510......100..|
00001790: 1F B0 13 99 22 C2 45 52 45 4B 45 4E 49 4E 47 20 |....".EREKENING |
000017A0: 52 45 47 52 45 53 53 49 45 2D 20 34 45 2D 4D 41 |REGRESSIE- 4E-MA|
000017B0: 43 48 54 53 50 4F 4C 59 4E 4F 4F 4D 22 00 C3 1F |CHTSPOLYNOOM"...|
000017C0: BA 13 99 00 EB 1F C4 13 99 22 20 20 D9 20 3D 20 |........." . = |
000017D0: 57 34 2A D8 5E 34 20 2B 20 57 33 2A D8 5E 33 20 |W4*.^4 + W3*.^3 |
000017E0: 2B 20 57 32 2A D8 5E 32 20 2B 22 00 04 20 CE 13 |+ W2*.^2 +".. ..|
000017F0: 99 22 20 20 20 20 20 20 57 31 2A D8 20 20 20 2B |." W1*. +|
00001800: 20 57 30 22 00 0A 20 D8 13 99 00 3B 20 E2 13 41 | W0".. ....; ..A|
00001810: 38 B2 30 3A 41 37 B2 30 3A 41 36 B2 30 3A 41 35 |8.0:A7.0:A6.0:A5|
00001820: B2 30 3A 41 34 B2 30 3A 41 33 B2 30 3A 41 32 B2 |.0:A4.0:A3.0:A2.|
00001830: 30 3A 41 31 B2 30 3A 41 30 B2 30 00 58 20 EC 13 |0:A1.0:A0.0.X ..|
00001840: 42 34 B2 30 3A 42 33 B2 30 3A 42 32 B2 30 3A 42 |B4.0:B3.0:B2.0:B|
00001850: 31 B2 30 3A 42 30 B2 30 00 65 20 F6 13 81 49 B2 |1.0:B0.0.e ...I.|
00001860: 31 20 A4 4E 50 00 98 20 00 14 55 B2 55 28 49 29 |1 .NP.. ..U.U(I)|
00001870: 3A 91 47 20 8D 31 37 30 31 30 2C 31 37 30 36 30 |:.G .17010,17060|
00001880: 2C 31 37 31 31 30 2C 31 37 31 36 30 2C 31 37 32 |,17110,17160,172|
00001890: 31 30 2C 31 37 32 36 30 00 CB 20 0A 14 56 B2 56 |10,17260.. ..V.V|
000018A0: 28 49 29 3A 91 46 20 8D 31 37 35 31 30 2C 31 37 |(I):.F .17510,17|
000018B0: 35 36 30 2C 31 37 36 31 30 2C 31 37 36 36 30 2C |560,17610,17660,|
000018C0: 31 37 37 31 30 2C 31 37 37 36 30 00 FB 20 14 14 |17710,17760.. ..|
000018D0: 48 B2 31 3A 41 30 B2 41 30 AA 48 3A 42 30 B2 42 |H.1:A0.A0.H:B0.B|
000018E0: 30 AA 59 3A 48 B2 48 AC 58 3A 41 31 B2 41 31 AA |0.Y:H.H.X:A1.A1.|
000018F0: 48 3A 42 31 B2 42 31 AA 59 AC 48 00 2F 21 1E 14 |H:B1.B1.Y.H./!..|
00001900: 48 B2 48 AC 58 3A 41 32 B2 41 32 AA 48 3A 42 32 |H.H.X:A2.A2.H:B2|
00001910: B2 42 32 AA 59 AC 48 3A 48 B2 48 AC 58 3A 41 33 |.B2.Y.H:H.H.X:A3|
00001920: B2 41 33 AA 48 3A 42 33 B2 42 33 AA 59 AC 48 00 |.A3.H:B3.B3.Y.H.|
00001930: 67 21 28 14 48 B2 48 AC 58 3A 41 34 B2 41 34 AA |g!(.H.H.X:A4.A4.|
00001940: 48 3A 42 34 B2 42 34 AA 59 AC 48 3A 48 B2 48 AC |H:B4.B4.Y.H:H.H.|
00001950: 58 3A 41 35 B2 41 35 AA 48 3A 48 B2 48 AC 58 3A |X:A5.A5.H:H.H.X:|
00001960: 41 36 B2 41 36 AA 48 00 87 21 32 14 48 B2 48 AC |A6.A6.H..!2.H.H.|
00001970: 58 3A 41 37 B2 41 37 AA 48 3A 48 B2 48 AC 58 3A |X:A7.A7.H:H.H.X:|
00001980: 41 38 B2 41 38 AA 48 00 8E 21 3C 14 82 49 00 9C |A8.A8.H..!<..I..|
00001990: 21 46 14 41 28 31 2C 31 29 B2 41 38 00 B4 21 50 |!F.A(1,1).A8..!P|
000019A0: 14 41 28 31 2C 32 29 B2 41 37 3A 41 28 32 2C 31 |.A(1,2).A7:A(2,1|
000019B0: 29 B2 41 37 00 D6 21 5A 14 41 28 31 2C 33 29 B2 |).A7..!Z.A(1,3).|
000019C0: 41 36 3A 41 28 32 2C 32 29 B2 41 36 3A 41 28 33 |A6:A(2,2).A6:A(3|
000019D0: 2C 31 29 B2 41 36 00 02 22 64 14 41 28 31 2C 34 |,1).A6.."d.A(1,4|
000019E0: 29 B2 41 35 3A 41 28 32 2C 33 29 B2 41 35 3A 41 |).A5:A(2,3).A5:A|
000019F0: 28 33 2C 32 29 B2 41 35 3A 41 28 34 2C 31 29 B2 |(3,2).A5:A(4,1).|
00001A00: 41 35 00 38 22 6E 14 41 28 31 2C 35 29 B2 41 34 |A5.8"n.A(1,5).A4|
00001A10: 3A 41 28 32 2C 34 29 B2 41 32 3A 41 28 33 2C 33 |:A(2,4).A2:A(3,3|
00001A20: 29 B2 41 34 3A 41 28 34 2C 32 29 B2 41 34 3A 41 |).A4:A(4,2).A4:A|
00001A30: 28 35 2C 31 29 B2 41 34 00 64 22 78 14 41 28 32 |(5,1).A4.d"x.A(2|
00001A40: 2C 35 29 B2 41 33 3A 41 28 33 2C 34 29 B2 41 33 |,5).A3:A(3,4).A3|
00001A50: 3A 41 28 34 2C 33 29 B2 41 33 3A 41 28 35 2C 32 |:A(4,3).A3:A(5,2|
00001A60: 29 B2 41 33 00 86 22 82 14 41 28 33 2C 35 29 B2 |).A3.."..A(3,5).|
00001A70: 41 32 3A 41 28 34 2C 34 29 B2 41 32 3A 41 28 35 |A2:A(4,4).A2:A(5|
00001A80: 2C 33 29 B2 41 32 00 9E 22 8C 14 41 28 34 2C 35 |,3).A2.."..A(4,5|
00001A90: 29 B2 41 31 3A 41 28 35 2C 34 29 B2 41 31 00 AC |).A1:A(5,4).A1..|
00001AA0: 22 96 14 41 28 35 2C 35 29 B2 41 30 00 D8 22 A0 |"..A(5,5).A0..".|
00001AB0: 14 42 28 31 29 B2 42 34 3A 42 28 32 29 B2 42 33 |.B(1).B4:B(2).B3|
00001AC0: 3A 42 28 33 29 B2 42 32 3A 42 28 34 29 B2 42 31 |:B(3).B2:B(4).B1|
00001AD0: 3A 42 28 35 29 B2 42 30 00 0C 23 AA 14 8F 20 44 |:B(5).B0..#... D|
00001AE0: 45 20 43 4F 45 46 46 49 43 49 45 4E 54 45 4E 2D |E COEFFICIENTEN-|
00001AF0: 4D 41 54 52 49 58 20 41 20 45 4E 20 56 45 4B 54 |MATRIX A EN VEKT|
00001B00: 4F 52 20 42 20 5A 49 4A 4E 20 4E 55 00 34 23 B4 |OR B ZIJN NU.4#.|
00001B10: 14 8F 20 42 45 52 45 4B 45 4E 44 2E 20 4C 4F 53 |.. BEREKEND. LOS|
00001B20: 20 4E 55 20 20 57 20 20 4F 50 20 55 49 54 20 20 | NU W OP UIT |
00001B30: 41 57 3D 42 00 55 23 BE 14 4E B2 35 3A 8D 31 30 |AW=B.U#..N.5:.10|
00001B40: 30 30 30 3A 8F 20 4C 55 2D 44 45 43 4F 4D 50 4F |000:. LU-DECOMPO|
00001B50: 53 49 54 49 45 00 6D 23 C8 14 8B 46 54 B2 31 20 |SITIE.m#...FT.1 |
00001B60: A7 8D 32 31 30 30 30 3A 89 35 35 30 30 00 90 23 |..21000:.5500..#|
00001B70: D2 14 8D 31 31 30 30 30 3A 8D 31 32 30 30 30 3A |...11000:.12000:|
00001B80: 8F 20 4F 50 4C 4F 53 53 45 4E 20 56 41 4E 20 57 |. OPLOSSEN VAN W|
00001B90: 00 BC 23 DC 14 57 34 B2 42 28 31 29 3A 57 33 B2 |..#..W4.B(1):W3.|
00001BA0: 42 28 32 29 3A 57 32 B2 42 28 33 29 3A 57 31 B2 |B(2):W2.B(3):W1.|
00001BB0: 42 28 34 29 3A 57 30 B2 42 28 35 29 00 EB 23 E6 |B(4):W0.B(5)..#.|
00001BC0: 14 99 22 C4 45 20 50 41 52 41 4D 45 54 45 52 53 |..".E PARAMETERS|
00001BD0: 20 57 30 20 54 2F 4D 20 57 34 20 5A 49 4A 4E 20 | W0 T/M W4 ZIJN |
00001BE0: 42 45 52 45 4B 45 4E 44 20 3A 22 00 F1 23 F0 14 |BEREKEND :"..#..|
00001BF0: 99 00 03 24 FA 14 99 22 20 20 57 30 20 3D 20 22 |...$..." W0 = "|
00001C00: 3B 57 30 00 15 24 04 15 99 22 20 20 57 31 20 3D |;W0..$..." W1 =|
00001C10: 20 22 3B 57 31 00 27 24 0E 15 99 22 20 20 57 32 | ";W1.'$..." W2|
00001C20: 20 3D 20 22 3B 57 32 00 39 24 18 15 99 22 20 20 | = ";W2.9$..." |
00001C30: 57 33 20 3D 20 22 3B 57 33 00 4B 24 22 15 99 22 |W3 = ";W3.K$".."|
00001C40: 20 20 57 34 20 3D 20 22 3B 57 34 00 51 24 2C 15 | W4 = ";W4.Q$,.|
00001C50: 99 00 63 24 36 15 99 22 C5 52 20 47 45 4C 44 54 |..c$6..".R GELDT|
00001C60: 20 3A 22 00 69 24 40 15 99 00 98 24 4A 15 99 22 | :".i$@....$J.."|
00001C70: 20 D6 20 3D 20 49 4E 56 45 52 53 45 20 46 20 28 | . = INVERSE F (|
00001C80: 57 34 2A 47 28 D5 29 5E 34 20 2B 20 57 33 2A 47 |W4*G(.)^4 + W3*G|
00001C90: 28 D5 29 5E 33 20 2B 22 00 C7 24 54 15 99 22 20 |(.)^3 +"..$T.." |
00001CA0: 20 20 20 20 20 20 20 20 20 20 20 57 32 2A 47 28 | W2*G(|
00001CB0: D5 29 5E 32 20 2B 20 57 31 2A 47 28 D5 29 20 20 |.)^2 + W1*G(.) |
00001CC0: 20 2B 20 57 30 29 22 00 CD 24 5E 15 99 00 F1 24 | + W0)"..$^....$|
00001CD0: 68 15 99 22 D7 41 41 52 42 49 4A 20 20 49 4E 56 |h..".AARBIJ INV|
00001CE0: 45 52 53 45 2D 46 28 D9 29 20 3D 20 22 3B 46 31 |ERSE-F(.) = ";F1|
00001CF0: 24 00 14 25 72 15 99 22 20 20 20 20 20 20 20 20 |$..%r.." |
00001D00: 20 20 20 20 20 20 20 20 20 47 28 D5 29 20 3D 20 | G(.) = |
00001D10: 22 3B 47 24 00 1F 25 7C 15 8D 32 30 30 30 30 00 |";G$..%|..20000.|
00001D20: 25 25 86 15 8E 00 54 25 70 17 8F 20 4F 50 4C 4F |%%....T%p.. OPLO|
00001D30: 53 53 45 4E 20 20 59 20 3D 20 57 35 2A 58 5E 35 |SSEN Y = W5*X^5|
00001D40: 20 2B 20 57 34 2A 58 5E 34 20 2B 20 57 33 2A 58 | + W4*X^4 + W3*X|
00001D50: 5E 33 20 2B 00 7D 25 7A 17 8F 20 20 20 20 20 20 |^3 +.}%z.. |
00001D60: 20 20 20 20 20 20 20 20 20 57 32 2A 58 5E 32 20 | W2*X^2 |
00001D70: 2B 20 57 31 2A 58 20 20 20 2B 20 57 30 00 94 25 |+ W1*X + W0..%|
00001D80: 84 17 8F 20 52 45 47 45 4C 53 20 36 30 30 30 2D |... REGELS 6000-|
00001D90: 36 35 36 30 00 9D 25 8E 17 8D 31 30 30 00 CC 25 |6560..%...100..%|
00001DA0: 98 17 99 22 C2 45 52 45 4B 45 4E 49 4E 47 20 52 |...".EREKENING R|
00001DB0: 45 47 52 45 53 53 49 45 2D 20 35 45 2D 4D 41 43 |EGRESSIE- 5E-MAC|
00001DC0: 48 54 53 50 4F 4C 59 4E 4F 4F 4D 22 00 D2 25 A2 |HTSPOLYNOOM"..%.|
00001DD0: 17 99 00 FA 25 AC 17 99 22 20 20 D9 20 3D 20 57 |....%..." . = W|
00001DE0: 35 2A D8 5E 35 20 2B 20 57 34 2A D8 5E 34 20 2B |5*.^5 + W4*.^4 +|
00001DF0: 20 57 33 2A D8 5E 33 20 2B 22 00 1C 26 B6 17 99 | W3*.^3 +"..&...|
00001E00: 22 20 20 20 20 20 20 57 32 2A D8 5E 32 20 2B 20 |" W2*.^2 + |
00001E10: 57 31 2A D8 20 20 20 2B 20 57 30 22 00 22 26 C0 |W1*. + W0"."&.|
00001E20: 17 99 00 5D 26 CA 17 41 48 B2 30 3A 41 39 B2 30 |...]&..AH.0:A9.0|
00001E30: 3A 41 38 B2 30 3A 41 37 B2 30 3A 41 36 B2 30 3A |:A8.0:A7.0:A6.0:|
00001E40: 41 35 B2 30 3A 41 34 B2 30 3A 41 33 B2 30 3A 41 |A5.0:A4.0:A3.0:A|
00001E50: 32 B2 30 3A 41 31 B2 30 3A 41 30 B2 30 00 7F 26 |2.0:A1.0:A0.0..&|
00001E60: D4 17 42 35 B2 30 3A 42 34 B2 30 3A 42 33 B2 30 |..B5.0:B4.0:B3.0|
00001E70: 3A 42 32 B2 30 3A 42 31 B2 30 3A 42 30 B2 30 00 |:B2.0:B1.0:B0.0.|
00001E80: 8C 26 DE 17 81 49 B2 31 20 A4 4E 50 00 BF 26 E8 |.&...I.1 .NP..&.|
00001E90: 17 55 B2 55 28 49 29 3A 91 47 20 8D 31 37 30 31 |.U.U(I):.G .1701|
00001EA0: 30 2C 31 37 30 36 30 2C 31 37 31 31 30 2C 31 37 |0,17060,17110,17|
00001EB0: 31 36 30 2C 31 37 32 31 30 2C 31 37 32 36 30 00 |160,17210,17260.|
00001EC0: F2 26 F2 17 56 B2 56 28 49 29 3A 91 46 20 8D 31 |.&..V.V(I):.F .1|
00001ED0: 37 35 31 30 2C 31 37 35 36 30 2C 31 37 36 31 30 |7510,17560,17610|
00001EE0: 2C 31 37 36 36 30 2C 31 37 37 31 30 2C 31 37 37 |,17660,17710,177|
00001EF0: 36 30 00 22 27 FC 17 48 B2 31 3A 41 30 B2 41 30 |60."'..H.1:A0.A0|
00001F00: AA 48 3A 42 30 B2 42 30 AA 59 3A 48 B2 48 AC 58 |.H:B0.B0.Y:H.H.X|
00001F10: 3A 41 31 B2 41 31 AA 48 3A 42 31 B2 42 31 AA 59 |:A1.A1.H:B1.B1.Y|
00001F20: AC 48 00 56 27 06 18 48 B2 48 AC 58 3A 41 32 B2 |.H.V'..H.H.X:A2.|
00001F30: 41 32 AA 48 3A 42 32 B2 42 32 AA 59 AC 48 3A 48 |A2.H:B2.B2.Y.H:H|
00001F40: B2 48 AC 58 3A 41 33 B2 41 33 AA 48 3A 42 33 B2 |.H.X:A3.A3.H:B3.|
00001F50: 42 33 AA 59 AC 48 00 8A 27 10 18 48 B2 48 AC 58 |B3.Y.H..'..H.H.X|
00001F60: 3A 41 34 B2 41 34 AA 48 3A 42 34 B2 42 34 AA 59 |:A4.A4.H:B4.B4.Y|
00001F70: AC 48 3A 48 B2 48 AC 58 3A 41 35 B2 41 35 AA 48 |.H:H.H.X:A5.A5.H|
00001F80: 3A 42 35 B2 42 35 AA 59 AC 48 00 B8 27 1A 18 48 |:B5.B5.Y.H..'..H|
00001F90: B2 48 AC 58 3A 41 36 B2 41 36 AA 48 3A 48 B2 48 |.H.X:A6.A6.H:H.H|
00001FA0: AC 58 3A 41 37 B2 41 37 AA 48 3A 48 B2 48 AC 58 |.X:A7.A7.H:H.H.X|
00001FB0: 3A 41 38 B2 41 38 AA 48 00 D8 27 24 18 48 B2 48 |:A8.A8.H..'$.H.H|
00001FC0: AC 58 3A 41 39 B2 41 39 AA 48 3A 48 B2 48 AC 58 |.X:A9.A9.H:H.H.X|
00001FD0: 3A 41 48 B2 41 48 AA 48 00 DF 27 2E 18 82 49 00 |:AH.AH.H..'...I.|
00001FE0: ED 27 38 18 41 28 31 2C 31 29 B2 41 48 00 05 28 |.'8.A(1,1).AH..(|
00001FF0: 42 18 41 28 31 2C 32 29 B2 41 39 3A 41 28 32 2C |B.A(1,2).A9:A(2,|
00002000: 31 29 B2 41 39 00 27 28 4C 18 41 28 31 2C 33 29 |1).A9.'(L.A(1,3)|
00002010: B2 41 38 3A 41 28 32 2C 32 29 B2 41 38 3A 41 28 |.A8:A(2,2).A8:A(|
00002020: 33 2C 31 29 B2 41 38 00 53 28 56 18 41 28 31 2C |3,1).A8.S(V.A(1,|
00002030: 34 29 B2 41 37 3A 41 28 32 2C 33 29 B2 41 37 3A |4).A7:A(2,3).A7:|
00002040: 41 28 33 2C 32 29 B2 41 37 3A 41 28 34 2C 31 29 |A(3,2).A7:A(4,1)|
00002050: B2 41 37 00 89 28 60 18 41 28 31 2C 35 29 B2 41 |.A7..(`.A(1,5).A|
00002060: 36 3A 41 28 32 2C 34 29 B2 41 36 3A 41 28 33 2C |6:A(2,4).A6:A(3,|
00002070: 33 29 B2 41 36 3A 41 28 34 2C 32 29 B2 41 36 3A |3).A6:A(4,2).A6:|
00002080: 41 28 35 2C 31 29 B2 41 36 00 BF 28 6A 18 41 28 |A(5,1).A6..(j.A(|
00002090: 31 2C 36 29 B2 41 35 3A 41 28 32 2C 35 29 B2 41 |1,6).A5:A(2,5).A|
000020A0: 35 3A 41 28 33 2C 34 29 B2 41 35 3A 41 28 34 2C |5:A(3,4).A5:A(4,|
000020B0: 33 29 B2 41 35 3A 41 28 35 2C 32 29 B2 41 35 00 |3).A5:A(5,2).A5.|
000020C0: CD 28 6F 18 41 28 36 2C 31 29 B2 41 35 00 03 29 |.(o.A(6,1).A5..)|
000020D0: 74 18 41 28 32 2C 36 29 B2 41 34 3A 41 28 33 2C |t.A(2,6).A4:A(3,|
000020E0: 35 29 B2 41 34 3A 41 28 34 2C 34 29 B2 41 34 3A |5).A4:A(4,4).A4:|
000020F0: 41 28 35 2C 33 29 B2 41 34 3A 41 28 36 2C 32 29 |A(5,3).A4:A(6,2)|
00002100: B2 41 34 00 2F 29 7E 18 41 28 33 2C 36 29 B2 41 |.A4./)~.A(3,6).A|
00002110: 33 3A 41 28 34 2C 35 29 B2 41 33 3A 41 28 35 2C |3:A(4,5).A3:A(5,|
00002120: 34 29 B2 41 33 3A 41 28 36 2C 33 29 B2 41 33 00 |4).A3:A(6,3).A3.|
00002130: 51 29 88 18 41 28 34 2C 36 29 B2 41 32 3A 41 28 |Q)..A(4,6).A2:A(|
00002140: 35 2C 35 29 B2 41 32 3A 41 28 36 2C 34 29 B2 41 |5,5).A2:A(6,4).A|
00002150: 32 00 69 29 92 18 41 28 35 2C 36 29 B2 41 31 3A |2.i)..A(5,6).A1:|
00002160: 41 28 36 2C 35 29 B2 41 31 00 77 29 9C 18 41 28 |A(6,5).A1.w)..A(|
00002170: 36 2C 36 29 B2 41 30 00 AB 29 A6 18 42 28 31 29 |6,6).A0..)..B(1)|
00002180: B2 42 35 3A 42 28 32 29 B2 42 34 3A 42 28 33 29 |.B5:B(2).B4:B(3)|
00002190: B2 42 33 3A 42 28 34 29 B2 42 32 3A 42 28 35 29 |.B3:B(4).B2:B(5)|
000021A0: B2 42 31 3A 42 28 36 29 B2 42 30 00 DF 29 B0 18 |.B1:B(6).B0..)..|
000021B0: 8F 20 44 45 20 43 4F 45 46 46 49 43 49 45 4E 54 |. DE COEFFICIENT|
000021C0: 45 4E 2D 4D 41 54 52 49 58 20 41 20 45 4E 20 56 |EN-MATRIX A EN V|
000021D0: 45 4B 54 4F 52 20 42 20 5A 49 4A 4E 20 4E 55 00 |EKTOR B ZIJN NU.|
000021E0: 07 2A BA 18 8F 20 42 45 52 45 4B 45 4E 44 2E 20 |.*... BEREKEND. |
000021F0: 4C 4F 53 20 4E 55 20 20 57 20 20 4F 50 20 55 49 |LOS NU W OP UI|
00002200: 54 20 20 41 57 3D 42 00 28 2A C4 18 4E B2 36 3A |T AW=B.(*..N.6:|
00002210: 8D 31 30 30 30 30 3A 8F 20 4C 55 2D 44 45 43 4F |.10000:. LU-DECO|
00002220: 4D 50 4F 53 49 54 49 45 00 40 2A CE 18 8B 46 54 |MPOSITIE.@*...FT|
00002230: B2 31 20 A7 8D 32 31 30 30 30 3A 89 36 35 35 30 |.1 ..21000:.6550|
00002240: 00 63 2A D8 18 8D 31 31 30 30 30 3A 8D 31 32 30 |.c*...11000:.120|
00002250: 30 30 3A 8F 20 4F 50 4C 4F 53 53 45 4E 20 56 41 |00:. OPLOSSEN VA|
00002260: 4E 20 57 00 97 2A E2 18 57 35 B2 42 28 31 29 3A |N W..*..W5.B(1):|
00002270: 57 34 B2 42 28 32 29 3A 57 33 B2 42 28 33 29 3A |W4.B(2):W3.B(3):|
00002280: 57 32 B2 42 28 34 29 3A 57 31 B2 42 28 35 29 3A |W2.B(4):W1.B(5):|
00002290: 57 30 B2 42 28 36 29 00 C6 2A EC 18 99 22 C4 45 |W0.B(6)..*...".E|
000022A0: 20 50 41 52 41 4D 45 54 45 52 53 20 57 30 20 54 | PARAMETERS W0 T|
000022B0: 2F 4D 20 57 35 20 5A 49 4A 4E 20 42 45 52 45 4B |/M W5 ZIJN BEREK|
000022C0: 45 4E 44 20 3A 22 00 CC 2A F6 18 99 00 DE 2A 00 |END :"..*.....*.|
000022D0: 19 99 22 20 20 57 30 20 3D 20 22 3B 57 30 00 F0 |.." W0 = ";W0..|
000022E0: 2A 0A 19 99 22 20 20 57 31 20 3D 20 22 3B 57 31 |*..." W1 = ";W1|
000022F0: 00 02 2B 14 19 99 22 20 20 57 32 20 3D 20 22 3B |..+..." W2 = ";|
00002300: 57 32 00 14 2B 1E 19 99 22 20 20 57 33 20 3D 20 |W2..+..." W3 = |
00002310: 22 3B 57 33 00 26 2B 28 19 99 22 20 20 57 34 20 |";W3.&+(.." W4 |
00002320: 3D 20 22 3B 57 34 00 38 2B 32 19 99 22 20 20 57 |= ";W4.8+2.." W|
00002330: 35 20 3D 20 22 3B 57 35 00 3E 2B 3C 19 99 00 50 |5 = ";W5.>+<...P|
00002340: 2B 46 19 99 22 C5 52 20 47 45 4C 44 54 20 3A 22 |+F..".R GELDT :"|
00002350: 00 56 2B 50 19 99 00 84 2B 5A 19 99 22 D6 20 3D |.V+P....+Z..". =|
00002360: 20 49 4E 56 45 52 53 45 20 46 20 28 57 35 2A 47 | INVERSE F (W5*G|
00002370: 28 D5 29 5E 35 20 2B 20 57 34 2A 47 28 D5 29 5E |(.)^5 + W4*G(.)^|
00002380: 34 20 2B 22 00 B2 2B 64 19 99 22 20 20 20 20 20 |4 +"..+d.." |
00002390: 20 20 20 20 20 20 20 20 20 20 57 33 2A 47 28 D5 | W3*G(.|
000023A0: 29 5E 33 20 2B 20 57 32 2A 47 28 D5 29 5E 32 20 |)^3 + W2*G(.)^2 |
000023B0: 2B 22 00 D8 2B 6E 19 99 22 20 20 20 20 20 20 20 |+"..+n.." |
000023C0: 20 20 20 20 20 20 20 20 57 31 2A 47 28 D5 29 20 | W1*G(.) |
000023D0: 20 20 2B 20 57 30 29 22 00 DE 2B 78 19 99 00 02 | + W0)"..+x....|
000023E0: 2C 82 19 99 22 D7 41 41 52 42 49 4A 20 20 49 4E |,...".AARBIJ IN|
000023F0: 56 45 52 53 45 2D 46 28 D9 29 20 3D 20 22 3B 46 |VERSE-F(.) = ";F|
00002400: 31 24 00 25 2C 8C 19 99 22 20 20 20 20 20 20 20 |1$.%,..." |
00002410: 20 20 20 20 20 20 20 20 20 20 47 28 D5 29 20 3D | G(.) =|
00002420: 20 22 3B 47 24 00 30 2C 96 19 8D 32 30 30 30 30 | ";G$.0,...20000|
00002430: 00 36 2C A0 19 8E 00 57 2C 10 27 8F 20 53 55 42 |.6,....W,.'. SUB|
00002440: 52 4F 55 54 49 4E 45 20 4C 55 2D 44 45 43 4F 4D |ROUTINE LU-DECOM|
00002450: 50 4F 53 49 54 49 45 00 64 2C 1A 27 4B B2 31 3A |POSITIE.d,.'K.1:|
00002460: 46 54 B2 30 00 93 2C 24 27 8B 4B B1 4E 20 B0 46 |FT.0..,$'.K.N .F|
00002470: 54 B2 31 20 A7 31 30 32 34 30 3A 8F 20 57 48 49 |T.1 .10240:. WHI|
00002480: 4C 45 20 4C 4F 4F 50 20 31 30 30 32 30 2D 31 30 |LE LOOP 10020-10|
00002490: 32 33 30 00 9C 2C 2E 27 4D 58 B2 30 00 B7 2C 38 |230..,.'MX.0..,8|
000024A0: 27 81 49 B2 4B 20 A4 4E 20 A9 31 3A 8B 4B B2 31 |'.I.K .N .1:.K.1|
000024B0: 20 A7 31 30 30 38 30 00 C4 2C 42 27 48 B2 41 28 | .10080..,B'H.A(|
000024C0: 49 2C 4B 29 00 EA 2C 4C 27 81 4C B2 31 20 A4 4B |I,K)..,L'.L.1 .K|
000024D0: AB 31 20 A9 31 3A 48 B2 48 AB 41 28 49 2C 4C 29 |.1 .1:H.H.A(I,L)|
000024E0: AC 41 28 4C 2C 4B 29 3A 82 4C 00 F7 2C 56 27 41 |.A(L,K):.L..,V'A|
000024F0: 28 49 2C 4B 29 B2 48 00 1E 2D 60 27 8B B6 28 41 |(I,K).H..-`'..(A|
00002500: 28 49 2C 4B 29 29 B1 4D 58 20 A7 50 28 4B 29 B2 |(I,K)).MX .P(K).|
00002510: 49 3A 4D 58 B2 B6 28 41 28 49 2C 4B 29 29 00 25 |I:MX..(A(I,K)).%|
00002520: 2D 6A 27 82 49 00 3C 2D 74 27 8B 4D 58 B2 30 20 |-j'.I.<-t'.MX.0 |
00002530: A7 46 54 B2 31 3A 89 31 30 32 33 30 00 4F 2D 7E |.FT.1:.10230.O-~|
00002540: 27 8B 50 28 4B 29 B2 4B 20 A7 31 30 31 35 30 00 |'.P(K).K .10150.|
00002550: 5E 2D 88 27 81 4A B2 31 20 A4 4E 20 A9 31 00 88 |^-.'.J.1 .N .1..|
00002560: 2D 92 27 48 B2 41 28 4B 2C 4A 29 3A 41 28 4B 2C |-.'H.A(K,J):A(K,|
00002570: 4A 29 B2 41 28 50 28 4B 29 2C 4A 29 3A 41 28 50 |J).A(P(K),J):A(P|
00002580: 28 4B 29 2C 4A 29 B2 48 00 8F 2D 9C 27 82 4A 00 |(K),J).H..-.'.J.|
00002590: A4 2D A6 27 8B 4B B2 4E 20 B0 4B B2 31 20 A7 31 |.-.'.K.N .K.1 .1|
000025A0: 30 32 31 30 00 B5 2D B0 27 81 4A B2 4B AA 31 20 |0210..-.'.J.K.1 |
000025B0: A4 4E 20 A9 31 00 C2 2D BA 27 48 B2 41 28 4B 2C |.N .1..-.'H.A(K,|
000025C0: 4A 29 00 E8 2D C4 27 81 4C B2 31 20 A4 4B AB 31 |J)..-.'.L.1 .K.1|
000025D0: 20 A9 31 3A 48 B2 48 AB 41 28 4B 2C 4C 29 AC 41 | .1:H.H.A(K,L).A|
000025E0: 28 4C 2C 4A 29 3A 82 4C 00 F5 2D CE 27 41 28 4B |(L,J):.L..-.'A(K|
000025F0: 2C 4A 29 B2 48 00 FC 2D D8 27 82 4A 00 0C 2E E2 |,J).H..-.'.J....|
00002600: 27 8B 4B B2 4E 20 A7 31 30 32 33 30 00 35 2E EC |'.K.N .10230.5..|
00002610: 27 81 49 B2 4B AA 31 20 A4 4E 20 A9 31 3A 41 28 |'.I.K.1 .N .1:A(|
00002620: 49 2C 4B 29 B2 41 28 49 2C 4B 29 AD 41 28 4B 2C |I,K).A(I,K).A(K,|
00002630: 4B 29 3A 82 49 00 46 2E F6 27 4B B2 4B AA 31 3A |K):.I.F..'K.K.1:|
00002640: 89 31 30 30 32 30 00 4C 2E 00 28 8E 00 6B 2E F8 |.10020.L..(..k..|
00002650: 2A 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 42 3D |*. SUBROUTINE B=|
00002660: 42 27 20 45 4E 20 4C 43 3D 42 27 00 89 2E 02 2B |B' EN LC=B'....+|
00002670: 81 4B B2 31 20 A4 4E 20 A9 31 3A 8B 50 28 4B 29 |.K.1 .N .1:.P(K)|
00002680: B2 4B 20 A7 31 31 30 33 30 00 AB 2E 0C 2B 48 B2 |.K .11030....+H.|
00002690: 42 28 4B 29 3A 42 28 4B 29 B2 42 28 50 28 4B 29 |B(K):B(K).B(P(K)|
000026A0: 29 3A 42 28 50 28 4B 29 29 B2 48 00 BB 2E 16 2B |):B(P(K)).H....+|
000026B0: 8B 4B B2 31 20 A7 31 31 30 37 30 00 C6 2E 20 2B |.K.1 .11070... +|
000026C0: 48 B2 42 28 4B 29 00 EA 2E 2A 2B 81 4A B2 31 20 |H.B(K)...*+.J.1 |
000026D0: A4 4B AB 31 20 A9 31 3A 48 B2 48 AB 41 28 4B 2C |.K.1 .1:H.H.A(K,|
000026E0: 4A 29 AC 42 28 4A 29 3A 82 4A 00 F5 2E 34 2B 42 |J).B(J):.J...4+B|
000026F0: 28 4B 29 B2 48 00 FC 2E 3E 2B 82 4B 00 02 2F 48 |(K).H...>+.K../H|
00002700: 2B 8E 00 18 2F E0 2E 8F 20 53 55 42 52 4F 55 54 |+.../... SUBROUT|
00002710: 49 4E 45 20 55 57 3D 43 00 28 2F EA 2E 81 4B B2 |INE UW=C.(/...K.|
00002720: 4E 20 A4 31 20 A9 AB 31 00 3F 2F F4 2E 48 B2 42 |N .1 ..1.?/..H.B|
00002730: 28 4B 29 3A 8B 4B B2 4E 20 A7 31 32 30 34 30 00 |(K):.K.N .12040.|
00002740: 63 2F FE 2E 81 4A B2 4B AA 31 20 A4 4E 20 A9 31 |c/...J.K.1 .N .1|
00002750: 3A 48 B2 48 AB 41 28 4B 2C 4A 29 AC 42 28 4A 29 |:H.H.A(K,J).B(J)|
00002760: 3A 82 4A 00 75 2F 08 2F 42 28 4B 29 B2 48 AD 41 |:.J.u/./B(K).H.A|
00002770: 28 4B 2C 4B 29 00 7C 2F 12 2F 82 4B 00 82 2F 1C |(K,K).|/./.K../.|
00002780: 2F 8E 00 AD 2F 98 3A 8F 20 53 55 42 52 4F 55 54 |/.../.:. SUBROUT|
00002790: 49 4E 45 20 49 4E 56 4F 45 52 20 56 41 4E 20 20 |INE INVOER VAN |
000027A0: 4E 20 20 4D 45 45 54 50 55 4E 54 45 4E 00 D8 2F |N MEETPUNTEN../|
000027B0: A2 3A 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 |.:. |
000027C0: 20 20 28 55 31 2C 56 31 29 20 2C 2E 2E 2E 2E 2E | (U1,V1) ,.....|
000027D0: 2C 28 55 4E 2C 56 4E 29 00 FD 2F AC 3A 4E B2 31 |,(UN,VN)../.:N.1|
000027E0: 3A 8F 20 50 4F 4C 59 4E 4F 4F 4D 20 4E 4F 47 20 |:. POLYNOOM NOG |
000027F0: 4E 49 45 54 20 42 45 52 45 4B 45 4E 44 00 06 30 |NIET BEREKEND..0|
00002800: B6 3A 8D 31 30 30 00 21 30 C0 3A 99 22 C9 4E 56 |.:.100.!0.:.".NV|
00002810: 4F 45 52 45 4E 20 4D 45 45 54 50 55 4E 54 45 4E |OEREN MEETPUNTEN|
00002820: 22 00 27 30 CA 3A 99 00 51 30 D4 3A 99 22 C4 45 |".'0.:..Q0.:.".E|
00002830: 20 4D 45 45 54 50 55 4E 54 45 4E 20 57 4F 52 44 | MEETPUNTEN WORD|
00002840: 45 4E 20 4F 50 47 45 53 4C 41 47 45 4E 20 49 4E |EN OPGESLAGEN IN|
00002850: 22 00 74 30 DE 3A 99 22 44 45 20 31 2D 44 49 4D |".t0.:."DE 1-DIM|
00002860: 20 41 52 52 41 59 53 20 20 D5 20 20 45 4E 20 20 | ARRAYS . EN |
00002870: D6 20 2E 22 00 9E 30 E8 3A 99 22 C4 45 20 4C 45 |. ."..0.:.".E LE|
00002880: 4E 47 54 45 20 56 41 4E 20 44 45 5A 45 20 41 52 |NGTE VAN DEZE AR|
00002890: 52 41 59 53 20 49 53 20 56 41 53 54 2E 22 00 CD |RAYS IS VAST."..|
000028A0: 30 F2 3A 99 22 C9 4E 44 49 45 4E 20 45 45 4E 20 |0.:.".NDIEN EEN |
000028B0: 41 4E 44 45 52 45 20 4C 45 4E 47 54 45 20 47 45 |ANDERE LENGTE GE|
000028C0: 57 45 4E 53 54 20 49 53 20 44 41 4E 22 00 FC 30 |WENST IS DAN"..0|
000028D0: FC 3A 99 22 4B 41 4E 20 44 49 54 20 44 4F 4F 52 |.:."KAN DIT DOOR|
000028E0: 20 44 45 20 56 41 52 49 41 42 45 4C 45 20 20 CD | DE VARIABELE .|
000028F0: D0 2C 20 49 4E 20 52 45 47 45 4C 22 00 18 31 06 |., IN REGEL"..1.|
00002900: 3B 99 22 31 30 32 30 2C 20 41 41 4E 20 54 45 20 |;."1020, AAN TE |
00002910: 50 41 53 53 45 4E 2E 22 00 38 31 10 3B 99 22 28 |PASSEN.".81.;."(|
00002920: 44 45 46 41 55 4C 54 20 3A 20 20 CD D0 20 3D 22 |DEFAULT : .. ="|
00002930: 3B 4D 50 3B 22 20 29 22 00 3E 31 1A 3B 99 00 6D |;MP;" )".>1.;..m|
00002940: 31 24 3B 99 22 C7 45 45 46 20 48 45 54 20 41 41 |1$;.".EEF HET AA|
00002950: 4E 54 41 4C 20 4D 45 45 54 50 55 4E 54 45 4E 20 |NTAL MEETPUNTEN |
00002960: 20 28 D5 49 2C D6 49 29 20 4F 50 2E 22 00 96 31 | (.I,.I) OP."..1|
00002970: 2E 3B 99 22 28 20 30 20 3C 3D 20 41 41 4E 54 41 |.;."( 0 <= AANTA|
00002980: 4C 20 3C 3D 22 3B 4D 50 3B 22 20 29 20 20 20 22 |L <=";MP;" ) "|
00002990: 3B 3A 85 49 4E 24 00 B2 31 38 3B 8B 49 4E 24 B2 |;:.IN$..18;.IN$.|
000029A0: 22 30 22 20 A7 8D 32 33 30 30 30 3A 89 31 35 32 |"0" ..23000:.152|
000029B0: 39 30 00 D8 31 42 3B 48 B2 C5 28 49 4E 24 29 3A |90..1B;H..(IN$):|
000029C0: 8B 28 48 B3 31 29 20 B0 28 B5 28 48 29 B3 B1 48 |.(H.1) .(.(H)..H|
000029D0: 29 20 A7 31 35 31 34 30 00 E1 31 4C 3B 4E 50 B2 |) .15140..1L;NP.|
000029E0: 48 00 FB 31 56 3B 8B 4E 50 B1 4D 50 20 A7 8D 32 |H..1V;.NP.MP ..2|
000029F0: 32 30 30 30 3A 89 31 35 32 39 30 00 03 32 60 3B |2000:.15290..2`;|
00002A00: 99 3A 99 00 10 32 6A 3B 81 49 B2 31 20 A4 4E 50 |.:...2j;.I.1 .NP|
00002A10: 00 1E 32 74 3B 53 52 B2 49 3A 8D 33 30 30 00 4D |..2t;SR.I:.300.M|
00002A20: 32 7E 3B 99 22 D6 4F 45 52 20 49 4E 20 20 20 D5 |2~;.".OER IN .|
00002A30: 22 3B 53 52 24 3B 22 20 20 20 22 3B 3A 85 49 4E |";SR$;" ";:.IN|
00002A40: 24 3A 55 28 49 29 B2 C5 28 49 4E 24 29 00 7C 32 |$:U(I)..(IN$).|2|
00002A50: 88 3B 99 22 D6 4F 45 52 20 49 4E 20 20 20 D6 22 |.;.".OER IN ."|
00002A60: 3B 53 52 24 3B 22 20 20 20 22 3B 3A 85 49 4E 24 |;SR$;" ";:.IN$|
00002A70: 3A 56 28 49 29 B2 C5 28 49 4E 24 29 00 A6 32 92 |:V(I)..(IN$)..2.|
00002A80: 3B 99 22 C3 4F 52 52 45 43 54 20 49 4E 47 45 56 |;.".ORRECT INGEV|
00002A90: 4F 45 52 44 20 3F 20 20 28 CA 2F CE 29 20 20 22 |OERD ? (./.) "|
00002AA0: 3B 3A 8D 32 31 30 00 CE 32 9C 3B 99 49 4E 24 3A |;:.210..2.;.IN$:|
00002AB0: 8B 28 49 4E 24 B3 B1 22 CA 22 29 20 AF 28 49 4E |.(IN$..".") .(IN|
00002AC0: 24 B3 B1 22 4A 22 29 20 A7 31 35 32 33 30 00 D4 |$.."J") .15230..|
00002AD0: 32 A6 3B 99 00 DB 32 B0 3B 82 49 00 E6 32 BA 3B |2.;...2.;.I..2.;|
00002AE0: 8D 32 30 30 30 30 00 EC 32 C4 3B 8E 00 1E 33 80 |.20000..2.;...3.|
00002AF0: 3E 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 20 27 |>. SUBROUTINE '|
00002B00: 49 4E 56 4F 45 52 27 20 56 41 4E 20 44 45 20 46 |INVOER' VAN DE F|
00002B10: 55 4E 4B 54 49 45 53 20 47 20 45 4E 20 46 00 43 |UNKTIES G EN F.C|
00002B20: 33 8A 3E 4E B2 31 3A 8F 20 50 4F 4C 59 4E 4F 4F |3.>N.1:. POLYNOO|
00002B30: 4D 20 4E 4F 47 20 4E 49 45 54 20 42 45 52 45 4B |M NOG NIET BEREK|
00002B40: 45 4E 44 00 4C 33 94 3E 8D 31 30 30 00 7B 33 9E |END.L3.>.100.{3.|
00002B50: 3E 99 22 C4 45 20 56 4F 4C 47 45 4E 44 45 20 46 |>.".E VOLGENDE F|
00002B60: 55 4E 4B 54 49 45 53 20 5A 49 4A 4E 20 42 45 53 |UNKTIES ZIJN BES|
00002B70: 43 48 49 4B 42 41 41 52 20 3A 22 00 81 33 A8 3E |CHIKBAAR :"..3.>|
00002B80: 99 00 A4 33 B2 3E 99 22 20 20 31 2E 20 47 28 D5 |...3.>." 1. G(.|
00002B90: 29 3D D5 20 20 20 20 20 20 20 20 2C 20 46 28 D6 |)=. , F(.|
00002BA0: 29 3D D6 22 00 C9 33 BC 3E 99 22 20 20 32 2E 20 |)=."..3.>." 2. |
00002BB0: 47 28 D5 29 3D D5 5E 32 20 20 20 20 20 20 2C 20 |G(.)=.^2 , |
00002BC0: 46 28 D6 29 3D D6 5E 32 22 00 EE 33 C6 3E 99 22 |F(.)=.^2"..3.>."|
00002BD0: 20 20 33 2E 20 47 28 D5 29 3D 31 2F D5 20 20 20 | 3. G(.)=1/. |
00002BE0: 20 20 20 2C 20 46 28 D6 29 3D 31 2F D6 22 00 15 | , F(.)=1/."..|
00002BF0: 34 D0 3E 99 22 20 20 34 2E 20 47 28 D5 29 3D 31 |4.>." 4. G(.)=1|
00002C00: 2F D5 5E 32 20 20 20 20 2C 20 46 28 D6 29 3D 31 |/.^2 , F(.)=1|
00002C10: 2F D6 5E 32 22 00 3C 34 DA 3E 99 22 20 20 35 2E |/.^2".<4.>." 5.|
00002C20: 20 47 28 D5 29 3D 4C 4E 28 D5 29 20 20 20 20 2C | G(.)=LN(.) ,|
00002C30: 20 46 28 D6 29 3D 4C 4E 28 D6 29 22 00 60 34 E4 | F(.)=LN(.)".`4.|
00002C40: 3E 99 22 20 20 36 2E 20 47 28 D5 29 3D 20 3F 20 |>." 6. G(.)= ? |
00002C50: 20 20 20 20 20 20 2C 20 46 28 D6 29 3D 20 3F 22 | , F(.)= ?"|
00002C60: 00 7D 34 EE 3E 99 22 20 20 20 20 20 45 49 47 45 |.}4.>." EIGE|
00002C70: 4E 20 44 45 46 49 4E 49 54 49 45 53 22 00 9B 34 |N DEFINITIES"..4|
00002C80: F8 3E 99 22 20 20 37 2E 20 D5 49 54 4C 45 47 20 |.>." 7. .ITLEG |
00002C90: 42 49 4A 20 50 55 4E 54 20 36 22 00 A3 34 02 3F |BIJ PUNT 6"..4.?|
00002CA0: 99 3A 99 00 D3 34 0C 3F 99 22 D5 57 20 4B 45 55 |.:...4.?.".W KEU|
00002CB0: 5A 45 20 56 4F 4F 52 20 20 D8 3D 47 28 D5 29 20 |ZE VOOR .=G(.) |
00002CC0: 20 20 28 31 2C 32 2C 2E 2E 2E 2E 2C 37 29 20 20 | (1,2,....,7) |
00002CD0: 20 22 3B 00 E1 34 16 3F 8D 32 31 30 3A 99 49 4E | ";..4.?.210:.IN|
00002CE0: 24 00 0E 35 20 3F 48 B2 C5 28 49 4E 24 29 3A 8B |$..5 ?H..(IN$):.|
00002CF0: 28 48 B3 31 29 20 B0 28 48 B1 37 29 20 B0 28 B5 |(H.1) .(H.7) .(.|
00002D00: 28 48 29 B3 B1 48 29 20 A7 31 36 31 34 30 00 26 |(H)..H) .16140.&|
00002D10: 35 2A 3F 8B 48 B2 37 20 A7 8D 31 36 33 30 30 3A |5*?.H.7 ..16300:|
00002D20: 89 31 36 32 35 30 00 56 35 34 3F 47 B2 48 3A 91 |.16250.V54?G.H:.|
00002D30: 47 20 8D 31 37 30 30 30 2C 31 37 30 35 30 2C 31 |G .17000,17050,1|
00002D40: 37 31 30 30 2C 31 37 31 35 30 2C 31 37 32 30 30 |7100,17150,17200|
00002D50: 2C 31 37 32 35 30 00 5C 35 3E 3F 99 00 8C 35 48 |,17250.\5>?...5H|
00002D60: 3F 99 22 D5 57 20 4B 45 55 5A 45 20 56 4F 4F 52 |?.".W KEUZE VOOR|
00002D70: 20 20 D9 3D 46 28 D6 29 20 20 20 28 31 2C 32 2C | .=F(.) (1,2,|
00002D80: 2E 2E 2E 2E 2C 37 29 20 20 20 22 3B 00 9A 35 52 |....,7) ";..5R|
00002D90: 3F 8D 32 31 30 3A 99 49 4E 24 00 C7 35 5C 3F 48 |?.210:.IN$..5\?H|
00002DA0: B2 C5 28 49 4E 24 29 3A 8B 28 48 B3 31 29 20 B0 |..(IN$):.(H.1) .|
00002DB0: 28 48 B1 37 29 20 B0 28 B5 28 48 29 B3 B1 48 29 |(H.7) .(.(H)..H)|
00002DC0: 20 A7 31 36 32 30 30 00 DF 35 66 3F 8B 48 B2 37 | .16200..5f?.H.7|
00002DD0: 20 A7 8D 31 36 34 30 30 3A 89 31 36 32 35 30 00 | ..16400:.16250.|
00002DE0: 0F 36 70 3F 46 B2 48 3A 91 46 20 8D 31 37 35 30 |.6p?F.H:.F .1750|
00002DF0: 30 2C 31 37 35 35 30 2C 31 37 36 30 30 2C 31 37 |0,17550,17600,17|
00002E00: 36 35 30 2C 31 37 37 30 30 2C 31 37 37 35 30 00 |650,17700,17750.|
00002E10: 1A 36 7A 3F 8D 32 30 30 30 30 00 20 36 84 3F 8E |.6z?.20000. 6.?.|
00002E20: 00 50 36 AC 3F 8F 20 53 55 42 52 4F 55 54 49 4E |.P6.?. SUBROUTIN|
00002E30: 45 20 20 55 49 54 4C 45 47 20 44 45 46 49 4E 49 |E UITLEG DEFINI|
00002E40: 45 52 45 4E 20 45 49 47 45 4E 20 20 47 28 55 29 |EREN EIGEN G(U)|
00002E50: 00 59 36 B6 3F 8D 31 30 30 00 77 36 C0 3F 99 22 |.Y6.?.100.w6.?."|
00002E60: C4 45 46 49 4E 49 45 52 45 4E 20 45 49 47 45 4E |.EFINIEREN EIGEN|
00002E70: 20 20 47 28 D5 29 22 00 7D 36 CA 3F 99 00 AC 36 | G(.)".}6.?...6|
00002E80: D4 3F 99 22 D6 45 52 56 41 4E 47 20 20 D5 20 20 |.?.".ERVANG . |
00002E90: 49 4E 20 52 45 47 45 4C 20 31 37 32 36 30 20 44 |IN REGEL 17260 D|
00002EA0: 4F 4F 52 20 48 45 54 20 47 45 2D 22 00 D9 36 DE |OOR HET GE-"..6.|
00002EB0: 3F 99 22 57 45 4E 53 54 45 20 46 55 4E 4B 54 49 |?."WENSTE FUNKTI|
00002EC0: 45 56 4F 4F 52 53 43 48 52 49 46 54 2C 20 C5 CE |EVOORSCHRIFT, ..|
00002ED0: 20 4B 45 4E 20 41 41 4E 22 00 03 37 E8 3F 99 22 | KEN AAN"..7.?."|
00002EE0: C7 24 20 20 49 4E 20 52 45 47 45 4C 20 31 37 32 |.$ IN REGEL 172|
00002EF0: 35 30 20 44 45 20 42 49 4A 42 45 48 4F 52 45 4E |50 DE BIJBEHOREN|
00002F00: 44 45 22 00 16 37 F2 3F 99 22 53 54 52 49 4E 47 |DE"..7.?."STRING|
00002F10: 20 54 4F 45 2E 22 00 1C 37 FC 3F 99 00 22 37 06 | TOE."..7.?.."7.|
00002F20: 40 8E 00 52 37 10 40 8F 20 53 55 42 52 4F 55 54 |@..R7.@. SUBROUT|
00002F30: 49 4E 45 20 20 55 49 54 4C 45 47 20 44 45 46 49 |INE UITLEG DEFI|
00002F40: 4E 49 45 52 45 4E 20 45 49 47 45 4E 20 20 46 28 |NIEREN EIGEN F(|
00002F50: 56 29 00 5B 37 1A 40 8D 31 30 30 00 79 37 24 40 |V).[7.@.100.y7$@|
00002F60: 99 22 C4 45 46 49 4E 49 45 52 45 4E 20 45 49 47 |.".EFINIEREN EIG|
00002F70: 45 4E 20 20 46 28 D6 29 22 00 7F 37 2E 40 99 00 |EN F(.)"..7.@..|
00002F80: AE 37 38 40 99 22 D6 45 52 56 41 4E 47 20 20 D6 |.78@.".ERVANG .|
00002F90: 20 20 49 4E 20 52 45 47 45 4C 20 31 37 37 36 30 | IN REGEL 17760|
00002FA0: 20 44 4F 4F 52 20 48 45 54 20 47 45 2D 22 00 DB | DOOR HET GE-"..|
00002FB0: 37 42 40 99 22 57 45 4E 53 54 45 20 46 55 4E 4B |7B@."WENSTE FUNK|
00002FC0: 54 49 45 56 4F 4F 52 53 43 48 52 49 46 54 2C 20 |TIEVOORSCHRIFT, |
00002FD0: 56 45 52 56 41 4E 47 20 20 D9 22 00 0A 38 4C 40 |VERVANG ."..8L@|
00002FE0: 99 22 49 4E 20 52 45 47 45 4C 20 31 37 37 38 30 |."IN REGEL 17780|
00002FF0: 20 44 4F 4F 52 20 48 45 54 20 49 4E 56 45 52 53 | DOOR HET INVERS|
00003000: 45 2D 46 55 4E 4B 54 49 45 22 00 39 38 56 40 99 |E-FUNKTIE".98V@.|
00003010: 22 56 4F 4F 52 53 43 48 52 49 46 54 2C 20 C5 CE |"VOORSCHRIFT, ..|
00003020: 20 4B 45 4E 20 41 41 4E 20 20 C6 24 20 20 52 45 | KEN AAN .$ RE|
00003030: 53 50 2E 20 20 C6 31 24 22 00 67 38 60 40 99 22 |SP. .1$".g8`@."|
00003040: 49 4E 20 52 45 47 45 4C 20 31 37 37 35 30 20 44 |IN REGEL 17750 D|
00003050: 45 20 42 49 4A 42 45 48 4F 52 45 4E 44 45 20 53 |E BIJBEHORENDE S|
00003060: 54 52 49 4E 47 53 22 00 73 38 6A 40 99 22 54 4F |TRINGS".s8j@."TO|
00003070: 45 2E 22 00 79 38 74 40 99 00 7F 38 7E 40 8E 00 |E.".y8t@...8~@..|
00003080: 8C 38 68 42 47 24 B2 22 D5 22 3A 8E 00 94 38 72 |.8hBG$.".":...8r|
00003090: 42 58 B2 55 00 9A 38 7C 42 8E 00 A9 38 9A 42 47 |BX.U..8|B...8.BG|
000030A0: 24 B2 22 D5 5E 32 22 3A 8E 00 B3 38 A4 42 58 B2 |$.".^2":...8.BX.|
000030B0: 55 AE 32 00 B9 38 AE 42 8E 00 C8 38 CC 42 47 24 |U.2..8.B...8.BG$|
000030C0: B2 22 31 2F D5 22 3A 8E 00 D2 38 D6 42 58 B2 31 |."1/.":...8.BX.1|
000030D0: AD 55 00 D8 38 E0 42 8E 00 E9 38 FE 42 47 24 B2 |.U..8.B...8.BG$.|
000030E0: 22 31 2F D5 5E 32 22 3A 8E 00 F5 38 08 43 58 B2 |"1/.^2":...8.CX.|
000030F0: 31 AD 55 AE 32 00 FB 38 12 43 8E 00 0C 39 30 43 |1.U.2..8.C...90C|
00003100: 47 24 B2 22 4C 4E 28 D5 29 22 3A 8E 00 17 39 3A |G$."LN(.)":...9:|
00003110: 43 58 B2 BC 28 55 29 00 1D 39 44 43 8E 00 2A 39 |CX..(U)..9DC..*9|
00003120: 62 43 47 24 B2 22 D5 22 3A 8E 00 32 39 6C 43 58 |bCG$.".":..29lCX|
00003130: B2 55 00 38 39 76 43 8E 00 4D 39 5C 44 46 24 B2 |.U.89vC..M9\DF$.|
00003140: 22 D6 22 3A 46 31 24 B2 22 D9 22 3A 8E 00 55 39 |".":F1$.".":..U9|
00003150: 66 44 59 B2 56 00 5B 39 70 44 8E 00 63 39 7A 44 |fDY.V.[9pD..c9zD|
00003160: 56 B2 59 00 69 39 84 44 8E 00 86 39 8E 44 46 24 |V.Y.i9.D...9.DF$|
00003170: B2 22 D6 5E 32 22 3A 46 31 24 B2 22 53 51 52 54 |.".^2":F1$."SQRT|
00003180: 28 D9 29 22 3A 8E 00 90 39 98 44 59 B2 56 AE 32 |(.)":...9.DY.V.2|
00003190: 00 96 39 A2 44 8E 00 A1 39 AC 44 56 B2 BA 28 59 |..9.D...9.DV..(Y|
000031A0: 29 00 A7 39 B6 44 8E 00 C0 39 C0 44 46 24 B2 22 |)..9.D...9.DF$."|
000031B0: 31 2F D6 22 3A 46 31 24 B2 22 31 2F D9 22 3A 8E |1/.":F1$."1/.":.|
000031C0: 00 CA 39 CA 44 59 B2 31 AD 56 00 D0 39 D4 44 8E |..9.DY.1.V..9.D.|
000031D0: 00 DA 39 DE 44 56 B2 31 AD 59 00 E0 39 E8 44 8E |..9.DV.1.Y..9.D.|
000031E0: 00 01 3A F2 44 46 24 B2 22 31 2F D6 5E 32 22 3A |..:.DF$."1/.^2":|
000031F0: 46 31 24 B2 22 31 2F 53 51 52 54 28 D9 29 22 3A |F1$."1/SQRT(.)":|
00003200: 8E 00 0D 3A FC 44 59 B2 31 AD 56 AE 32 00 13 3A |...:.DY.1.V.2..:|
00003210: 06 45 8E 00 20 3A 10 45 56 B2 31 AD BA 28 59 29 |.E.. :.EV.1..(Y)|
00003220: 00 26 3A 1A 45 8E 00 44 3A 24 45 46 24 B2 22 4C |.&:.E..D:$EF$."L|
00003230: 4E 28 D6 29 22 3A 46 31 24 B2 22 45 58 50 28 D9 |N(.)":F1$."EXP(.|
00003240: 29 22 3A 8E 00 4F 3A 2E 45 59 B2 BC 28 56 29 00 |)":..O:.EY..(V).|
00003250: 55 3A 38 45 8E 00 60 3A 42 45 56 B2 BD 28 59 29 |U:8E..`:BEV..(Y)|
00003260: 00 66 3A 4C 45 8E 00 7B 3A 56 45 46 24 B2 22 D6 |.f:LE..{:VEF$.".|
00003270: 22 3A 46 31 24 B2 22 D9 22 3A 8E 00 83 3A 60 45 |":F1$.".":...:`E|
00003280: 59 B2 56 00 89 3A 6A 45 8E 00 91 3A 74 45 56 B2 |Y.V..:jE...:tEV.|
00003290: 59 00 97 3A 7E 45 8E 00 CD 3A 50 46 8F 20 53 55 |Y..:~E...:PF. SU|
000032A0: 42 52 4F 55 54 49 4E 45 20 20 50 52 49 4E 54 20 |BROUTINE PRINT |
000032B0: 52 45 53 55 4C 54 41 54 45 4E 20 2B 20 54 41 42 |RESULTATEN + TAB|
000032C0: 45 4C 20 4D 45 45 54 50 55 4E 54 45 4E 00 D6 3A |EL MEETPUNTEN..:|
000032D0: 5A 46 8D 31 30 30 00 FF 3A 64 46 99 22 CF 55 54 |ZF.100..:dF.".UT|
000032E0: 50 55 54 20 4E 41 41 52 20 50 52 49 4E 54 45 52 |PUT NAAR PRINTER|
000032F0: 20 20 28 CA 2F CE 29 20 3F 22 3A 8D 32 31 30 00 | (./.) ?":.210.|
00003300: 22 3B 6E 46 50 B2 30 3A 8B 28 49 4E 24 B2 22 CA |";nFP.0:.(IN$.".|
00003310: 22 29 20 B0 28 49 4E 24 B2 22 4A 22 29 20 A7 50 |") .(IN$."J") .P|
00003320: B2 31 00 2B 3B 78 46 8D 31 30 30 00 5E 3B 82 46 |.1.+;xF.100.^;.F|
00003330: 53 52 24 B2 22 D2 45 53 55 4C 54 41 54 45 4E 20 |SR$.".ESULTATEN |
00003340: 4B 4C 45 49 4E 53 54 45 20 4B 57 41 44 52 41 54 |KLEINSTE KWADRAT|
00003350: 45 4E 20 42 45 4E 41 44 45 52 49 4E 47 22 00 69 |EN BENADERING".i|
00003360: 3B 87 46 8D 32 35 30 30 30 00 9C 3B 8C 46 53 52 |;.F.25000..;.FSR|
00003370: 24 B2 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |$."=============|
00003380: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00003390: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 A7 3B 91 |==========="..;.|
000033A0: 46 8D 32 35 30 30 30 00 B9 3B 96 46 53 52 24 B2 |F.25000..;.FSR$.|
000033B0: 22 22 3A 8D 32 35 30 30 30 00 E5 3B A0 46 91 4E |"":.25000..;.F.N|
000033C0: 20 8D 31 39 38 30 30 2C 31 38 32 30 30 2C 31 38 | .19800,18200,18|
000033D0: 35 30 30 2C 31 38 38 30 30 2C 31 39 31 30 30 2C |500,18800,19100,|
000033E0: 31 39 34 30 30 00 F0 3B AA 46 8D 32 30 30 30 30 |19400..;.F.20000|
000033F0: 00 F6 3B B4 46 8E 00 28 3C 18 47 8F 20 53 55 42 |..;.F..(<.G. SUB|
00003400: 52 4F 55 54 49 4E 45 20 20 4F 55 54 50 55 54 20 |ROUTINE OUTPUT |
00003410: 20 56 4F 4F 52 20 31 45 2D 47 52 41 41 44 53 20 | VOOR 1E-GRAADS |
00003420: 50 4F 4C 59 4E 4F 4F 4D 00 52 3C 22 47 53 52 24 |POLYNOOM.R<"GSR$|
00003430: B2 22 C4 45 20 52 45 47 52 45 53 53 49 45 2D 52 |.".E REGRESSIE-R|
00003440: 45 43 48 54 45 20 49 53 20 3A 22 3A 8D 32 35 30 |ECHTE IS :":.250|
00003450: 30 30 00 64 3C 2C 47 53 52 24 B2 22 22 3A 8D 32 |00.d<,GSR$."":.2|
00003460: 35 30 30 30 00 8A 3C 36 47 53 52 24 B2 22 20 20 |5000..<6GSR$." |
00003470: 20 20 20 20 20 D9 20 3D 20 57 31 2A D8 20 2B 20 | . = W1*. + |
00003480: 57 30 22 3A 8D 32 35 30 30 30 00 9C 3C 40 47 53 |W0":.25000..<@GS|
00003490: 52 24 B2 22 22 3A 8D 32 35 30 30 30 00 D1 3C 4A |R$."":.25000..<J|
000034A0: 47 53 52 24 B2 22 4F 46 57 45 4C 20 20 D6 20 3D |GSR$."OFWEL . =|
000034B0: 20 49 4E 56 45 52 53 45 2D 46 20 28 57 31 2A 47 | INVERSE-F (W1*G|
000034C0: 28 D5 29 20 2B 20 57 30 29 22 3A 8D 32 35 30 30 |(.) + W0)":.2500|
000034D0: 30 00 E3 3C 54 47 53 52 24 B2 22 22 3A 8D 32 35 |0..<TGSR$."":.25|
000034E0: 30 30 30 00 0A 3D 5E 47 53 52 24 B2 22 4D 45 54 |000..=^GSR$."MET|
000034F0: 20 20 20 20 D8 20 3D 20 47 28 D5 29 20 3D 20 22 | . = G(.) = "|
00003500: AA 47 24 3A 8D 32 35 30 30 30 00 31 3D 68 47 53 |.G$:.25000.1=hGS|
00003510: 52 24 B2 22 20 20 20 20 20 20 20 D9 20 3D 20 46 |R$." . = F|
00003520: 28 D6 29 20 3D 20 22 AA 46 24 3A 8D 32 35 30 30 |(.) = ".F$:.2500|
00003530: 30 00 59 3D 72 47 53 52 24 B2 22 20 20 20 49 4E |0.Y=rGSR$." IN|
00003540: 56 45 52 53 45 2D 46 28 D9 29 20 3D 20 22 AA 46 |VERSE-F(.) = ".F|
00003550: 31 24 3A 8D 32 35 30 30 30 00 6B 3D 7C 47 53 52 |1$:.25000.k=|GSR|
00003560: 24 B2 22 22 3A 8D 32 35 30 30 30 00 99 3D 86 47 |$."":.25000..=.G|
00003570: 53 52 B2 57 30 3A 8D 32 36 30 30 30 3A 53 52 24 |SR.W0:.26000:SR$|
00003580: B2 22 45 4E 20 20 20 20 57 30 20 3D 20 22 AA 53 |."EN W0 = ".S|
00003590: 52 24 3A 8D 32 35 30 30 30 00 C7 3D 90 47 53 52 |R$:.25000..=.GSR|
000035A0: B2 57 31 3A 8D 32 36 30 30 30 3A 53 52 24 B2 22 |.W1:.26000:SR$."|
000035B0: 20 20 20 20 20 20 57 31 20 3D 20 22 AA 53 52 24 | W1 = ".SR$|
000035C0: 3A 8D 32 35 30 30 30 00 E0 3D 9A 47 53 52 24 B2 |:.25000..=.GSR$.|
000035D0: 22 22 3A 8D 32 35 30 30 30 3A 8D 32 35 30 30 30 |"":.25000:.25000|
000035E0: 00 F0 3D A4 47 8B 50 B2 31 20 A7 31 38 33 37 30 |..=.G.P.1 .18370|
000035F0: 00 FB 3D AE 47 8D 32 30 30 30 30 00 04 3E B8 47 |..=.G.20000..>.G|
00003600: 8D 31 30 30 00 23 3E C2 47 8D 31 39 39 30 30 3A |.100.#>.G.19900:|
00003610: 8F 20 20 4B 4F 50 20 56 41 4E 20 44 45 20 54 41 |. KOP VAN DE TA|
00003620: 42 45 4C 00 30 3E CC 47 81 49 B2 31 20 A4 4E 50 |BEL.0>.G.I.1 .NP|
00003630: 00 63 3E D6 47 55 B2 55 28 49 29 3A 91 47 20 8D |.c>.GU.U(I):.G .|
00003640: 31 37 30 31 30 2C 31 37 30 36 30 2C 31 37 31 31 |17010,17060,1711|
00003650: 30 2C 31 37 31 36 30 2C 31 37 32 31 30 2C 31 37 |0,17160,17210,17|
00003660: 32 36 30 00 71 3E E0 47 59 B2 57 31 AC 58 AA 57 |260.q>.GY.W1.X.W|
00003670: 30 00 9D 3E EA 47 91 46 20 8D 31 37 35 33 30 2C |0..>.G.F .17530,|
00003680: 31 37 35 38 30 2C 31 37 36 33 30 2C 31 37 36 38 |17580,17630,1768|
00003690: 30 2C 31 37 37 33 30 2C 31 37 37 38 30 00 A8 3E |0,17730,17780..>|
000036A0: F4 47 8D 32 37 30 30 30 00 AF 3E FE 47 82 49 00 |.G.27000..>.G.I.|
000036B0: C8 3E 08 48 53 52 24 B2 22 22 3A 8D 32 35 30 30 |.>.HSR$."":.2500|
000036C0: 30 3A 8D 32 35 30 30 30 00 CE 3E 12 48 8E 00 00 |0:.25000..>.H...|
000036D0: 3F 44 48 8F 20 53 55 42 52 4F 55 54 49 4E 45 20 |?DH. SUBROUTINE |
000036E0: 20 4F 55 54 50 55 54 20 20 56 4F 4F 52 20 32 45 | OUTPUT VOOR 2E|
000036F0: 2D 47 52 41 41 44 53 20 50 4F 4C 59 4E 4F 4F 4D |-GRAADS POLYNOOM|
00003700: 00 2D 3F 4E 48 53 52 24 B2 22 C4 45 20 52 45 47 |.-?NHSR$.".E REG|
00003710: 52 45 53 53 49 45 2D 50 41 52 41 42 4F 4F 4C 20 |RESSIE-PARABOOL |
00003720: 49 53 20 3A 20 22 3A 8D 32 35 30 30 30 00 3F 3F |IS : ":.25000.??|
00003730: 58 48 53 52 24 B2 22 22 3A 8D 32 35 30 30 30 00 |XHSR$."":.25000.|
00003740: 6E 3F 62 48 53 52 24 B2 22 20 20 20 20 20 20 20 |n?bHSR$." |
00003750: D9 20 3D 20 57 32 2A D8 5E 32 20 2B 20 57 31 2A |. = W2*.^2 + W1*|
00003760: D8 20 2B 20 57 30 22 3A 8D 32 35 30 30 30 00 80 |. + W0":.25000..|
00003770: 3F 6C 48 53 52 24 B2 22 22 3A 8D 32 35 30 30 30 |?lHSR$."":.25000|
00003780: 00 B2 3F 76 48 53 52 24 B2 22 4F 46 57 45 4C 20 |..?vHSR$."OFWEL |
00003790: 20 D6 20 3D 20 49 4E 56 45 52 53 45 2D 46 28 57 | . = INVERSE-F(W|
000037A0: 32 2A 47 28 D5 29 5E 32 20 2B 2E 2E 2B 20 57 30 |2*G(.)^2 +..+ W0|
000037B0: 29 22 00 BD 3F 7B 48 8D 32 35 30 30 30 00 CF 3F |)"..?{H.25000..?|
000037C0: 80 48 53 52 24 B2 22 22 3A 8D 32 35 30 30 30 00 |.HSR$."":.25000.|
000037D0: F6 3F 8A 48 53 52 24 B2 22 4D 45 54 20 20 20 20 |.?.HSR$."MET |
000037E0: D8 20 3D 20 47 28 D5 29 20 3D 20 22 AA 47 24 3A |. = G(.) = ".G$:|
000037F0: 8D 32 35 30 30 30 00 1D 40 94 48 53 52 24 B2 22 |.25000..@.HSR$."|
00003800: 20 20 20 20 20 20 20 D9 20 3D 20 46 28 D6 29 20 | . = F(.) |
00003810: 3D 20 22 AA 46 24 3A 8D 32 35 30 30 30 00 45 40 |= ".F$:.25000.E@|
00003820: 9E 48 53 52 24 B2 22 20 20 20 49 4E 56 45 52 53 |.HSR$." INVERS|
00003830: 45 2D 46 28 D9 29 20 3D 20 22 AA 46 31 24 3A 8D |E-F(.) = ".F1$:.|
00003840: 32 35 30 30 30 00 57 40 A8 48 53 52 24 B2 22 22 |25000.W@.HSR$.""|
00003850: 3A 8D 32 35 30 30 30 00 85 40 B2 48 53 52 B2 57 |:.25000..@.HSR.W|
00003860: 30 3A 8D 32 36 30 30 30 3A 53 52 24 B2 22 45 4E |0:.26000:SR$."EN|
00003870: 20 20 20 20 57 30 20 3D 20 22 AA 53 52 24 3A 8D | W0 = ".SR$:.|
00003880: 32 35 30 30 30 00 B3 40 BC 48 53 52 B2 57 31 3A |25000..@.HSR.W1:|
00003890: 8D FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000038A0: FF FF FF 07 FF FF FF FF FF FF FF FF FF 3B FF FF |.............;..|
000038B0: FF FF FF FF FF FF FF FF FF FF FF FF 40 58 FF FF |............@X..|
000038C0: FF FF FF FF E3 FF FF 36 FF FF FF FF FF FF FF 23 |.......6.......#|
000038D0: FF FF 2F E9 FF 8C C5 35 22 43 A8 D3 23 53 03 03 |../....5"C..#S..|
000038E0: 00 0F A4 0D 04 85 35 22 4B 22 22 FF FF FF FF FF |......5"K"".....|
000038F0: 03 03 03 A8 D3 22 FF 03 03 00 00 A4 1D A4 88 B5 |....."..........|
00003900: 0B 26 FF FF FF FF FF FF FF FF FF FF FF FF 27 64 |.&............'d|
00003910: FF FF FF FF FF FF 47 FF FF 76 C4 FF A2 FF FF 2D |......G..v.....-|
00003920: 01 20 E9 FB 93 93 03 03 A8 F2 02 04 B4 F5 02 05 |. ..............|
00003930: 64 14 E2 04 44 52 05 44 14 24 54 C0 04 A4 10 24 |d...DR.D.$T....$|
00003940: 98 14 9B 23 12 0A 44 EE FF F5 FF FF AD 2E FF FF |...#..D.........|
00003950: FF 2D FF 35 10 BF FF 25 FF DB B0 31 30 2C 31 37 |.-.5...%...10,17|
00003960: 30 36 2F FF 9F 9B 90 FF DF FF 9F B7 31 36 30 2C |06/.........160,|
00003970: 8F 9B 99 8F 9F FF 9F 9B 99 8B 8F FF FF FF FA FF |................|
00003980: FF D9 FF 99 FF FF D5 89 CC FF FF FF 01 01 01 01 |................|
00003990: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000039A0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000039B0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000039C0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000039D0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000039E0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
000039F0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A00: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A10: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A20: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A30: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A40: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A50: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A60: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A70: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................|
00003A80: 01 01 01 01 01 01 01 01 01 01 |.......... |
.......1000......1010.!.D..".";:..Q.N..H
(".........................",.(.(VE.1)))
;.A.P....(HO));:....X.HO.B(209).256.B(21
0).1024.B(211)...Y.VE..(HO.40):HO.HO.40.
VE:....H..IN$:..D.R..IN$:.IN$."".210.J..
........54296,15:.54278,255:.54273,95:.5
4276,17......OO.1.200:.OO.*....54276,0:.
54277,0:.54278,0:..8...RV..(1):..F...FR.
.(0):..O.,.SR$.D(SR):.H(SR$,1)." ".SR$.J
(SR$,2).U.-.....6.SR$."":.SR..10.(CT.CN.
.(CN)).318...7..SR...5.10..CN.SR$."-"...
8.SR$.SR$.J(D(.(.(SR)..5.10..CN)),2)...9
..C(SR$).CT.CN.(CN..0).SR$." ".SR$:.313.
!.:..CN.0..(SR)..1E10.316.U.;.SR$.SR$.J(
D(1..(SR)..(.(SR))..5.10..CN),3,CN.1).U.
<..C(SR$).CT.SR$.SR$." ":.316...=..C(SR$
).CT.SR$.""...>..C(SR$).CT.SR$.SR$."*":.
318...?...G.^..4,4:.4,SR$;: 4:..X.H..4,4
:.4: 4:......A.1000:.20:. KLEINSTE KWADR
ATEN.2....A(6,6),B(6),P(6):. VOOR OPL. L
IN. STELSEL VERGL.._...MP.99:. MP = MAXI
MAAL AANTAL MEETPUNTEN..P....U(MP),V(MP)
.....NP.0:. NP = AANTAL MEETPUNTEN.....N
.1:. POLYNOOM NOG NIET BEREKEND...$.G.1:
.17000:F.1:.17500:. DEFAULT FUNKTIES G,
F......28000:. BREEDTE SCHERM.).8.BK..((
BS.13).3):. BREEDTE KOLOM.4.B..20000.=.L
..100.A.V.." KLEINSTE-KWADRATEN
"...`.."================================
======="...J...D.T.."DIT PROGRAMMA BEREK
ENT BIJ EEN GEGEVEN"...~.."SET VAN N M
EETPUNTEN :"............" (U1,V1) , (U
2,V2) ,........, (UN,VN)".......N...."DI
E POLYNOOM ( MET GRAAD 1,2,3,4 OF 5 )".Z
...."DIE 'ZO GOED MOGELIJK' DOOR DE SET
:".........D.." (G(U1),F(V1)) ,......,
(G(UN),F(VN))"...N.....X.."VAN PUNTEN L
OOPT, WAARBIJ G EN F DOOR "......"DE GE
BRUIKER GEGEVEN FUNKTIES ZIJN."......200
00.#....100.P...."DE ALGEMENE VORM VAN D
E POLYNOOM IS :".V.........." Y=W5*X^5+W
4*X^4+W3*X^3+W2*X^2+W1*X+W0".........(..
"HIERBIJ CORRESPONDEERT"...2.....<.."
X MET EEN FUNKTIE VAN U : X = G(U)"...F
.." Y MET EEN FUNKTIE VAN V : Y = F(V
)"...P...>.Z.."W0 T/M W5 WORDEN ZODANIG
BEREKEND DAT".M.D.."GELDT :".S.N.....X.
." SOM(I=1 T/M N)( (F(VI)-W5*G(UI)^5....
"......" ....-W1*G(UI)-W0)^2 ) = MI
NIMAAL"......20000.C....100... .."HIER V
OLGEN DE MOGELIJKHEDEN:"............"
1. Y = W1*X + W0".3...." 2. Y = W2
*X^2 + W1*X + W0".B.H.." 3. Y = W3*
X^3 + W2*X^2 + W1*X + W0"...R.." 4.
Y = W4*X^4 + W3*X^3 + W2*X^2 +"......"
W1*X + W0".Z...." 5. Y = W
5*X^5 + W4*X^4 + W3*X^3 +"......"
W2*X^2 + W1*X + W0".'...." 6. I
NVOEREN SET MEETPUNTEN".R...." 7. INV
OEREN FUNKTIES G EN F"......" 8.
RESULTATEN+ TABEL MET MEETPUNTEN"......"
9. EINDE EXEKUTIE PROGRAMMA."..."...
V.,.."UW KEUZE (1,2,.....,9) ";..
.6..210:.IN$...@.H.E(IN$):.(H.1) .(H.9)
.(.(H)..H) .1580...J..H.9 .1640.R.T..H .
2000,3000,4000,5000,6000,15000,16000,180
00.\.^..1430.B.H.....R.."EINDE EXEKUTIE
PROGRAMMA."...|.....P.. OPLOSSEN Y= W1*
X + W0...Z.. REGELS 2000-2370.F....100..
...."BEREKENING REGRESSIE-RECHTE".......
....." Y = W1*X + W0"...........A2.0:A1
.0:A0.0.-. .B1.0:B0.0.:.*..I.1 .NP.M.4.U
.U(I):.G .17010,17060,17110,17160,17210,
17260. .>.V.V(I):.F .17510,17560,17610,1
7660,17710,17760.P.H.H.1:A0.A0.H:B0.B0.Y
:H.H.X:A1.A1.H:B1.B1.Y.H...R.H.H.X:A2.A2
.H...\..I...F.A(1,1).A2...P.A(1,2).A1:A(
2,1).A1...Z.A(2,2).A0.1...B(1).B1:B(2).B
0.E.... DE COEFFICIENTEN-MATRIX A EN VEK
TOR B ZIJN NU...... BEREKEND. LOS NU W
OP UIT AW=B.....N.2:.10000:. LU-DECOMP
OSITIE.F....FT.1 ..21000:.2360......1100
0:.12000:. OPLOSSEN VAN W.....W1.B(1):W0
.B(2).,.J.."DE PARAMETERS W0 EN W1 ZIJ
N BEREKEND:".2.T...D...." W0 = ";W0.V..
.." W1 = ";W1.\.....N...."ER GELDT :".T
.........." V = INVERSE-F (W1*G(U) + W0
)". .....D.$.."WAARBIJ INVERSE-F(Y) = "
;F1$......" G(U) = ";G$.
..8..20000...B........ OPLOSSEN Y = W2*
X^2 + W1*X +W0.5.B.. REGELS 3000-3400.>.
L..100.C.V.."BEREKENING REGRESSIE-PARABO
OL".I.........." Y = W2*X^2 + W1*X + W0
"...........A4.0:A3.0:A2.0:A1.0:A0.0....
.B2.0:B1.0:B0.0.L....I.1 .NP.....U.U(I):
.G .17010,17060,17110,17160,17210,17260.
2.&.V.V(I):.F .17510,17560,17610,17660,1
7710,17760.B.0.H.1:A0.A0.H:B0.B0.Y:H.H.X
:A1.A1.H:B1.B1.Y.H...:.H.H.X:A2.A2.H:B2.
B2.Y.H:H.H.X:A3.A3.H:H.H.X:A4.A4.H...D..
I...N.A(1,1).A4.G.X.A(1,2).A3:A(2,1).A3.
..B.A(1,3).A2:A(2,2).A2:A(3,1).A2...L.A(
2,3).A1:A(3,2).A1...V.A(3,3).A0.+...B(1)
.B2:B(2).B1:B(3).B0._.... DE COEFFICIENT
EN-MATRIX A EN VEKTOR B ZIJN NU...... BE
REKEND. LOS NU W OP UIT AW=B.....N.3:
.10000:. LU-DECOMPOSITIE......FT.1 ..210
00:.3390......11000:.12000:. OPLOSSEN VA
N W.....W2.B(1):W1.B(2):W0.B(3).-.F.."DE
PARAMETERS W0 T/M W2 ZIJN BEREKEND:".3.
P...E.Z.." W0 = ";W0.W...." W1 = ";W1.
I...." W2 = ";W2.O.........."ER GELDT :
"............"V= INVERSE F (W2*G(U)^2 +
W1*G(U) + W0)"... .....*.."WAARBIJ INVE
RSE-F(Y) = ";F1$...4.."
G(U) = ";G$...>..20000...H...D. .. OPLOS
SEN Y = W3*X^3 + W2*X^2 + W1*X + W0.[..
.. REGELS 4000-4450.D....100......"BEREK
ENING REGRESSIE- 3E-MACHTSPOLYNOOM"...H.
..B.R.." Y = W3*X^3 + W2*X^2 + W1*X + W
0".H.........A6.0:A5.0:A4.0:A3.0:A2.0:A1
.0:A0.0.....B3.0:B2.0:B1.0:B0.0......I.1
.NP.G...U.U(I):.G .17010,17060,17110,17
160,17210,17260.Z...V.V(I):.F .17510,175
60,17610,17660,17710,17760.....H.1:A0.A0
.H:B0.B0.Y:H.H.X:A1.AL)H:B1.B1.Y.H...".H
.H.X:A2.A2.H:B2.B2.Y.H:H.H.X:A3.A3.H:B3.
B3.Y.H...,.H.H.X:A4.A4.H:H.H.X:A5.A5.H:H
.H.X:A6.A6.H...6..I.!.@.A(1,1).A6.9.J.A(
1,2).A5:A(2,1).A5.[.T.A(1,3).A4:A(2,2).A
4:A(3,1).A4...^.A(1,4).A3:A(2,3).A3:A(3,
2).A3:A(4,1).A3...H.A(2,4).A2:A(3,3).A2:
A(4,2).A2.A.R.A(3,4).A1:A(4,3).A1.O.|.A(
4,4).A0.....B(1).B3:B(2).B2:B(3).B1:B(4)
.B0.'.... DE COEFFICIENTEN-MATRIX A EN V
EKTOR B ZIJN NU.O.... BEREKEND. LOS NU
W OP UIT AW=B.P...N.4:.10000:. LU-DECO
MPOSITIE......FT.1 ..21000:.4440......11
000:.12000:. OPLOSSEN VAN W.O.B.W3.B(1):
W2.B(2):W1.B(3):W0.B(4)...L.."DE PARAMET
ERS W0 T/M W3 ZIJN BEREKEND :"...V......
.." W0 = ";W0.(...." W1 = ";W1.:...."
W2 = ";W2.L...." W3 = ";W3.R.....D....
"ER GELDT :".J.......&.." V = INVERSE F
(W3*G(U)^3 + W2*G(U)^2 +".A.0.."
W1*G(U) + W0 )".G.:.....D.."WA
ARBIJ INVERSE-F(Y) = ";F1$...N.."
G(U) = ";G$...X..20000...B...
N.... OPLOSSEN Y = W4*X^4 + W3*X^3 + W2
*X^2 +.N.... W1*X + W0..
.... REGELS 5000-5510......100......"BER
EKENING REGRESSIE- 4E-MACHTSPOLYNOOM".C.
......D.." Y = W4*X^4 + W3*X^3 + W2*X^2
+".. N.." W1*X + W0".. X...; ..A
8.0:A7.0:A6.0:A5.0:A4.0:A3.0:A2.0:A1.0:A
0.0.X ..B4.0:B3.0:B2.0:B1.0:B0.0.E ...I.
1 .NP.. ..U.U(I):.G .17010,17060,17110,1
7160,17210,17260.K ..V.V(I):.F .17510,17
560,17610,17660,17710,17760.. ..H.1:A0.A
0.H:B0.B0.Y:H.H.X:A1.A1.H:B1.B1.Y.H./!..
H.H.X:A2.A2.H:B2.B2.Y.H:H.H.X:A3.A3.H:B3
.B3.Y.H.G!(.H.H.X:A4.A4.H:B4.B4.Y.H:H.H.
X:A5.A5.H:H.H.X:A6.A6.H..!2.H.H.X:A7.A7.
H:H.H.X:A8.A8.H..!<..I..!F.A(1,1).A8..!P
.A(1,2).A7:A(2,1).A7.V!Z.A(1,3).A6:A(2,2
).A6:A(3,1).A6.."D.A(1,4).A5:A(2,3).A5:A
(3,2).A5:A(4,1).A5.8"N.A(1,5).A4:A(2,4).
A2:A(3,3).A4:A(4,2).A4:A(5,1).A4.D"X.A(2
,5).A3:A(3,4).A3:A(4,3).A3:A(5,2).A3..".
.A(3,5).A2:A(4,4).A2:A(5,3).A2.."..A(4,5
).A1:A(5,4).A1.."..A(5,5).A0.X" .B(1).B4
:B(2).B3:B(3).B2:B(4).B1:B(5).B0..#... D
E COEFFICIENTEN-MATRIX A EN VEKTOR B ZIJ
N NU.4#... BEREKEND. LOS NU W OP UIT
AW=B.U#..N.5:.10000:. LU-DECOMPOSITIE.M#
H..FT.1 ..21000:.5500..#R..11000:.12000:
. OPLOSSEN VAN W..#..W4.B(1):W3.B(2):W2.
B(3):W1.B(4):W0.B(5)..#..."DE PARAMETERS
W0 T/M W4 ZIJN BEREKEND :"..#.....$..."
W0 = ";W0..$..." W1 = ";W1.'$..." W2
= ";W2.9$..." W3 = ";W3.K$".." W4 = "
;W4.Q$,...C$6.."ER GELDT :".I$@....$J.."
V = INVERSE F (W4*G(U)^4 + W3*G(U)^3 +"
.G$T.." W2*G(U)^2 + W1*G(U)
+ W0)".M$^....$H.."WAARBIJ INVERSE-F(Y
) = ";F1$..%R.." G(U) =
";G$..%|..20000.%%....T%P.. OPLOSSEN Y
= W5*X^5 + W4*X^4 + W3*X^3 +.}%Z..
W2*X^2 + W1*X + W0..%... REGE
LS 6000-6560..%...100.L%..."BEREKENING R
EGRESSIE- 5E-MACHTSPOLYNOOM".R%.....%...
" Y = W5*X^5 + W4*X^4 + W3*X^3 +"..&...
" W2*X^2 + W1*X + W0"."&....]&J.A
H.0:A9.0:A8.0:A7.0:A6.0:A5.0:A4.0:A3.0:A
2.0:A1.0:A0.0.&T.B5.0:B4.0:B3.0:B2.0:B1
.0:B0.0..&...I.1 .NP..&..U.U(I):.G .1701
0,17060,17110,17160,17210,17260..&..V.V(
I):.F .17510,17560,17610,17660,17710,177
60."'..H.1:A0.A0.H:B0.B0.Y:H.H.X:A1.A1.H
:B1.B1.Y.H.V'..H.H.X:A2.A2.H:B2.B2.Y.H:H
.H.X:A3.A3.H:B3.B3.Y.H..'..H.H.X:A4.A4.H
:B4.B4.Y.H:H.H.X:A5.A5.H:B5.B5.Y.H..'..H
.H.X:A6.A6.H:H.H.X:A7.A7.H:H.H.X:A8.A8.H
.X'$.H.H.X:A9.A9.H:H.H.X:AH.AH.H..'...I.
.'8.A(1,1).AH..(B.A(1,2).A9:A(2,1).A9.'(
L.A(1,3).A8:A(2,2).A8:A(3,1).A8.S(V.A(1,
4).A7:A(2,3).A7:A(3,2).A7:A(4,1).A7..(`.
A(1,5).A6:A(2,4).A6:A(3,3).A6:A(4,2).A6:
A(5,1).A6..(J.A(1,6).A5:A(2,5).A5:A(3,4)
.A5:A(4,3).A5:A(5,2).A5.M(O.A(6,1).A5..)
T.A(2,6).A4:A(3,5).A4:A(4,4).A4:A(5,3).A
4:A(6,2).A4./)~.A(3,6).A3:A(4,5).A3:A(5,
4).A3:A(6,3).A3.Q)..A(4,6).A2:A(5,5).A2:
A(6,4).A2.I)..A(5,6).A1:A(6,5).A1.W)..A(
6,6).A0..)..B(1).B5:B(2).B4:B(3).B3:B(4)
.B2:B(5).B1:B(6).B0..)... DE COEFFICIENT
EN-MATRIX A EN VEKTOR B ZIJN NU..*... BE
REKEND. LOS NU W OP UIT AW=B.(*D.N.6:
.10000:. LU-DECOMPOSITIE.@*N..FT.1 ..210
00:.6550.C*X..11000:.12000:. OPLOSSEN VA
N W..*..W5.B(1):W4.B(2):W3.B(3):W2.B(4):
W1.B(5):W0.B(6).F*..."DE PARAMETERS W0 T
/M W5 ZIJN BEREKEND :".L*.....*..." W0
= ";W0..*..." W1 = ";W1..+..." W2 = ";
W2..+..." W3 = ";W3.&+(.." W4 = ";W4.8
+2.." W5 = ";W5.>+<...P+F.."ER GELDT :"
.V+P....+Z.."V = INVERSE F (W5*G(U)^5 +
W4*G(U)^4 +"..+D.." W3*G(U
)^3 + W2*G(U)^2 +".X+N.."
W1*G(U) + W0)"..+X....,..."WAARBIJ IN
VERSE-F(Y) = ";F1$.%,..."
G(U) = ";G$.0,...20000.6, ...W,.'. SUB
ROUTINE LU-DECOMPOSITIE.D,.'K.1:FT.0..,$
'.K.N .FT.1 .10240:. WHILE LOOP 10020-10
230..,.'MX.0..,8'.I.K .N .1:.K.1 .10080.
D,B'H.A(I,K)..,L'.L.1 .K.1 .1:H.H.A(I,L)
.A(L,K):.L..,V'A(I,K).H..-`'..(A(I,K)).M
X .P(K).I:MX..(A(I,K)).%-J'.I.<-T'.MX.0
.FT.1:.10230.O-~'.P(K).K .10150.^-.'.J.1
.N .1..-.'H.A(K,J):A(K,J).A(P(K),J):A(P
(K),J).H..-.'.J..-.'.K.N .K.1 .10210..-.
'.J.K.1 .N .1.B-.'H.A(K,J)..-D'.L.1 .K.1
.1:H.H.A(K,L).A(L,J):.L..-N'A(K,J).H..-
X'.J....'.K.N .10230.5..'.I.K.1 .N .1:A(
I,K).A(I,K).A(K,K):.I.F..'K.K.1:.10020.L
..(..K..*. SUBROUTINE B=B' EN LC=B'....+
.K.1 .N .1:.P(K).K .11030....+H.B(K):B(K
).B(P(K)):B(P(K)).H....+.K.1 .11070.F. +
H.B(K)...*+.J.1 .K.1 .1:H.H.A(K,J).B(J):
.J...4+B(K).H...>+.K../H+.../... SUBROUT
INE UW=C.(/...K.N .1 ..1.?/..H.B(K):.K.N
.12040.C/...J.K.1 .N .1:H.H.A(K,J).B(J)
:.J.U/./B(K).H.A(K,K).|/./.K.././.../.:.
SUBROUTINE INVOER VAN N MEETPUNTEN.X/
.:. (U1,V1) ,.....,(UN,VN)
../.:N.1:. POLYNOOM NOG NIET BEREKEND..0
.:.100.!0.:."INVOEREN MEETPUNTEN".'0J:..
Q0T:."DE MEETPUNTEN WORDEN OPGESLAGEN IN
".T0.:."DE 1-DIM ARRAYS U EN V ."..0.
:."DE LENGTE VAN DEZE ARRAYS IS VAST.".M
0.:."INDIEN EEN ANDERE LENGTE GEWENST IS
DAN"..0.:."KAN DIT DOOR DE VARIABELE M
P, IN REGEL"..1.;."1020, AAN TE PASSEN."
.81.;."(DEFAULT : MP =";MP;" )".>1.;..M
1$;."GEEF HET AANTAL MEETPUNTEN (UI,VI)
OP."..1.;."( 0 <= AANTAL <=";MP;" ) "
;:.IN$..18;.IN$."0" ..23000:.15290.X1B;H
.E(IN$):.(H.1) .(.(H)..H) .15140..1L;NP.
H..1V;.NP.MP ..22000:.15290..2`;.:...2J;
.I.1 .NP..2T;SR.I:.300.M2~;."VOER IN U
";SR$;" ";:.IN$:U(I).E(IN$).|2.;."VOER
IN V";SR$;" ";:.IN$:V(I).E(IN$)..2.
;."CORRECT INGEVOERD ? (J/N) ";:.210.N
2.;.IN$:.(IN$.."J") .(IN$.."J") .15230.T
2.;...2.;.I..2.;.20000..2D;...3.>. SUBRO
UTINE 'INVOER' VAN DE FUNKTIES G EN F.C
3.>N.1:. POLYNOOM NOG NIET BEREKEND.L3.>
.100.{3.>."DE VOLGENDE FUNKTIES ZIJN BES
CHIKBAAR :"..3.>...3.>." 1. G(U)=U
, F(V)=V".I3.>." 2. G(U)=U^2 ,
F(V)=V^2"..3F>." 3. G(U)=1/U , F(V
)=1/V"..4P>." 4. G(U)=1/U^2 , F(V)=1
/V^2".<4Z>." 5. G(U)=LN(U) , F(V)=LN
(V)".`4.>." 6. G(U)= ? , F(V)= ?"
.}4.>." EIGEN DEFINITIES"..4.>." 7.
UITLEG BIJ PUNT 6"..4.?.:..S4.?."UW KEU
ZE VOOR X=G(U) (1,2,....,7) ";..4.?
.210:.IN$..5 ?H.E(IN$):.(H.1) .(H.7) .(.
(H)..H) .16140.&5*?.H.7 ..16300:.16250.V
54?G.H:.G .17000,17050,17100,17150,17200
,17250.\5>?...5H?."UW KEUZE VOOR Y=F(V)
(1,2,....,7) ";..5R?.210:.IN$.G5\?H
.E(IN$):.(H.1) .(H.7) .(.(H)..H) .16200.
.5F?.H.7 ..16400:.16250..6P?F.H:.F .1750
0,17550,17600,17650,17700,17750..6Z?.200
00. 6.?..P6.?. SUBROUTINE UITLEG DEFINI
EREN EIGEN G(U).Y6.?.100.W6.?."DEFINIER
EN EIGEN G(U)".}6J?...6T?."VERVANG U
IN REGEL 17260 DOOR HET GE-".Y6.?."WENST
E FUNKTIEVOORSCHRIFT, EN KEN AAN"..7.?."
G$ IN REGEL 17250 DE BIJBEHORENDE"..7.?
."STRING TOE."..7.?.."7.@..R7.@. SUBROUT
INE UITLEG DEFINIEREN EIGEN F(V).[7.@.
100.Y7$@."DEFINIEREN EIGEN F(V)".7.@..
.78@."VERVANG V IN REGEL 17760 DOOR HE
T GE-"..7B@."WENSTE FUNKTIEVOORSCHRIFT,
VERVANG Y"..8L@."IN REGEL 17780 DOOR HE
T INVERSE-FUNKTIE".98V@."VOORSCHRIFT, EN
KEN AAN F$ RESP. F1$".G8`@."IN REGEL
17750 DE BIJBEHORENDE STRINGS".S8J@."TO
E.".Y8T@..8~@...8HBG$."U":...8RBX.U..8|
B...8.BG$."U^2":...8.BX.U.2..8.B..H8LBG$
."1/U":..R8VBX.1.U.X8.B...8.BG$."1/U^2":
...8.CX.1.U.2..8.C...90CG$."LN(U)":...9:
CX..(U)..9DC..*9BCG$."U":..29LCX.U.89VC.
.M9\DF$."V":F1$."Y":..U9FDY.V.[9PD..C9ZD
V.Y.I9.D...9.DF$."V^2":F1$."SQRT(Y)":...
9.DY.V.2..9.D...9.DV..(Y)..9.D...9.DF$."
1/V":F1$."1/Y":..J9JDY.1.V.P9TD..Z9.DV.1
.Y..9.D...:.DF$."1/V^2":F1$."1/SQRT(Y)":
...:.DY.1.V.2..:.E.. :.EV.1..(Y).&:.E..D
:$EF$."LN(V)":F1$."EXP(Y)":..O:.EY..(V).
U:8E..`:BEV..(Y).F:LE..{:VEF$."V":F1$."Y
":...:`EY.V..:JE...:TEV.Y..:~E..M:PF. SU
BROUTINE PRINT RESULTATEN + TABEL MEETP
UNTEN.V:ZF.100..:DF."OUTPUT NAAR PRINTER
(J/N) ?":.210.";NFP.0:.(IN$."J") .(IN$
."J") .P.1.+;XF.100.^;.FSR$."RESULTATEN
KLEINSTE KWADRATEN BENADERING".I;.F.2500
0..;.FSR$."=============================
==========="..;.F.25000..;.FSR$."":.2500
0..; F.N .19800,18200,18500,18800,19100,
19400..;.F.20000..;.F..(<.G. SUBROUTINE
OUTPUT VOOR 1E-GRAADS POLYNOOM.R<"GSR$
."DE REGRESSIE-RECHTE IS :":.25000.D<,GS
R$."":.25000..<6GSR$." Y = W1*X +
W0":.25000..<@GSR$."":.25000.Q<JGSR$."OF
WEL V = INVERSE-F (W1*G(U) + W0)":.2500
0..<TGSR$."":.25000..=^GSR$."MET X =
G(U) = ".G$:.25000.1=HGSR$." Y = F
(V) = ".F$:.25000.Y=RGSR$." INVERSE-F(
Y) = ".F1$:.25000.K=|GSR$."":.25000..=.G
SR.W0:.26000:SR$."EN W0 = ".SR$:.2500
0.G=.GSR.W1:.26000:SR$." W1 = ".SR$
:.25000..=.GSR$."":.25000:.25000..=.G.P.
1 .18370..=.G.20000..>.G.100.#>BG.19900:
. KOP VAN DE TABEL.0>LG.I.1 .NP.C>VGU.U
(I):.G .17010,17060,17110,17160,17210,17
260.Q>.GY.W1.X.W0..>.G.F .17530,17580,17
630,17680,17730,17780..>.G.27000..>.G.I.
H>.HSR$."":.25000:.25000.N>.H...?DH. SUB
ROUTINE OUTPUT VOOR 2E-GRAADS POLYNOOM
.-?NHSR$."DE REGRESSIE-PARABOOL IS : ":.
25000.??XHSR$."":.25000.N?BHSR$."
Y = W2*X^2 + W1*X + W0":.25000..?LHSR$."
":.25000..?VHSR$."OFWEL V = INVERSE-F(W
2*G(U)^2 +..+ W0)"..?{H.25000.O?.HSR$.""
:.25000..?.HSR$."MET X = G(U) = ".G$:
.25000..@.HSR$." Y = F(V) = ".F$:.
25000.E@.HSR$." INVERSE-F(Y) = ".F1$:.
25000.W@.HSR$."":.25000..@.HSR.W0:.26000
:SR$."EN W0 = ".SR$:.25000..@.HSR.W1:
.............................;..........
....@X.........6.......#../...E5"C.S#S..
......5"K"".........S"...........&......
......'D......G..VD....-. ..............
D...DR.D.$T....$...#..D..........-.5...%
...10,1706/.........160,................
.Y....U.L...............................
........................................
........................................
........................................
........................................
........................................
..........................
> CLICK IMAGE PREVIEW FOR FULL MODAL