More changes. Still embryonic.
[u/mdw/catacomb] / tests / mpx
CommitLineData
1d724f3f 1# Test vectors for low-level MP functions
2#
a86e33af 3# $Id: mpx,v 1.3 1999/12/10 23:26:40 mdw Exp $
1d724f3f 4
5# --- Load-store tests ---
6#
7# The test loads each number, as both big- and little-endian, and compares it
8# against the original octet version using a different method. It then
9# stores the value to another octet array and compares. This is done for
10# various sizes of MP, to ensure that truncation works correctly.
11
12load-store {
13 "";
14 00;
15 0123;
16 0123456789abcdef0123456789abcdef0123456789ab;
17 00000123456789abcdef01234789abcdef0123456789ab;
18 0123456789abcdef23456789abcdef0123456789ab0000;
19 80f8c5606bff51bac932859a4fb6331c4023b32b65cd95f4edc1d1c919fcc078;
20 522f8b1de257972a25ec49c9ff56340e2684e847ef2fa4d5714d7c8d454e90f6;
21}
22
23# --- Shift tests ---
24
25lsl {
26
27 # --- Simple sanity checks ---
28
29 01 2 04;
30 01 4 10;
31
32 # --- Copy shifts ---
33
34 01 0 01;
35 0123456789abcdef0123456789abcdef 0 0123456789abcdef0123456789abcdef;
36
37 # --- Single bit shifts ---
38
39 01 1 02;
40 ff000000 1 01fe000000;
41
42 # --- Word-size shifts (assumes 32-bit words) ---
43
44 0123456789abcdef0123456789abcdef 32
45 0123456789abcdef0123456789abcdef00000000;
46
47 # --- Random tests ---
48
23de8bae 49 13bbec3a734e0b8b5155600b0826b913 90
50 4eefb0e9cd382e2d4555802c209ae44c0000000000000000000000;
1d724f3f 51
23de8bae 52 d6ca6a99fe49b256f80e9643e2bd4f3e 80
53 d6ca6a99fe49b256f80e9643e2bd4f3e00000000000000000000;
54
55 c94784b40d54de614084915915531ddc 59
56 064a3c25a06aa6f30a04248ac8aa98eee000000000000000;
57
58 a63c314a39cc37f950b3d530c95ead00 84
59 0a63c314a39cc37f950b3d530c95ead00000000000000000000000;
1d724f3f 60
23de8bae 61 842d03a339f5004cfd311e2bb23216ac 62
62 210b40e8ce7d40133f4c478aec8c85ab0000000000000000;
1d724f3f 63
23de8bae 64 9a8e659739bf9ee7aa908b7c058c5e7e 123
65 04d4732cb9cdfcf73d54845be02c62f3f0000000000000000000000000000000;
1d724f3f 66
23de8bae 67 287f5774f212db87bcd83a1bbb7b1ad5 6
68 0a1fd5dd3c84b6e1ef360e86eedec6b540;
1d724f3f 69
23de8bae 70 ec1739174d9d4438d3093cf378605a5c 63
71 760b9c8ba6cea21c69849e79bc302d2e0000000000000000;
1d724f3f 72
23de8bae 73 3dfa8ad6a60a783639d05aa5fbfd993d 46
74 0f7ea2b5a9829e0d8e7416a97eff664f400000000000;
1d724f3f 75
23de8bae 76 e4e93a80b6d25b34c23aca3a0d06d76c 63
77 72749d405b692d9a611d651d06836bb60000000000000000;
1d724f3f 78
23de8bae 79 5a4cf5becb4b64a1a31637c91b6415fd 102
80 16933d6fb2d2d92868c58df246d9057f40000000000000000000000000;
1d724f3f 81
23de8bae 82 d92f60928b67416c1e20bd9e09026115 69
83 1b25ec12516ce82d83c417b3c1204c22a00000000000000000;
1d724f3f 84
23de8bae 85 eae78f56200d7734f7eb68479fe09d51 18
86 03ab9e3d588035dcd3dfada11e7f8275440000;
1d724f3f 87
23de8bae 88 4c9c215ead951513d969d66614016f6e 28
89 04c9c215ead951513d969d66614016f6e0000000;
1d724f3f 90
23de8bae 91 5cb1e4d625eac0393644fe6a7e3ff788 33
92 b963c9ac4bd580726c89fcd4fc7fef1000000000;
1d724f3f 93
23de8bae 94 68b23795968766c77b1897c88a5d6ba8 78
95 1a2c8de565a1d9b1dec625f222975aea00000000000000000000;
1d724f3f 96
23de8bae 97 3d96cd168c74f9015afb691d629f3f6d 72
98 3d96cd168c74f9015afb691d629f3f6d000000000000000000;
1d724f3f 99
23de8bae 100 38fa8f63dc426399e0f9b5c01231e02c 95
101 1c7d47b1ee2131ccf07cdae00918f016000000000000000000000000;
102
103 90176b493061899ec95677ccc58b8cdf 78
104 2405dad24c186267b2559df33162e337c0000000000000000000;
105
106 0706e95da68f32a4231ab184d16cbff7 33
107 0e0dd2bb4d1e654846356309a2d97fee00000000;
1d724f3f 108}
109
110lsr {
111
112 # --- Simple sanity checks ---
113
114 04 2 01;
115 10 4 01;
116
117 # --- Copy shifts ---
118
119 01 0 01;
120 0123456789abcdef0123456789abcdef 0 0123456789abcdef0123456789abcdef;
121
122 # --- Single bit shifts ---
123
124 02 1 01;
125 01fe000000 1 ff000000;
126
127 # --- Word-size shifts (assumes 32-bit words) ---
128
129 0123456789abcdef0123456789abcdef 32
130 0123456789abcdef01234567;
131
132 # --- Random tests ---
133
23de8bae 134 eb4f57af83f78c0d67b3a6ad84e62378 120
135 eb;
1d724f3f 136
23de8bae 137 c6a207d80522139f1fe168028d6afa8c 45
138 0635103ec029109cf8ff0b;
1d724f3f 139
23de8bae 140 6027a129cf726a80445bf42a310ecd30 51
141 0c04f42539ee4d50088b;
1d724f3f 142
23de8bae 143 fb0cc20512774733c783bfea0ea3b503 36
144 0fb0cc20512774733c783bfe;
1d724f3f 145
23de8bae 146 4f9884d0ec9fc9e3be6ac15382803eaa 107
147 09f310;
1d724f3f 148
23de8bae 149 e47895de118466ac7b16188284b35fb9 55
150 01c8f12bbc2308cd58f6;
1d724f3f 151
23de8bae 152 22dfd1386bd2a5c4b6da0d619485e735 10
153 08b7f44e1af4a9712db68358652179;
1d724f3f 154
23de8bae 155 489fab826eb8ce9f41084c2b4ea3bb25 117
156 0244;
1d724f3f 157
23de8bae 158 f6f7735e7d89edfa05482a6b19b1d7b6 53
159 07b7bb9af3ec4f6fd02a;
1d724f3f 160
23de8bae 161 bd4eda78b316190a28840f382a90bc63 80
162 bd4eda78b316;
1d724f3f 163
23de8bae 164 af9f01ddcecf1d21b0af4c318df98e4f 39
165 015f3e03bb9d9e3a43615e98;
1d724f3f 166
23de8bae 167 64d53464e8524ef2529389b14f2b9940 19
168 0c9aa68c9d0a49de4a52713629e5;
1d724f3f 169
23de8bae 170 ce49d3be79896131d044f41274ff13ee 99
171 19c93a77;
1d724f3f 172
23de8bae 173 25a05fcae2ed3d9e2486cd633bd51070 18
174 096817f2b8bb4f678921b358cef5;
1d724f3f 175
23de8bae 176 8a29be64acc97626d097231c4f3df4aa 82
177 228a6f992b32;
1d724f3f 178
23de8bae 179 ac27fc4590675fb16ecfbf774dc8e591 14
180 02b09ff116419d7ec5bb3efddd3723;
1d724f3f 181
23de8bae 182 b72f02eb26b965133db98adcedfe1e37 44
183 0b72f02eb26b965133db98;
1d724f3f 184
23de8bae 185 afc634103a039f37b8f9f98b1d94ac85 52
186 0afc634103a039f37b8f;
1d724f3f 187
23de8bae 188 f670a78a3801b81e0a00e5b5deb81a47 57
189 7b3853c51c00dc0f05;
1d724f3f 190
23de8bae 191 3a1d23d0d00fa4e165ba2b54eccd8f8d 92
192 03a1d23d0d;
1d724f3f 193}
194
195# --- Arithmetic tests ---
196#
197# For each of the fundamental operations, there's a sequence of simple tests
198# which ensure that the functions are working even slightly correctly. Then
199# there are some tests aimed at limit conditions in the algorithm. Finally,
200# some random tests dreamed up by the Perl script `mpx-gen.pl' are given.
201
202uadd {
203
204 # --- Simple sanity checks ---
205
206 00 00 00;
207 00 01 01;
208 01 00 01;
209
210 # --- Carry propagation tests ---
211
212 ffffffffffffffffffffffffffffffffffffffffffffffffffffffff
213 01
214 0100000000000000000000000000000000000000000000000000000000;
215
216 01
217 ffffffffffffffffffffffffffffffffffffffffffffffffffffffff
218 0100000000000000000000000000000000000000000000000000000000;
219
220 7f7f7f7f7f7f7f7f7f7f7f7f7f7f7f80
221 80808080808080808080808080808080
222 0100000000000000000000000000000000;
223
224 # --- Random data tests ---
225
23de8bae 226 272724be3cc4179a4b387bcd1acf24e1107be9bbb4dbd68408303df3537c83e0
227 c80ff7173b00d75c83bb38948118fecd9c16ec3bc2d5d051057a1ad8dbfa3349
228 ef371bd577c4eef6cef3b4619be823aeac92d5f777b1a6d50daa58cc2f76b729;
229
230 257099bff6868847d89969cfc691e1f5e0af7516360493a8dae919704eea7385
231 b4408b380c648d50175dfa8b9c1d8aa68f71f67b540045ed3f92f2aa19145cb2
232 d9b124f802eb1597eff7645b62af6c9c70216b918a04d9961a7c0c1a67fed037;
233
234 11978446632ed887ce26aeabf9997a9ae9600da7cb6d431e6ab5dc932b427eec
235 652931ca2eb81d3113453615d16e60de08b3777a6060d7f1775c916253b1e666
236 76c0b61091e6f5b8e16be4c1cb07db78f21385222bce1b0fe2126df57ef46552;
237
238 73d3697b4f886a8b242c21cb39151055937f36a6000849d0d1e526ce666a7d52
239 209e8d770ab7352e5441f74af428a2e9b791dabb655fd78d8a722055e896d7fe
240 9471f6f25a3f9fb9786e19162d3db33f4b1111616568215e5c5747244f015550;
241
242 3e47ae33e633861903e0960b1ef8c8c8900a659cb3e03a1cf1ba04eed5e3f93d
243 b844b1b685b21fce078e0db2b960e22dd1e81aac33062b6d9ed1ab68b8cbbd67
244 f68c5fea6be5a5e70b6ea3bdd859aaf661f28048e6e6658a908bb0578eafb6a4;
1d724f3f 245
23de8bae 246 23156b15f2b9a6598b6703cda3177d7432016bb388989d5e33a5cb8778aca38f
247 77197a3167c282ed511bf0eb865be89624e4b5e1e9dd4b7d44acd59d41287639
248 9a2ee5475a7c2946dc82f4b92973660a56e621957275e8db7852a124b9d519c8;
1d724f3f 249
23de8bae 250 ed61746de1ab76f33cf25878088b24a389d79ecd65df792954a5788a887982a7
251 b673af9ad91712c6d64f05cc14fbd503b04345aca5695ef26cad9ca1f1460496
252 01a3d52408bac289ba13415e441d86f9a73a1ae47a0b48d81bc153152c79bf873d;
1d724f3f 253
23de8bae 254 46a147c2b345b5ba782b600d1811975cd6a75b9bb6fa6db6bd8c594ecead30b3
255 3dff366370a27aef1ec46b32c4946f90ef75c7263f71703be87074ba18705391
256 84a07e2623e830a996efcb3fdca606edc61d22c1f66bddf2a5fcce08e71d8444;
1d724f3f 257
23de8bae 258 a1756514e2f8c5805538ad1b85bafebeb1d4ba9c61d19fbf2f286518eeac08fe
259 4646f60744b71c5d7e2a5f66250e0295fc6ddf5acae1f2397ad37403a6881e24
260 e7bc5b1c27afe1ddd3630c81aac90154ae4299f72cb391f8a9fbd91c95342722;
1d724f3f 261
23de8bae 262 cf5f959a7c1d3d0027f62303d4a517bd5acadde74db6f18bee67aed2ee1bbb23
263 76e38874ce5c3b7fe616b20f2ace6cf550190d9bad4b2fd80bf6deaff8a329c5
264 0146431e0f4a7978800e0cd512ff7384b2aae3eb82fb022163fa5e8d82e6bee4e8;
1d724f3f 265
23de8bae 266 1dee3d9ad0cc6212e5843a57d736fad4675c422efbbac6d625a0f45ee90b7d73
267 d6df29c49292fe633ec60e597d0c5688eb0ba6c134b7c041689fed3e72535c55
268 f4cd675f635f6076244a48b15443515d5267e8f0307287178e40e19d5b5ed9c8;
1d724f3f 269
23de8bae 270 3ba228e4e40cb50141845ae8b7318b43c6643765ace7ce83a069f1787ece6058
271 06b3792dbbde4db5f47be20035524962224fdaa18be7dd9eda23f1671e6ad33d
272 4255a2129feb02b736003ce8ec83d4a5e8b4120738cfac227a8de2df9d393395;
1d724f3f 273
23de8bae 274 e7ff758bb68a5a6106962113f72f9705dc0641ad029741f7c57a5320d030ad32
275 7fd185b393c432dba9892a0b67aa12a85be6e1643cdfe8404963fe92f4f668bb
276 0167d0fb3f4a4e8d3cb01f4b1f5ed9a9ae37ed23113f772a380ede51b3c52715ed;
1d724f3f 277
23de8bae 278 a5bb634cb6ffda70661189874605f802cc34a8960a137130f238638d9a9e72c1
279 ddccdab554733987e04a5aa8674b5eba27f594f37cdec51b3b5745dfa159aab7
280 0183883e020b7313f8465be42fad5156bcf42a3d8986f2364c2d8fa96d3bf81d78;
1d724f3f 281
23de8bae 282 76888f3fc82690a4681e30b5f94efd08d03b7eb1c814ed01cde866847e3c75a4
283 78d0869abb1b1fafc582ccd8bb0c27d7ba51de9832d3b0cd8ca366d27d268788
284 ef5915da8341b0542da0fd8eb45b24e08a8d5d49fae89dcf5a8bcd56fb62fd2c;
1d724f3f 285
23de8bae 286 24fbb9214449c926753d15573ca07552ff219c97c43824182a6dbabed6872610
287 be3795a426052f168129345d33c6dded8ae8de0e0cbdbcc7c2b3f3386031b548
288 e3334ec56a4ef83cf66649b4706753408a0a7aa5d0f5e0dfed21adf736b8db58;
1d724f3f 289
23de8bae 290 97b74ea8ef087496a84b73ee7d8713a13a511f40cc9a19f613a10891774fbc9a
291 fe8dd31272be1f79ee524d736c7fbd3a2c1718b918b072025612a1f2176cf53b
292 01964521bb61c69410969dc161ea06d0db666837f9e54a8bf869b3aa838ebcb1d5;
1d724f3f 293
23de8bae 294 66a6b572a25f6f97ec5b7e7e393bfd686b69c083cd673feab076b9923133a46a
295 e7b501c43dafc08bc521b15be8a1ca9dffe174c282111ea9eb0bac34fd0584b7
296 014e5bb736e00f3023b17d2fda21ddc8066b4b35464f785e949b8265c72e392921;
1d724f3f 297
23de8bae 298 59a803f729f14d54c35de20cdf9ce5b8e2f430016448c80e9d3e2ec608f8bd67
299 7a5a9cf43d1d70e200c5bc7baf4dad57e5892866bb3ced09eb0ed096214509b3
300 d402a0eb670ebe36c4239e888eea9310c87d58681f85b518884cff5c2a3dc71a;
301
302 d26914575527153ca24945f0e83df5b0480c8840e1e6807b71d008068b082c7d
303 281c235d8f8773649c75baba0c302f99f3c526c971cf3daf976deba0bdb3f38f
304 fa8537b4e4ae88a13ebf00aaf46e254a3bd1af0a53b5be2b093df3a748bc200c;
1d724f3f 305}
306
307usub {
308
309 # --- Simple sanity tests ---
310
311 01 00 01;
312 02 01 01;
313 05 03 02;
314
315 # --- Carry propagation tests ---
316
317 0100000000 01 ffffffff;
318 010000000000000000 01 ffffffffffffffff;
319
320 # --- Random data tests ---
321
23de8bae 322 a024729f63161b8fbb711008eb863b9e2044a77ccc7bccf19437471e51a4beec
323 9239ec16929055e3a156768fa1432c56d997ba51c1efbed4c791f062d95641a5
324 0dea8688d085c5ac1a1a99794a430f4746aced2b0a8c0e1ccca556bb784e7d47;
325
326 8ab8ea06c7afbdfe6636590f748fdd376a2dd9c708e7923541e134687fbfd526
327 8896da6b7c98b78a0ea2c9cae23d7065a94daea56d1c919a7db2583da936bd8d
328 02220f9b4b17067457938f4492526cd1c0e02b219bcb009ac42edc2ad6891799;
329
330 fedfecaf26399ad6eda68c7c5cada4aed095e82182e3df696cae47e521c382a4
331 7510069be2896480db0beedc6c5497e79bd7ac5e9fc14bf9ca460c7f99aa6834
332 89cfe61343b03656129a9d9ff0590cc734be3bc2e322936fa2683b6588191a70;
1d724f3f 333
23de8bae 334 ffb81ed18909fda98730e146735c21d3914122faf84882dc688237371825739b
335 d7eb8f85d95888d2c4dc7b9fbbe689e2ce529f8870b2487ce28d192ef3ac2317
336 27cc8f4bafb174d6c25465a6b77597f0c2ee837287963a5f85f51e0824795084;
1d724f3f 337
23de8bae 338 c3c2c77bc0867d30c58c1eb786ab7feed60f9e0e2dcfd6ed97725fff364c7b5b
339 a936ff836dd8dd063ab05e4fc7176e8c05a45ddaa7f701e4184b4fd371ce968a
340 1a8bc7f852ada02a8adbc067bf941162d06b403385d8d5097f27102bc47de4d1;
1d724f3f 341
23de8bae 342 ef76a6e2dc6ba3317dcec6e338a20cf12eb852388204efe290a3b1536f6b198b
343 3eb8d18b7903d682d713859f258ddbc13aae32392a4267b0cd1481c036ab5baf
344 b0bdd5576367ccaea6bb41441314312ff40a1fff57c28831c38f2f9338bfbddc;
1d724f3f 345
23de8bae 346 5cf09a0f0488a077e2983b4a854c28fc7a11f7befc196824f7990fadacfc26db
347 0f46fbc396b81c512b7a0ec003759de05a967101a3ec50b7cbf84f42708f396c
348 4da99e4b6dd08426b71e2c8a81d68b1c1f7b86bd582d176d2ba0c06b3c6ced6f;
1d724f3f 349
23de8bae 350 ea9b202602ad3219e3d3a8fbaf042c3cec8a3d7f16923855b0ae67b8ebf57b50
351 850568cdebe8fe9f91c3d8bb4bc525158bd8590b235f46d6d556bf969e2f24f4
352 6595b75816c4337a520fd040633f072760b1e473f332f17edb57a8224dc6565c;
1d724f3f 353
23de8bae 354 fab03a9f849f408b4af55746316f8e3a81c6359b3c3ba1ebd1d8b9e7a983a03b
355 a60ecaf59c0c7d0ce3ef4d6d9006880efc9c6e0edcafbf7291b009e7b3cb03e4
356 54a16fa9e892c37e670609d8a169062b8529c78c5f8be2794028affff5b89c57;
1d724f3f 357
23de8bae 358 ef7de9bf497c4c47d323a379a42789925606f700e786622b280aec1ee6e13901
359 8a4197e881f1d2f6a09296e6d826ea628aec658b4bf7e9c436ab7e70746c4c87
360 653c51d6c78a795132910c92cc009f2fcb1a91759b8e7866f15f6dae7274ec7a;
1d724f3f 361
23de8bae 362 9cf0d943545ee18ca59af6f547cfb45de41b1d52c996f482728fe68993d3a966
363 58ad4b10fc09cf4f4f4a1488e36ed3beb0a2a9e8c8ec042aba113b2144ff1939
364 44438e325855123d5650e26c6460e09f3378736a00aaf057b87eab684ed4902d;
1d724f3f 365
23de8bae 366 3e0e637d1f4ff5b6d58549f8011ae0a885bbdcb5c478777417e6293c108c7c0c
367 09e06b0b986110817123a2a5aad0c178bac3005315628424d849216a43b71ac4
368 342df87186eee5356461a752564a1f2fcaf8dc62af15f34f3f9d07d1ccd56148;
1d724f3f 369
23de8bae 370 c3b4cb636f76027a876150753e266774af9350d3e68713adcc39cff5e389e285
371 a4abec0b5d38bc91310f3b9e3e12d0c4af2984ba710a6309544340ac3c94e121
372 1f08df58123d45e9565214d7001396b00069cc19757cb0a477f68f49a6f50164;
1d724f3f 373
23de8bae 374 175402d43706fcdb3caf41cd8de6822447e39f3a0ed2f00d4d315a1cc03b5bfa
375 0ffd7d0692776dbce6e112902472edba5ec4c1500412d9bcd24472da90889b7e
376 075685cda48f8f1e55ce2f3d69739469e91eddea0ac016507aece7422fb2c07c;
1d724f3f 377
23de8bae 378 f6060bfae1e558606d44496967e0eafe805e6f60d1c4a8f886574c9d6c6989da
379 e933391716ffc61eda9c547e7bdd41799ecc56e05178ebd7e2068d32467aace6
380 0cd2d2e3cae5924192a7f4eaec03a984e1921880804bbd20a450bf6b25eedcf4;
1d724f3f 381
23de8bae 382 cfd8ba6b7173b72451f370c7a7dad7754ea2323e52f622c1490ff2d3ccf5753e
383 b4e23f1700a3fe1d5f0465cf3666235f1c7460ffebce87c8b8d551ceab09ed1b
384 1af67b5470cfb906f2ef0af87174b416322dd13e67279af8903aa10521eb8823;
1d724f3f 385
23de8bae 386 ebf9500e9cda50607204618fa6cf2f29f2e0af023237034f1a3e72787364370d
387 0e826c97712e73f32d850d4cf63925fe8c8ed86396350432b9971900a4068cbe
388 dd76e3772babdc6d447f5442b096092b6651d69e9c01ff1c60a75977cf5daa4f;
1d724f3f 389
23de8bae 390 c4f9d29310ea767aa8dd0af418447dd3dc2c220c48591f99b6dbf0521f7a5640
391 6d72f5441ca9dbafcbf4db9701d6c667c1d5376251de09468e3efbf1fb04cd95
392 5786dd4ef4409acadce82f5d166db76c1a56eaa9f67b1653289cf460247588ab;
393
394 91af1ae9122ba385deae3f9b478c8270a2d2221396fb3639b44e06e3a1ae9817
395 08966b342d42332d2155fe03fef2d3f84b415d1fda1168a5c63d0f9b86b77cce
396 8918afb4e4e97058bd5841974899ae785790c4f3bce9cd93ee10f7481af71b49;
397
398 976e1fa5146093d794691c63d1aff7ceb5851bb6196909eb51fbe4640829b208
399 1e8a3a0a9050c307cd94a65793371f88eebe42ae8893b1ff984357d597c884d1
400 78e3e59a840fd0cfc6d4760c3e78d845c6c6d90790d557ebb9b88c8e70612d37;
1d724f3f 401}
402
403umul {
404
405 # --- Simple sanity tests ---
406
407 01 00 00;
408 00 01 00;
409 01 45 45;
410 45 01 45;
411
412 # --- Random tests ---
413
23de8bae 414 4162c300b3e157e9cd1301d499c20121
415 10549901fc6dcb85882440087bd398ff
416 042bc7ac8fe08ceefb098f286cdd84fd037906ead144324e361c488a221db7df;
417
418 f4c0a35591d6567a3ead2846f4350141
419 58bb07247f8a7591b7acfa727118ad8d
420 54d507b0e32175976a30766da14de0726a8ffbdc7ef0291a7389759422229dcd;
1d724f3f 421
23de8bae 422 5d0965f58c9d794ca477ca2349900193
423 2cbff5f50dbae1965e3aec1108c36d17
424 104360ec53eef2e669285143dc0d01c9ccf31a77dc302bf8d45356feb794bb35;
1d724f3f 425
23de8bae 426 1a438b12e1babb4c68ae4606694fd1be
427 5bac6d40fdea39c2f1f6ce285f028d36
428 0967b3069413a0fac34c03fdf67e2f5187232be344bbc6011849688052d7e414;
1d724f3f 429
23de8bae 430 59e648d1f656407efc7c9b622de6bc6f
431 0dd07d6e4dc035816236aa0cd512e424
432 04d9e8da01ea1a42b1b9670a4a14694cd104406f346a0598b65e0ae58f135b9c;
1d724f3f 433
23de8bae 434 55c69d7a662a945e6a535911e7abdfc4
435 9883a7ea2c89f5a873b5bae63cf5ac73
436 331a0a66497eb713fb09b260f8774aa97765c13bb040d7917a4b7cb9a321350c;
1d724f3f 437
23de8bae 438 bb15812991a5a01c6e803475d5f2f1c8
439 66782adade0952e8ab51a2fda6a5f611
440 4ae262dc95488914177d07869caf42dd008ecfc3c092df3007fca8702f603e48;
1d724f3f 441
23de8bae 442 b06a37683348e8e46ccd954ff0348a82
443 e158b834e442cf83aa863dde751525b7
444 9b4a7e266b977f83598e6288efafd0f517d9658a2bda86adec7e1835143dccee;
1d724f3f 445
23de8bae 446 b7f66a5ca27d276bdbad5995aac0f676
447 8f05519b9acbe85369aad7a865a0bc5e
448 66c677de9ba98e4c527c86b80ad1485c41782c3e0be53dba2f547fa0ff992754;
1d724f3f 449
23de8bae 450 b7f43225f41056548b095f359b6a3b83
451 966a8ba6772991700ead0e01bde39120
452 6c15a4d835ec2367ec41c566ce63a098c496aec8a5b041fc7c91e6601525a360;
1d724f3f 453
23de8bae 454 87277faca81e1bb28e0e24e4bbf5e8c3
455 5f126e08716855110489045453e69dcc
456 3231633f7a7eb05793df2c7761d793a634faeb021fda1a404f05b2edefe71264;
1d724f3f 457
23de8bae 458 3358074e192e79ba42c186ead80404a9
459 dc1df51ac8c3328107638e83b17f777a
460 2c25a8688faf32cb8b1d4b454cd4a2ad1130df69188cd2ec44cc8806f8ebc78a;
1d724f3f 461
23de8bae 462 7ad1d7a04f7588af0ff7bf29c13533c9
463 0785d4d4d5f1d25aa6dcf744662ab2d6
464 039bf2064b716e3befa638d510131596518b1d91833200ba19ae6aff15750c06;
1d724f3f 465
23de8bae 466 8b8a4c2ef785abd1607b663b3088e37c
467 fcc67dfa767e06d97cfd5341ded07e42
468 89c854a034d2cc29ebb34f379d6a74a9996d261774b1e7ba965e98204001adf8;
1d724f3f 469
23de8bae 470 1c9ea6a1b9aba96124dd8abfd3dd78b1
471 93ecdfc3f4c188819e777f082b77e4c6
472 108994f4961164206f1a97cc0f39edc29faf2bad99d164fc60c06ccff20ffce6;
1d724f3f 473
23de8bae 474 c6d9a8a4760fffb11ac2d38b62f62a89
475 c0989f4e8aabd21f7a2b38ec27afb783
476 9599cb75abf86c37db000858bd671992ecde9d440cc765855287391f8f06b31b;
1d724f3f 477
23de8bae 478 5d48ba3dba86c0e9d3922cab8d88c5b7
479 5186010a8c3fc4e3499534669a13f219
480 1db4d7602500cc34de718d5892f79db44096a6c6705cf6e9ca8b438cdfd74cdf;
1d724f3f 481
23de8bae 482 d009f15fd77915f113e471884e464462
483 cad68bffeb24842cc083f5496b10e36a
484 a4d6328ac530f0615ca3b0aebeaf104960e120609c58710eee206cc3f3db3694;
485
486 343f0033e5648741936c20439bf044c3
487 9b26545821fb1270515566d970e566bb
488 1fa9f7b01c40607bdc8f554e57555de879784cdb1eebfcc3a75918d27656ec71;
489
490 08d95fc1d6dd6b9423c7bb033598df0c
491 6c03f5958677efd383509141bf257375
492 03bbd76f19ba19e3f255c24063f6384d4ac913d9e582392589a525195bcc547c;
a86e33af 493
494 # --- Karatsuba regression ---
495 #
496 # This bug was caused by kmul (a) choosing the split point too low on
497 # odd-sized inputs and (b) not allocating enough workspace.
498
499 21a9269d7b8b63cf18faa933b3c868ba1e8cb3f00b57e197709abf96eeb9bf12e8fe22b3
500 0144c992b68e3ca712678215d5bc968702ccfea17717737ba501a38d26fa5091ba
501 2ab495f91afd7c36f85ece6fd58577f995de88d62a98a07c6d9e3500ae67b0f100bc709d1f30894662774d0cadfba091788c427cc6f4bacb26e42cf92f6e4494e03c990e;
502
503 # --- Larger number tests for Karatsuba ---
504
505 416e63549e2cf08fb225058b3545cb4a47cbf9
506 de38c473c27f7bdef02a084192b3e17f435cf7
507 38cc3c7f360737411df7b52a222a3672c6e0d39f0a868479176a6143e1129d44d5aa61be493f;
508
509 aa20b1355073f21c57530d2f90bc40e47ac463
510 8315dfa60e97ff3dab7a6f61fcec2cd5b6f127
511 571d43fda6ce14a78534ac72c50b58738d62630766a59a7cec1a63433e499b1b5eac5ef71e15;
512
513 f641594177c8c364d922c659a8f7ae0460c7d74b266c8cc258ad5f
514 5948dd29fc5172c37c31da6957779a1bebe452d8deba26c5d3d390
515 55e2cf27aa49f938584dca4044d944077e226206c6f8c7688e8760f3b5c106413fd0ef4b63a97991da86fd113ff4822a41f76913d270;
516
517 a4170f55dfa135c4bdd3a921a8c1567eebc6b799fb62b0dd27b089
518 7b7d619e07a5d01427348c05605f67196b2923b074787c375977ac
519 4f277232c75290f0c5fed384dba2aaa23fe4a360ea63ee45fb6c0134b36a09a9163f3c767d498b8dcd31e5deaef386d4a9b7d85b4b0c;
520
521 250e7a0c7035df81429572d3f772720e723b710d54b9eb5f16814117980f0559bf12b82e00c5b3904e
522 1be3c88b01ce53a70c12f74dcc247823846ac6c06a9cb41b86794900006045f05e29da23b81523aa9f
523 04097fbcf75616fef7b6b91680963f7e0cf1bf72bc5f453e46136fc92b20ae8a30d7ae7965f8271de854442b93562ebaa9ee09fba4a7b79ef8b26718b12424419dc301496dc0d6cfb04e4f7a3a3729046c72;
524
525 af3148a72dcf1340f6b5a3b2fc1cacd7e6f9e60a13de5c91c37bb850f0e930683c2dc96882a9f62b76
526 48603cc656908b34c70ed826da8c3414d5845100f53cb6f9f370a4c7708a9b8ffd787537048f89493a
527 3187b8818bf644805c880d189bbf606ca23e01431cf5b3b633db48a1202aa346f6a0e3958c7264fa1de2d92660345e820f4f3659cf0040a28fb9b725f7ab83610c9c056062326f776ce871696eede0507ebc;
528
529 0b1cc934a2f6244b93c8ac10881de20349d133642ac19fa0be3acacbf4429d0ec7bbad2f41534a693647b7c02e683cde249e36f008fb68e96de65c8a268eb1ea
530 12444899c13f0ee85a4f47024f06d8a5746f0d9fec02e57c6d87a7bba17c1454fe6387bff5b96e38ce6142b9eebe249865c52b617b8966e6f93b16f612a91155
531 cafcf1ea9f16a56f9ac4635d58992a789c51b6d7e53b5e1d8b59d5c1850c5c6ac2297839af44b29d5cf440772f98fd9d090ccec2d56adeb113bd3459d620b0b02679b72f3170ea8e2bd4486eebf2496d8be01cfe86923e5bbeb6f91582dfb95c6ef0a52cbc068081dc363b31dbd2ed80e3267d973ea39f82e276002eab9cb2;
532
533 3ba5a9c550b8cf6c3b87cc106b6551221a0dc90ac193ebcc526e4e5f53cf012fa6e05b155dcb3c4c0e1a90a01062a67ec434f6744195349194770711ea836a8b
534 54f04f121d22db842523e9bf75727d5b0e9ef17e6d727918894927fade87ceeb2106684c4af7c49653425e29f7a91abf8adec4de2ca499df2534644397e454ac
535 13ca59703f4c087c16a9a7bc7022904a37a469c1d0fd9fa7ffabe8f7d887fe1572c0bf5c75fde6913b565f8106bba9c26c9bbce190a9b8967112d74c0ac3d4ff9d2a385b96833e3c456d5601c74d8d2c9fff35abc60e7cc15d7c680f20757c13a415f1b8fbe3c6c32434aa36c528473dd20ea39f0e5ee22d1cd23040900d3164;
536
1d724f3f 537}
538
539usqr {
540
541 # --- Sanity check tests ---
542
543 00 00;
544 01 01;
545 02 04;
546 ff fe01;
547
548 # --- Random tests ---
549
23de8bae 550 d573446554727d0f05ad3ccd03665c2f
551 b1f903b723d65fefeb935ef5c50ab18da09777b28b8a093adab73a5cb0a5d0a1;
552
553 27ed6604397ef6acdb3f1906e5c0be25
554 063a313b55fe82206c4e69624c2afd726dcf52c1efc9d0f81c948907f6baf159;
555
556 869593eda5bbb87109593218d3c99f86
557 46c0ee42519e3a8ce80f19b6bd60332254e1e144350898d77e803ce2c7d3ba24;
558
559 94edc3ffcbd975677c95b44e7f4a8164
560 56a3c77441629088100fea8b3e510352c9904877e9705b9e150e7b004735ef10;
1d724f3f 561
23de8bae 562 4a3b7b546f9f15a09bd35d6de3b33f82
563 1586711ee4ddaaf121f7e4311d3e182948ed5569def0257e099be8d66b8d3e04;
1d724f3f 564
23de8bae 565 adf038609b8f95940806994831db9409
566 762e8d9c53ce25e6641019bd974169acd1aa3e95968b13e80c97d2120f006851;
1d724f3f 567
23de8bae 568 337e87847e2ddf24444fac6f64c6cc66
569 0a5ba888786f7db6d9c28a7482545e31ce687996024edfdc05ae3a8480fab8a4;
1d724f3f 570
23de8bae 571 0b2c882b8a7dcad93cffc77be4436e62
572 7cdb72d54cb539de9fc55d68b9ca4731ad6b1bef79fd0dd12c9c8d86e45d84;
1d724f3f 573
23de8bae 574 298a1b9f23f7e77dc288c177a492843c
575 06bd875ac41323efd9b958064f96e74d84faf58a2c43f4bec525750ff8bdee10;
1d724f3f 576
23de8bae 577 f58345742a51bd04c80b3791a688871e
578 eb74864080bb96f90ac10021b82af6ea9acd21af8b8c103739a14c06bf30a784;
1d724f3f 579
23de8bae 580 0c720ed1384848bc57e6f92cd98541cd
581 9ae434d07874574a5702724fcaf6d27f5686744f03aa444afe9762f9ebbe29;
1d724f3f 582
23de8bae 583 37e91e1c9a3f237a08dda2e6919dbfa8
584 0c35ff381de29f85eb03c278ca9623be8603ac9f744c826d08e91630f38c1e40;
1d724f3f 585
23de8bae 586 8b270d9328ea8561db59a8ac4e651d05
587 4ba36eb2f1fd6b0cbd6f71ac36aabe1be53e21ae9afd4c9ce1715456f53c2219;
1d724f3f 588
23de8bae 589 5e64af22a077e8832538dc9ff235bea0
590 22ce1836b8b5c880ea1e00f95f339ee776d8edda0563e498c98f726efc31e400;
1d724f3f 591
23de8bae 592 8e6d67cd33ac976b183475e54afdb715
593 4f3d8de934283d046ebdb7263c73978e60c2e68179cb3edf79c266dd867107b9;
1d724f3f 594
23de8bae 595 27f566956e3fa7141088402630e929e8
596 063cb07f0ab7d5d22828664724da2dd261c14526d80f7760aa04b4f44f2c2240;
1d724f3f 597
23de8bae 598 e26c74de93a02296693ee98e552d5524
599 c843ac4bcdcdc37c3ef17997e8d013d1d4ecff5a58a22e2be50d1e80f2f8ed10;
1d724f3f 600
23de8bae 601 ca53baed02dd4ba78cf7a3963b438395
602 9fe83e60c6b25a7b58d1f84a5905081769b4c5b5c9b1d63a5bec2110d19fd4b9;
1d724f3f 603
23de8bae 604 d6e517000ade8ef62963e890a472d530
605 b463cf763a508b234fbf75a75781c97b5a9963b8f8456d23d05a2aa81048e900;
1d724f3f 606
23de8bae 607 c4245e0ce04fe1151ca17eb8aeb6e3e3
608 9647b52e4da6dc80171bd5495ab519835e871bf915ee7e59f1fe2ac165a05b49;
1d724f3f 609}
610
611udiv {
612
613 # --- Simple tests ---
614
615 09 04 02 01;
616 ffe3 01 ffe3 00;
617 cdef fedc 00 cdef;
618
619 # --- Random tests ---
620
23de8bae 621 8ab316d0d1a2e88535cf77c1172881ead70d592c59e9c5fbc16e4b0c4dc49481
622 18ca3bf7ee3c6d7bab3f144b015ccc6c25472843d346b461
623 059850f995ddeb799c
624 02c1815029b766b96ad4507dc1af8151307961c6d161d065;
625
626 8117d1663ee63341eb8faeff304549f0f8b32d587acc2fd5597ea6a31625881d
627 dc85df77dfb61876805623bcbed325b99d00c2cd65c252c879
628 95dc734282eb19
629 395da02e8a6c66476467c4e04f328d8208cc411e3d1e96e14c;
630
631 63791966f2ad44a6df11bcc87c6b7c2400c74e69f7e3ca02fcac12b3bf56238b
632 a49e473b8f7539d89cdb002d73182558773eec10db93cc6049d8c5533e
633 9ab11a
634 65caf6833baa118b53c7bdc44a831605ca382b5993beead59f3971d13f;
635
636 9ca438db3e0f79305987292e8ec6174e6c313f7904ebb35a349a700e3ae63a37
637 b24c93d499c7073b8f7aac718c1f12da1a8fc8bccdd47b49
638 e0e779304869fdc1
639 46393cb15e38cbbc8a85698151a113f28081b4c8f6ed232e;
640
641 8214fd17858a4a913015412b5331eb9654faeb5156a674b1e5f6550a68957146
642 c4f0ebaad6c0ee0111c57667ea8e0a254f3068f212949e20ededa89a7da6
643 a917
644 3fde916ba21d19414d4316041420ca59d8b01aa2acf3f3ef106245c1915c;
645
646 55a487a70935360158bd55542eb46271f90f7312e77344c4ca6a580a80810612
647 8996dd0613f846
648 9f58fe011d73a8750454d9bffb55906e9bcf563e0c48b5b608
649 4cfd95e3e17fe2;
650
651 6a13e1be50ecdd7011f9ced42269615efb38fcd3e5477bc57377138cf1ff9519
652 fda103ff99ff21
653 6b11bf2670bf080ef7c5aa0fa5989324e88e3e581c0e7507ba
654 717db69e0d501f;
655
656 367aa8f5ba9ac4e8e2ea198b8af2c3b3081deab392ffc05715783b245a62a6fa
657 72e2c37447f8bca34c4a39b130ea8e5c9a7d8b54564aa88ea773
658 7965572732ac
659 08e8c03ebf398c63d71d8fd7ca4ece12367a8dde180ca650afb6;
660
661 6da07a0a1f9a7dd93e1f82be23fd5e7814b84fc74d4566dd83914adf368c1689
662 3cc71e64
663 01cdc15d7d825955c50ccca72fc5a16f9a7dd04363b12d8354d3088e51
664 299000e5;
665
666 001f5d985f594315d8c58f2d654304c8417f683b65d6d3246b89960e5f6c133c
667 5bbc034d956a17998a30a3
668 5787e7e94449592b493486bd9a323f939ad9bfde
669 1298fecf49a80ad72148e2;
670
671 ae2d84438ac6643fc601c1634351aa75b284fecbbe5faf3a132be9dd1a326e6c
672 c33c890f030644d88cc65f8ccf99c625c9b9fa21d4eb153e52ef89df54130855
673 00
674 ae2d84438ac6643fc601c1634351aa75b284fecbbe5faf3a132be9dd1a326e6c;
675
676 65901dcdad8dd0625d4d158f99b666fee10480d1df15e3bdac640584b9b746bc
677 d8a1d326fee87d55f39f15b5b2cfe71f5146083928
678 7805090edf620d22dac08f
679 859c41164983547c03134b99530e25a0f874315964;
680
681 5d9e7037d70e822c2ce4b3d93f3e20d437a047aa94103296cc041e1b7ea0d9ae
682 d2b14235853f6bac6fdba208897d
683 71c036bc8940293745e65c49f9b0bc1a8aa3
684 700473d994c1cd61ab24f661ed17;
685
686 3a826450bde36cf03de1d6829f7e21af52beb2655e2c902ed634f84e135b241c
687 3023b54e1deda493ad0b4558
688 01372549e716f70dd3c6bb31f193682b7a9355a7fc
689 04359aabd8bfdf8dd3ce797c;
690
691 bdcfd9593348eb1567377e0d4f4bfe8a26acac14b56f7dfd82beddb4f11c2373
692 1f0356b60ad66f4fd7dda57cfc6d1aa374108bd4841127c8
693 061ed1e07aff1c094d
694 0e313b6052859863725786d1459434762ccad8540bad244b;
695
696 293be875d1251920e18102446ceec021da8d8d24aabe49c5911d19ddc3db516d
697 b66e4ce3aa7390a9d888c5d22176bea5c36ae962ae8f252cdf3642556641271c
698 00
699 293be875d1251920e18102446ceec021da8d8d24aabe49c5911d19ddc3db516d;
700
701 5f1085256c5fb856ceab16f2372b6b7024c7d1fcfa7039a0555bb1496c0bc92b
702 c46c1fcd4a8a9cb91775f901af0ab42e39015e09fc737ae2011899b34322cd
703 7b
704 b091ddc98f1f09e065684e681146ddef6429ce2e24bd95bed4df704aca10ac;
705
706 82ea5bd086409cf3681e55e6133626ce9579db9eb01a0411db9c8521c3c66c2c
707 605a13a7d4b75f1094260227cd4cab
708 015bd5405d6bfd4571e54bc47a1b089abfd7
709 3074a3c84ec3bfa32e0db1b349738f;
710
711 3b68662228026ec9e9be8206d3226edd265552a3dbe15a7aa399eba05a69a6c3
712 a0f4265e8f59474132846bfb15
713 5e7d40f138e2a107a52f85a0eb6f92a1c3ec97
714 1508f62d27e7fad09e3d423160;
715
716 82a5058150e570c9eef1f4e5d55d3cf261de28a17f4735caec8bb38e1813978a
717 620d87bb63872a40fc2092b0ed7d3ec4b648be41
718 0155177e99a8a5113226ff8270
719 2ea2205327e66d75990cc999fc2380883ee4591a;
1d724f3f 720}