/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / BASIC / UBAS821.ZIP / MAILLET3.UB

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 11 00 0a 00 03 98 00 00 | 4d 41 49 4c 4c 45 54 33 |........|MAILLET3|
|00000010| 0d 44 00 14 00 03 98 00 | 00 43 61 72 6c 69 74 7a |.D......|.Carlitz|
|00000020| 27 73 20 76 65 72 73 69 | 6f 6e 20 6f 66 20 4d 61 |'s versi|on of Ma|
|00000030| 69 6c 6c 65 74 27 73 20 | 64 65 74 65 72 6d 69 6e |illet's |determin|
|00000040| 61 6e 74 0d 7f 00 1e 00 | 03 98 00 00 63 66 2e 20 |ant.....|....cf. |
|00000050| 52 65 76 20 4e 75 6d 62 | 20 54 68 20 4c 65 56 45 |Rev Numb| Th LeVE|
|00000060| 51 55 45 2c 20 43 32 30 | 2d 31 38 20 62 79 20 43 |QUE, C20|-18 by C|
|00000070| 61 72 6c 69 74 7a 20 26 | 20 4f 6c 73 6f 6e 0d b5 |arlitz &| Olson..|
|00000080| 00 28 00 03 98 00 00 73 | 61 6d 70 6c 65 20 6f 66 |.(.....s|ample of|
|00000090| 20 63 61 6c 63 75 6c 61 | 74 69 6f 6e 20 6f 66 20 | calcula|tion of |
|000000a0| 69 6e 74 65 67 65 72 20 | 64 65 74 65 72 6d 69 6e |integer |determin|
|000000b0| 61 6e 74 73 0d d3 00 32 | 00 03 98 00 00 62 79 20 |ants...2|.....by |
|000000c0| 75 73 69 6e 67 20 6d 75 | 6c 74 69 2d 6d 6f 64 75 |using mu|lti-modu|
|000000d0| 6c 6f 0d 02 01 3c 00 03 | 98 00 00 62 65 74 74 65 |lo...<..|...bette|
|000000e0| 72 20 75 70 70 65 72 20 | 62 6f 75 6e 64 20 77 69 |r upper |bound wi|
|000000f0| 6c 6c 20 6d 61 6b 65 20 | 69 74 20 66 61 73 74 65 |ll make |it faste|
|00000100| 72 0d 0b 01 46 00 03 98 | 00 00 0d 2c 01 50 00 03 |r...F...|...,.P..|
|00000110| 80 ad c0 99 22 4d 61 69 | 6c 6c 65 74 27 73 20 64 |...."Mai|llet's d|
|00000120| 65 74 65 72 6d 69 6e 61 | 6e 74 22 0d 37 01 5a 00 |etermina|nt".7.Z.|
|00000130| 03 9f de f1 02 00 0d 73 | 01 64 00 03 a4 84 02 50 |.......s|.d.....P|
|00000140| 50 f1 32 00 29 c2 84 02 | 44 50 f1 32 00 29 c0 98 |P.2.)...|DP.2.)..|
|00000150| 00 00 70 72 69 6d 65 73 | 20 66 6f 72 20 6d 6f 64 |..primes| for mod|
|00000160| 75 6c 75 73 20 61 6e 64 | 20 44 45 54 20 6d 6f 64 |ulus and| DET mod|
|00000170| 20 70 0d 8e 01 6e 00 03 | a7 22 70 72 69 6d 65 20 | p...n..|."prime |
|00000180| 28 50 3e 35 29 22 c1 83 | 02 50 00 c0 99 0d b8 01 |(P>5)"..|.P......|
|00000190| 78 00 03 8d 00 00 83 02 | 50 00 d6 80 d1 83 02 50 |x.......|P......P|
|000001a0| 00 29 8e 99 22 6e 6f 74 | 20 61 20 70 72 69 6d 65 |.).."not| a prime|
|000001b0| 2e 22 c0 87 f1 6e 00 0d | c1 01 82 00 03 a8 80 9a |."...n..|........|
|000001c0| 0d de 01 8c 00 03 83 02 | 4e 00 d1 28 83 02 50 00 |........|N..(..P.|
|000001d0| de f1 01 00 29 e8 f1 02 | 00 de f1 02 00 0d 12 02 |....)...|........|
|000001e0| 96 00 03 a4 82 02 41 00 | 83 02 4e 00 de f1 01 00 |......A.|..N.....|
|000001f0| c2 83 02 4e 00 de f1 01 | 00 29 c2 84 02 57 00 83 |...N....|.)...W..|
|00000200| 02 4e 00 de f1 01 00 c2 | 83 02 4e 00 de f1 01 00 |.N......|..N.....|
|00000210| 29 0d 24 02 a0 00 03 88 | f5 07 43 41 52 4c 49 54 |).$.....|..CARLIT|
|00000220| 5a 58 f2 0d 2b 02 aa 00 | 03 99 0d 49 02 b4 00 03 |ZX..+...|...I....|
|00000230| 99 22 4d 61 69 6c 6c 65 | 74 27 73 20 64 65 74 65 |."Maille|t's dete|
|00000240| 72 6d 69 6e 61 6e 74 22 | 0d 6b 02 be 00 03 99 22 |rminant"|.k....."|
|00000250| 3d 72 65 6c 61 74 69 76 | 65 20 63 6c 61 73 73 20 |=relativ|e class |
|00000260| 6e 75 6d 62 65 72 20 6f | 66 22 0d 8f 02 c8 00 03 |number o|f"......|
|00000270| 99 83 02 50 00 c1 22 74 | 68 20 63 79 63 6c 6f 74 |...P.."t|h cyclot|
|00000280| 6f 6d 69 63 20 66 69 65 | 6c 64 20 69 73 22 0d 9d |omic fie|ld is"..|
|00000290| 02 d2 00 03 99 80 c0 85 | 02 44 00 29 0d a8 02 dc |........|.D.)....|
|000002a0| 00 03 99 c0 99 80 9a 0d | b8 02 e6 00 03 aa 84 02 |........|........|
|000002b0| 57 00 c2 82 02 41 00 0d | bf 02 f0 00 03 bf 0d c8 |W....A..|........|
|000002c0| 02 fa 00 03 98 00 00 0d | d9 02 04 01 03 f5 07 43 |........|.......C|
|000002d0| 41 52 4c 49 54 5a 00 00 | 0d e2 02 0e 01 03 98 00 |ARLITZ..|........|
|000002e0| 00 0d f6 02 18 01 03 98 | 00 00 6d 61 6b 65 20 6d |........|..make m|
|000002f0| 61 74 72 69 78 0d ff 02 | 22 01 03 98 00 00 0d 15 |atrix...|".......|
|00000300| 03 2c 01 03 89 81 02 52 | 00 d1 f0 8a 83 02 4e 00 |.,.....R|......N.|
|00000310| de f1 01 00 0d 2b 03 36 | 01 04 89 81 02 53 00 d1 |.....+.6|.....S..|
|00000320| f0 8a 83 02 4e 00 de f1 | 01 00 0d 75 03 40 01 07 |....N...|...u.@..|
|00000330| 82 02 41 00 81 02 52 00 | c2 81 02 53 00 29 d1 28 |..A...R.|...S.).(|
|00000340| 81 02 52 00 dd f1 03 00 | 29 e5 28 81 02 53 00 dd |..R.....|).(..S..|
|00000350| f1 03 00 29 e8 83 02 50 | 00 de 28 81 02 52 00 dd |...)...P|..(..R..|
|00000360| f1 02 00 29 e5 28 81 02 | 53 00 dd f1 03 00 29 e8 |...).(..|S.....).|
|00000370| 83 02 50 00 0d 92 03 4a | 01 07 99 80 ec f1 02 00 |..P....J|........|
|00000380| 29 c2 82 02 41 00 81 02 | 52 00 c2 81 02 53 00 29 |)...A...|R....S.)|
|00000390| c1 0d 9b 03 54 01 04 8c | c0 99 0d a4 03 5e 01 03 |....T...|.....^..|
|000003a0| 8c c0 99 0d ad 03 68 01 | 03 98 00 00 0d c5 03 72 |......h.|.......r|
|000003b0| 01 03 98 00 00 67 65 74 | 20 75 70 70 65 72 20 62 |.....get| upper b|
|000003c0| 6f 75 6e 64 0d ce 03 7c | 01 03 98 00 00 0d ea 03 |ound...||........|
|000003d0| 86 01 03 85 06 55 62 6f | 75 6e 64 d1 b3 f5 08 48 |.....Ubo|und....H|
|000003e0| 61 64 61 6d 61 72 64 8d | f2 0d f3 03 90 01 03 98 |adamard.|........|
|000003f0| 00 00 0d 10 04 9a 01 03 | 98 00 00 64 65 63 69 64 |........|...decid|
|00000400| 65 20 70 72 69 6d 65 73 | 20 74 6f 20 75 73 65 0d |e primes| to use.|
|00000410| 19 04 a4 01 03 98 00 00 | 0d 4b 04 ae 01 03 83 02 |........|.K......|
|00000420| 50 50 d1 80 de f1 02 00 | ef f1 1f 00 29 c0 85 02 |PP......|....)...|
|00000430| 4d 00 d1 83 02 50 50 c0 | 84 02 50 50 f0 29 d1 83 |M....PP.|..PP.)..|
|00000440| 02 50 50 c0 81 02 50 52 | d1 f0 0d 65 04 b8 01 03 |.PP...PR|...e....|
|00000450| 90 00 00 85 02 4d 00 d4 | f1 02 00 e5 85 06 55 62 |.....M..|......Ub|
|00000460| 6f 75 6e 64 0d 9b 04 c2 | 01 06 83 02 50 50 d1 80 |ound....|....PP..|
|00000470| de 83 02 50 50 29 c0 85 | 02 4d 00 d1 85 02 4d 00 |...PP)..|.M....M.|
|00000480| e5 83 02 50 50 c0 a0 81 | 02 50 52 c0 84 02 50 50 |...PP...|.PR...PP|
|00000490| 81 02 50 52 29 d1 83 02 | 50 50 0d a4 04 cc 01 03 |..PR)...|PP......|
|000004a0| 91 00 00 0d d8 04 d6 01 | 03 99 22 55 73 65 22 c1 |........|.."Use".|
|000004b0| 81 02 50 52 dd f1 01 00 | c1 8d 00 00 81 02 50 52 |..PR....|......PR|
|000004c0| 8e 99 22 70 72 69 6d 65 | 73 3a 22 8f 00 00 99 22 |.."prime|s:"...."|
|000004d0| 70 72 69 6d 65 3a 22 0d | e1 04 e0 01 03 98 00 00 |prime:".|........|
|000004e0| 0d 0e 05 ea 01 03 98 00 | 00 63 61 6c 63 75 6c 61 |........|.calcula|
|000004f0| 74 65 20 64 65 74 65 72 | 6d 69 6e 61 6e 74 20 66 |te deter|minant f|
|00000500| 6f 72 20 65 61 63 68 20 | 70 72 69 6d 65 0d 17 05 |or each |prime...|
|00000510| f4 01 03 98 00 00 0d 29 | 05 fe 01 03 89 81 02 49 |.......)|.......I|
|00000520| 00 d1 f0 8a 81 02 50 52 | 0d 66 05 08 02 06 a2 84 |......PR|.f......|
|00000530| 02 57 00 f0 c3 83 02 4e | 00 de f1 01 00 c2 f0 c3 |.W.....N|........|
|00000540| 83 02 4e 00 de f1 01 00 | 29 d1 a2 82 02 41 00 f0 |..N.....|)....A..|
|00000550| c3 83 02 4e 00 de f1 01 | 00 c2 f0 c3 83 02 4e 00 |...N....|......N.|
|00000560| de f1 01 00 29 0d 8b 05 | 12 02 06 83 02 50 50 d1 |....)...|.....PP.|
|00000570| 84 02 50 50 81 02 49 00 | 29 c0 99 22 44 45 54 20 |..PP..I.|).."DET |
|00000580| 6d 6f 64 22 c1 83 02 50 | 50 c1 0d a5 05 1c 02 06 |mod"...P|P.......|
|00000590| 83 02 44 50 d1 b3 f5 04 | 44 45 54 50 3b f2 28 83 |..DP....|DETP;.(.|
|000005a0| 02 50 50 29 0d c4 05 26 | 02 06 84 02 44 50 81 02 |.PP)...&|....DP..|
|000005b0| 49 00 29 d1 83 02 44 50 | c0 99 22 69 73 22 c1 83 |I.)...DP|.."is"..|
|000005c0| 02 44 50 0d cb 05 30 02 | 03 8c 0d d4 05 3a 02 03 |.DP...0.|.....:..|
|000005d0| 98 00 00 0d f5 05 44 02 | 03 98 00 00 64 65 63 69 |......D.|....deci|
|000005e0| 64 65 20 65 78 61 63 74 | 20 64 65 74 65 72 6d 69 |de exact| determi|
|000005f0| 6e 61 6e 74 0d fe 05 4e | 02 03 98 00 00 0d 10 06 |nant...N|........|
|00000600| 58 02 03 88 f5 07 43 68 | 69 6e 65 73 65 72 f2 0d |X.....Ch|ineser..|
|00000610| 35 06 62 02 03 8d 00 00 | 85 02 44 00 d2 85 06 55 |5.b.....|..D....U|
|00000620| 62 6f 75 6e 64 8e 85 02 | 44 00 d1 85 02 44 00 de |bound...|D....D..|
|00000630| 85 02 4d 00 0d 3c 06 6c | 02 03 95 0d 45 06 76 02 |..M..<.l|....E.v.|
|00000640| 03 98 00 00 0d 88 06 80 | 02 03 f5 04 44 45 54 50 |........|....DETP|
|00000650| 00 00 28 83 02 50 00 29 | c0 98 00 00 20 20 20 20 |..(..P.)|....    |
|00000660| 20 20 20 20 20 20 20 61 | 73 73 75 6d 65 20 65 76 |       a|ssume ev|
|00000670| 65 72 79 20 65 6c 65 6d | 65 6e 74 73 20 3e 3d 30 |ery elem|ents >=0|
|00000680| 20 61 6e 64 20 3c 70 0d | a7 06 8a 02 06 ba 81 02 | and <p.|........|
|00000690| 49 00 c2 81 02 4a 00 c2 | 81 02 4b 00 c2 83 02 44 |I....J..|..K....D|
|000006a0| 50 c2 83 02 41 00 0d ef | 06 94 02 03 83 02 44 50 |P...A...|......DP|
|000006b0| d1 f1 01 00 c0 98 00 00 | 20 20 20 20 20 20 20 20 |........|        |
|000006c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000006d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 64 65 74 |        |     det|
|000006e0| 65 72 6d 69 6e 61 6e 74 | 20 6d 6f 64 20 70 0d 05 |erminant| mod p..|
|000006f0| 07 9e 02 03 89 81 02 4a | 00 d1 f0 8a 83 02 4e 00 |.......J|......N.|
|00000700| de f1 02 00 0d 47 07 a8 | 02 06 89 81 02 49 00 d1 |.....G..|.....I..|
|00000710| 81 02 4a 00 8a 83 02 4e | 00 de f1 01 00 c0 98 00 |..J....N|........|
|00000720| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000730| 20 20 20 20 20 20 20 73 | 65 61 72 63 68 20 6e 6f |       s|earch no|
|00000740| 6e 5f 7a 65 72 6f 0d 66 | 07 b2 02 09 8d 00 00 84 |n_zero.f|........|
|00000750| 02 57 00 81 02 49 00 c2 | 81 02 4a 00 29 8e 94 89 |.W...I..|..J.)...|
|00000760| c0 87 f1 d0 02 0d 6d 07 | bc 02 06 8c 0d 81 07 c6 |......m.|........|
|00000770| 02 06 94 89 c0 83 02 44 | 50 d1 f0 c0 87 f1 48 03 |.......D|P.....H.|
|00000780| 0d 99 07 d0 02 06 8d 00 | 00 81 02 49 00 d6 81 02 |........|...I....|
|00000790| 4a 00 8e b4 83 02 44 50 | 0d d1 07 da 02 08 c0 a5 |J.....DP|........|
|000007a0| a2 84 02 57 00 81 02 49 | 00 c2 81 02 4a 00 c3 83 |...W...I|....J...|
|000007b0| 02 4e 00 de f1 01 00 29 | c2 84 02 57 00 81 02 4a |.N.....)|...W...J|
|000007c0| 00 c2 81 02 4a 00 c3 83 | 02 4e 00 de f1 01 00 29 |....J...|.N.....)|
|000007d0| 0d ea 07 e4 02 06 83 02 | 41 00 d1 84 02 57 00 81 |........|A....W..|
|000007e0| 02 4a 00 c2 81 02 4a 00 | 29 0d 03 08 ee 02 06 83 |.J....J.|).......|
|000007f0| 02 44 50 d1 83 02 44 50 | e5 83 02 41 00 e7 83 02 |.DP...DP|...A....|
|00000800| 50 00 0d 25 08 f8 02 06 | 83 03 49 6e 76 d1 80 db |P..%....|..Inv...|
|00000810| 84 02 57 00 81 02 4a 00 | c2 81 02 4a 00 29 c2 83 |..W...J.|...J.)..|
|00000820| 02 50 00 29 0d 42 08 02 | 03 06 89 81 02 49 00 d1 |.P.).B..|.....I..|
|00000830| 81 02 4a 00 dd f1 01 00 | 8a 83 02 4e 00 de f1 01 |..J.....|...N....|
|00000840| 00 0d 5b 08 0c 03 09 83 | 02 43 00 d1 84 02 57 00 |..[.....|.C....W.|
|00000850| 81 02 49 00 c2 81 02 4a | 00 29 0d 7d 08 16 03 09 |..I....J|.).}....|
|00000860| 8d 00 00 83 02 43 00 8e | 83 02 43 00 d1 83 02 43 |.....C..|..C....C|
|00000870| 00 e5 83 03 49 6e 76 e7 | 83 02 50 00 0d d6 08 20 |....Inv.|..P.... |
|00000880| 03 0b c0 89 81 02 4b 00 | d1 81 02 4a 00 dd f1 01 |......K.|...J....|
|00000890| 00 8a 83 02 4e 00 de f1 | 01 00 c0 84 02 57 00 81 |....N...|.....W..|
|000008a0| 02 49 00 c2 81 02 4b 00 | 29 d1 28 84 02 57 00 81 |.I....K.|).(..W..|
|000008b0| 02 49 00 c2 81 02 4b 00 | 29 de 83 02 43 00 e5 84 |.I....K.|)...C...|
|000008c0| 02 57 00 81 02 4a 00 c2 | 81 02 4b 00 29 29 e7 83 |.W...J..|..K.))..|
|000008d0| 02 50 00 c0 8c 0d dd 08 | 2a 03 06 8c 0d e4 08 34 |.P......|*......4|
|000008e0| 03 03 8c 0d 0f 09 3e 03 | 03 83 02 44 50 d1 83 02 |......>.|...DP...|
|000008f0| 44 50 e5 84 02 57 00 83 | 02 4e 00 de f1 01 00 c2 |DP...W..|.N......|
|00000900| 83 02 4e 00 de f1 01 00 | 29 e7 83 02 50 00 0d 1c |..N.....|)...P...|
|00000910| 09 48 03 03 95 28 83 02 | 44 50 29 0d 25 09 52 03 |.H...(..|DP).%.R.|
|00000920| 03 98 00 00 0d 37 09 5c | 03 03 f5 08 48 61 64 61 |.....7.\|....Hada|
|00000930| 6d 61 72 64 00 00 0d 54 | 09 66 03 03 ba 81 02 49 |mard...T|.f.....I|
|00000940| 00 c2 81 02 4a 00 c2 85 | 06 55 62 6f 75 6e 64 d1 |....J...|.Ubound.|
|00000950| f1 01 00 0d 6a 09 70 03 | 04 89 81 02 49 00 d1 f0 |....j.p.|....I...|
|00000960| 8a 83 02 4e 00 de f1 01 | 00 0d 76 09 7a 03 07 85 |...N....|..v.z...|
|00000970| 02 57 00 d1 f0 0d 8c 09 | 84 03 07 89 81 02 4a 00 |.W......|......J.|
|00000980| d1 f0 8a 83 02 4e 00 de | f1 01 00 0d ae 09 8e 03 |.....N..|........|
|00000990| 0a 85 02 57 00 d1 85 02 | 57 00 dd 82 02 41 00 81 |...W....|W....A..|
|000009a0| 02 49 00 c2 81 02 4a 00 | 29 ef f1 02 00 0d b5 09 |.I....J.|).......|
|000009b0| 98 03 07 8c 0d d1 09 a2 | 03 07 85 06 55 62 6f 75 |........|....Ubou|
|000009c0| 6e 64 d1 85 06 55 62 6f | 75 6e 64 e5 85 02 57 00 |nd...Ubo|und...W.|
|000009d0| 0d d8 09 ac 03 04 8c 0d | ec 09 b6 03 03 95 28 80 |........|......(.|
|000009e0| c6 85 06 55 62 6f 75 6e | 64 29 29 0d f5 09 c0 03 |...Uboun|d)).....|
|000009f0| 03 98 00 00 0d 06 0a ca | 03 03 f5 07 43 68 69 6e |........|....Chin|
|00000a00| 65 73 65 00 00 0d 11 0a | d4 03 03 ba 81 02 49 00 |ese.....|......I.|
|00000a10| 0d 2e 0a de 03 04 85 02 | 4d 44 d1 84 02 50 50 f0 |........|MD...PP.|
|00000a20| 29 c0 85 02 44 00 d1 84 | 02 44 50 f0 29 0d 42 0a |)...D...|.DP.).B.|
|00000a30| e8 03 04 89 81 02 49 00 | d1 f1 01 00 8a 81 02 50 |......I.|.......P|
|00000a40| 52 0d 65 0a f2 03 07 83 | 02 50 50 d1 84 02 50 50 |R.e.....|.PP...PP|
|00000a50| 81 02 49 00 29 c0 83 02 | 44 31 d1 84 02 44 50 81 |..I.)...|D1...DP.|
|00000a60| 02 49 00 29 0d 81 0a fc | 03 07 85 02 57 00 d1 80 |.I.)....|....W...|
|00000a70| db 85 02 4d 44 c2 83 02 | 50 50 29 e5 85 02 4d 44 |...MD...|PP)...MD|
|00000a80| 0d 95 0a 06 04 07 85 02 | 4d 44 d1 85 02 4d 44 e5 |........|MD...MD.|
|00000a90| 83 02 50 50 0d c0 0a 10 | 04 07 85 02 44 00 d1 28 |..PP....|....D..(|
|00000aa0| 83 02 44 31 e5 85 02 57 | 00 dd 85 02 44 00 e5 28 |..D1...W|....D..(|
|00000ab0| f1 01 00 de 85 02 57 00 | 29 29 e7 85 02 4d 44 0d |......W.|))...MD.|
|00000ac0| c7 0a 1a 04 04 8c 0d ce | 0a 24 04 03 95 0d 00 00 |........|.$......|
+--------+-------------------------+-------------------------+--------+--------+