_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

Multiple names: BAIRS EQ  , MA010   BAIRS EQ

FILE INFORMATION

FILENAME(S):
• BAIRS&nbspEQ&nbsp&nbsp<br>• MA010&nbsp&nbsp&nbspBAIRS&nbspEQ

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-11-02 16:39:54

APPEARS ON: 3 disk(s)

FILE HASH

380af7a403796ddf752f52cd578a4a91d8881f193180eb4e2b7bc3fdb9cb2c7b

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PUBLIC DOMAIN BAIRS EQ   PRG Treasure Chest - Plattfuss 13 1 DOWNLOAD FILE
FREESOFT DISK NR MA010   BAIRS EQ PRG Treasure Chest - Wolfgang Rauprich 25 7 DOWNLOAD FILE
L EHRNEN MA010   BAIRS EQ PRG Treasure Chest - Wolfgang Rauprich 25 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 14 08 01 00 8F 20  2A 2A 2A 20 42 41 49 52  |....... *** BAIR|
00000010: 53 54 4F 57 00 26 08 02  00 8F 20 20 20 20 20 57  |STOW.&....     W|
00000020: 20 48 41 57 45 53 00 2C  08 03 00 8F 00 45 08 04  | HAWES.,.....E..|
00000030: 00 8F 20 2A 2A 2A 20 50  45 54 20 55 53 45 52 20  |.. *** PET USER |
00000040: 47 52 4F 55 50 00 61 08  05 00 8F 20 20 20 20 20  |GROUP.a....     |
00000050: 53 4F 46 54 57 41 52 45  20 45 58 43 48 41 4E 47  |SOFTWARE EXCHANG|
00000060: 45 00 76 08 06 00 8F 20  20 20 20 20 50 4F 20 42  |E.v....     PO B|
00000070: 4F 58 20 33 37 31 00 97  08 07 00 8F 20 20 20 20  |OX 371......    |
00000080: 20 4D 4F 54 47 4F 4D 45  52 59 56 49 4C 4C 45 2C  | MOTGOMERYVILLE,|
00000090: 50 41 20 31 39 33 36 00  9D 08 08 00 8F 00 AB 08  |PA 1936.........|
000000A0: 0A 00 97 35 39 34 36 38  2C 31 32 00 B4 08 38 4A  |...59468,12...8J|
000000B0: 99 22 93 22 00 D8 08 42  4A 8F 20 50 52 4F 47 52  |."."...BJ. PROGR|
000000C0: 41 4D 20 53 55 42 4D 49  54 54 45 44 20 42 59 20  |AM SUBMITTED BY |
000000D0: 57 2E 20 48 41 57 45 53  00 F3 08 4C 4A 8F 20 48  |W. HAWES...LJ. H|
000000E0: 41 4C 49 46 41 58 2C 20  4E 2E 53 2E 20 43 41 4E  |ALIFAX, N.S. CAN|
000000F0: 41 44 41 00 0B 09 56 4A  99 22 50 52 4F 47 52 41  |ADA...VJ."PROGRA|
00000100: 4D 20 42 41 49 52 53 54  4F 57 22 00 11 09 58 4A  |M BAIRSTOW"...XJ|
00000110: 99 00 37 09 20 4E 99 22  50 52 4F 47 52 41 4D 20  |..7. N."PROGRAM |
00000120: 54 4F 20 53 4F 4C 56 45  20 41 4E 20 4E 27 54 48  |TO SOLVE AN N'TH|
00000130: 20 4F 52 44 45 52 22 00  5E 09 22 4E 99 22 50 4F  | ORDER".^."N."PO|
00000140: 4C 59 4E 4F 4D 49 41 4C  20 45 51 55 41 54 49 4F  |LYNOMIAL EQUATIO|
00000150: 4E 20 4F 46 20 54 48 45  20 46 4F 52 4D 22 00 82  |N OF THE FORM"..|
00000160: 09 24 4E 99 22 59 5E 4E  20 2B 20 41 31 2A 59 5E  |.$N."Y^N + A1*Y^|
00000170: 28 4E 2D 31 29 20 2B 2E  2E 2E 2E 2B 41 4E 20 3D  |(N-1) +....+AN =|
00000180: 20 30 00 A6 09 26 4E 99  22 57 48 45 52 45 20 41  | 0...&N."WHERE A|
00000190: 31 2C 41 32 2C 2E 2E 2E  2E 2C 41 4E 20 41 52 45  |1,A2,....,AN ARE|
000001A0: 20 52 45 41 4C 2E 00 CB  09 28 4E 99 22 42 41 49  | REAL....(N."BAI|
000001B0: 52 53 54 4F 57 27 53 20  49 54 45 52 41 54 49 56  |RSTOW'S ITERATIV|
000001C0: 45 20 4D 45 54 48 4F 44  20 49 53 00 EA 09 2A 4E  |E METHOD IS...*N|
000001D0: 99 22 55 53 45 44 20 54  4F 20 59 49 45 4C 44 20  |."USED TO YIELD |
000001E0: 53 55 43 43 45 53 53 49  56 45 00 0A 0A 2C 4E 99  |SUCCESSIVE...,N.|
000001F0: 22 51 55 41 44 52 41 54  49 43 20 46 41 43 54 4F  |"QUADRATIC FACTO|
00000200: 52 53 20 41 4E 44 20 54  48 45 00 28 0A 2E 4E 99  |RS AND THE.(..N.|
00000210: 22 52 45 53 55 4C 54 41  4E 54 20 52 45 44 55 43  |"RESULTANT REDUC|
00000220: 45 44 20 4F 52 44 45 52  00 39 0A 30 4E 99 22 50  |ED ORDER.9.0N."P|
00000230: 4F 4C 59 4E 4F 4D 49 41  4C 00 3F 0A 34 4E 99 00  |OLYNOMIAL.?.4N..|
00000240: 5F 0A 36 4E 99 22 50 52  45 53 53 20 41 4E 59 20  |_.6N."PRESS ANY |
00000250: 4B 45 59 20 57 48 45 4E  20 52 45 41 44 59 22 00  |KEY WHEN READY".|
00000260: 74 0A 38 4E A1 41 24 3A  8B 41 24 B2 22 22 A7 32  |t.8N.A$:.A$."".2|
00000270: 30 30 32 34 00 7D 0A 84  4E 99 22 93 22 00 A2 0A  |0024.}..N."."...|
00000280: 86 4E 85 22 45 4E 54 45  52 20 4F 52 44 45 52 20  |.N."ENTER ORDER |
00000290: 4E 20 4F 46 20 50 4F 4C  59 4E 4F 4D 49 41 4C 22  |N OF POLYNOMIAL"|
000002A0: 3B 4E 00 B2 0A 8E 4E 50  B2 30 3A 51 B2 30 3A 5A  |;N....NP.0:Q.0:Z|
000002B0: B2 30 00 CD 0A 98 4E 86  41 28 4E 29 2C 42 28 4E  |.0....N.A(N),B(N|
000002C0: 29 2C 43 28 4E 29 3A 43  28 30 29 B2 31 00 D8 0A  |),C(N):C(0).1...|
000002D0: A2 4E 81 4C B2 31 A4 4E  00 F0 0A AC 4E 99 22 45  |.N.L.1.N....N."E|
000002E0: 4E 54 45 52 20 41 22 3B  4C 3B 3A 85 41 28 4C 29  |NTER A";L;:.A(L)|
000002F0: 00 F7 0A B6 4E 82 4C 00  FF 0A BB 4E 99 3A 99 00  |....N.L....N.:..|
00000300: 22 0B C0 4E 42 28 31 29  B2 41 28 31 29 AB 50 3A  |"..NB(1).A(1).P:|
00000310: 42 28 32 29 B2 41 28 32  29 AB 50 AC 42 28 31 29  |B(2).A(2).P.B(1)|
00000320: AB 51 00 2D 0B CA 4E 81  4B B2 33 A4 4E 00 4D 0B  |.Q.-..N.K.3.N.M.|
00000330: D4 4E 42 28 4B 29 B2 41  28 4B 29 AB 50 AC 42 28  |.NB(K).A(K).P.B(|
00000340: 4B AB 31 29 AB 51 AC 42  28 4B AB 32 29 00 54 0B  |K.1).Q.B(K.2).T.|
00000350: DE 4E 82 4B 00 77 0B E8  4E 43 28 31 29 B2 42 28  |.N.K.w..NC(1).B(|
00000360: 31 29 AB 50 3A 43 28 32  29 B2 42 28 32 29 AB 50  |1).P:C(2).B(2).P|
00000370: AC 43 28 31 29 AB 51 00  82 0B F2 4E 81 4B B2 33  |.C(1).Q....N.K.3|
00000380: A4 4E 00 A2 0B F7 4E 43  28 4B 29 B2 42 28 4B 29  |.N....NC(K).B(K)|
00000390: AB 50 AC 43 28 4B AB 31  29 AB 51 AC 43 28 4B AB  |.P.C(K.1).Q.C(K.|
000003A0: 32 29 00 A9 0B FC 4E 82  4B 00 BE 0B 06 4F 43 42  |2)....N.K....OCB|
000003B0: B2 43 28 4E AB 31 29 AB  42 28 4E AB 31 29 00 DF  |.C(N.1).B(N.1)..|
000003C0: 0B 10 4F 44 50 B2 42 28  4E AB 31 29 AC 43 28 4E  |..ODP.B(N.1).C(N|
000003D0: AB 32 29 AB 42 28 4E 29  AC 43 28 4E AB 33 29 00  |.2).B(N).C(N.3).|
000003E0: 03 0C 15 4F 44 50 B2 44  50 AD 28 43 28 4E AB 32  |...ODP.DP.(C(N.2|
000003F0: 29 AC 43 28 4E AB 32 29  AB 43 42 AC 43 28 4E AB  |).C(N.2).CB.C(N.|
00000400: 33 29 29 00 20 0C 1A 4F  44 51 B2 42 28 4E 29 AC  |3)). ..ODQ.B(N).|
00000410: 43 28 4E AB 32 29 AB 42  28 4E AB 31 29 AC 43 42  |C(N.2).B(N.1).CB|
00000420: 00 44 0C 1F 4F 44 51 B2  44 51 AD 28 43 28 4E AB  |.D..ODQ.DQ.(C(N.|
00000430: 32 29 AC 43 28 4E AB 32  29 AB 43 42 AC 43 28 4E  |2).C(N.2).CB.C(N|
00000440: AB 33 29 29 00 56 0C 24  4F 50 B2 50 AA 44 50 3A  |.3)).V.$OP.P.DP:|
00000450: 51 B2 51 AA 44 51 00 6E  0C 2E 4F 4D B2 B6 28 44  |Q.Q.DQ.n..OM..(D|
00000460: 50 29 AA B6 28 44 51 29  3A 5A B2 5A AA 31 00 94  |P)..(DQ):Z.Z.1..|
00000470: 0C 38 4F 99 22 91 22 3B  22 49 54 45 52 41 54 49  |.8O.".";"ITERATI|
00000480: 4F 4E 20 23 22 3B 5A 3B  22 20 45 52 52 4F 52 20  |ON #";Z;" ERROR |
00000490: 3D 22 3B 4D 00 AA 0C 42  4F 8B 4D B3 2E 30 30 30  |=";M...BO.M..000|
000004A0: 30 30 30 31 A7 32 30 33  32 30 00 B5 0C 4C 4F 89  |0001.20320...LO.|
000004B0: 32 30 31 36 30 00 BB 0C  60 4F 99 00 C9 0C 74 4F  |20160...`O....tO|
000004C0: 99 22 50 20 3D 20 22 3B  50 00 D7 0C 7E 4F 99 22  |."P = ";P...~O."|
000004D0: 51 20 3D 20 22 3B 51 00  DD 0C 88 4F 99 00 04 0D  |Q = ";Q....O....|
000004E0: 92 4F 99 22 50 20 26 20  51 20 41 52 45 20 41 20  |.O."P & Q ARE A |
000004F0: 51 55 41 44 52 41 54 49  43 20 46 41 43 54 4F 52  |QUADRATIC FACTOR|
00000500: 20 4F 46 22 00 25 0D 9C  4F 99 22 54 48 45 20 46  | OF".%..O."THE F|
00000510: 4F 52 4D 20 59 5E 32 20  2B 50 2A 59 20 2B 20 51  |ORM Y^2 +P*Y + Q|
00000520: 20 3D 20 30 22 00 2B 0D  A6 4F 99 00 51 0D B0 4F  | = 0".+..O..Q..O|
00000530: 99 22 54 48 45 20 52 45  53 55 4C 54 41 4E 54 20  |."THE RESULTANT |
00000540: 46 41 43 54 4F 52 20 49  53 20 4F 46 20 54 48 45  |FACTOR IS OF THE|
00000550: 22 00 7C 0D BA 4F 99 22  46 4F 52 4D 3A 20 59 5E  |".|..O."FORM: Y^|
00000560: 28 4E 2D 32 29 20 2B 20  42 31 59 28 4E 2D 33 29  |(N-2) + B1Y(N-3)|
00000570: 2B 2E 2E 2E 2B 42 28 4E  2D 32 29 22 00 8A 0D C4  |+...+B(N-2)"....|
00000580: 4F 99 22 57 48 45 52 45  3A 22 00 97 0D CE 4F 81  |O."WHERE:"....O.|
00000590: 4B B2 31 A4 4E AB 32 00  AD 0D D8 4F 99 22 42 22  |K.1.N.2....O."B"|
000005A0: 3B 4B 3B 22 20 3D 20 22  3B 42 28 4B 29 00 B4 0D  |;K;" = ";B(K)...|
000005B0: E2 4F 82 4B 00 BA 0D EC  4F 80 00 00 00 24        |.O.K....O....$  |
....... *** BAIRSTOW.&....     W HAWES.,
.....E.... *** PET USER GROUP.A....     
SOFTWARE EXCHANGE.V....     PO BOX 371..
....     MOTGOMERYVILLE,PA 1936.........
...59468,12...8J.".".X.BJ. PROGRAM SUBMI
TTED BY W. HAWES...LJ. HALIFAX, N.S. CAN
ADA...VJ."PROGRAM BAIRSTOW"...XJ..7. N."
PROGRAM TO SOLVE AN N'TH ORDER".^."N."PO
LYNOMIAL EQUATION OF THE FORM"...$N."Y^N
 + A1*Y^(N-1) +....+AN = 0...&N."WHERE A
1,A2,....,AN ARE REAL..K.(N."BAIRSTOW'S 
ITERATIVE METHOD IS...*N."USED TO YIELD 
SUCCESSIVE...,N."QUADRATIC FACTORS AND T
HE.(..N."RESULTANT REDUCED ORDER.9.0N."P
OLYNOMIAL.?.4N.._.6N."PRESS ANY KEY WHEN
 READY".T.8N.A$:.A$."".20024.}..N."."...
.N."ENTER ORDER N OF POLYNOMIAL";N....NP
.0:Q.0:Z.0.M..N.A(N),B(N),C(N):C(0).1.X.
.N.L.1.N....N."ENTER A";L;:.A(L)....N.L.
...N.:.."..NB(1).A(1).P:B(2).A(2).P.B(1)
.Q.-.JN.K.3.N.M.TNB(K).A(K).P.B(K.1).Q.B
(K.2).T..N.K.W..NC(1).B(1).P:C(2).B(2).P
.C(1).Q....N.K.3.N....NC(K).B(K).P.C(K.1
).Q.C(K.2)....N.K....OCB.C(N.1).B(N.1)..
..ODP.B(N.1).C(N.2).B(N).C(N.3)....ODP.D
P.(C(N.2).C(N.2).CB.C(N.3)). ..ODQ.B(N).
C(N.2).B(N.1).CB.D..ODQ.DQ.(C(N.2).C(N.2
).CB.C(N.3)).V.$OP.P.DP:Q.Q.DQ.N..OM..(D
P)..(DQ):Z.Z.1...8O.".";"ITERATION #";Z;
" ERROR =";M...BO.M..0000001.20320...LO.
20160...`O..I.TO."P = ";P.W.~O."Q = ";Q.
...O.....O."P & Q ARE A QUADRATIC FACTOR
 OF".%..O."THE FORM Y^2 +P*Y + Q = 0".+.
.O..Q..O."THE RESULTANT FACTOR IS OF THE
".|..O."FORM: Y^(N-2) + B1Y(N-3)+...+B(N
-2)"...DO."WHERE:"...NO.K.1.N.2...XO."B"
;K;" = ";B(K)....O.K....O....$
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL