// ************************************************************************** // // // // eses eses // // eses eses // // eses eseses esesese eses Embedded Systems Group // // ese ese ese ese ese // // ese eseseses eseseses ese Department of Computer Science // // eses eses ese eses // // eses eseses eseseses eses University of Kaiserslautern // // eses eses // // // // ************************************************************************** // nat x0,x1,x2,x3,x4,x5,x6,x7,x8,x9,x10; nat y0,y1,y2,y3,y4,y5,y6,y7,y8,y9,y10; nat p0,p1,p2,p3,p4,p5,p6,p7,p8,p9,p10,p11,p12,p13,p14,p15,p16,p17,p18,p19,p20,p21; thread RadixBMulDadda { nat t0,t1,t10,t100,t1000,t1001,t1002,t1003,t1004,t1005,t1006,t1007,t1008,t1009,t101,t1010,t1011,t1012,t1013,t1014,t1015,t1016,t102,t103,t104,t105,t106,t107,t108,t109,t11,t110,t111,t112,t113,t114,t115,t116,t117,t118,t119,t12,t120,t121,t122,t123,t124,t125,t126,t127,t128,t129,t13,t130,t131,t132,t133,t134,t135,t136,t137,t138,t139,t14,t140,t141,t142,t143,t144,t145,t146,t147,t148,t149,t15,t150,t151,t152,t153,t154,t155,t156,t157,t158,t159,t16,t160,t161,t162,t163,t164,t165,t166,t167,t168,t169,t17,t170,t171,t172,t173,t174,t175,t176,t177,t178,t179,t18,t180,t181,t182,t183,t184,t185,t186,t187,t188,t189,t19,t190,t191,t192,t193,t194,t195,t196,t197,t198,t199,t2,t20,t200,t201,t202,t203,t204,t205,t206,t207,t208,t209,t21,t210,t211,t212,t213,t214,t215,t216,t217,t218,t219,t22,t220,t221,t222,t223,t224,t225,t226,t227,t228,t229,t23,t230,t231,t232,t233,t234,t235,t236,t237,t238,t239,t24,t240,t241,t242,t243,t244,t245,t246,t247,t248,t249,t25,t250,t251,t252,t253,t254,t255,t256,t257,t258,t259,t26,t260,t261,t262,t263,t264,t265,t266,t267,t268,t269,t27,t270,t271,t272,t273,t274,t275,t276,t277,t278,t279,t28,t280,t281,t282,t283,t284,t285,t286,t287,t288,t289,t29,t290,t291,t292,t293,t294,t295,t296,t297,t298,t299,t3,t30,t300,t301,t302,t303,t304,t305,t306,t307,t308,t309,t31,t310,t311,t312,t313,t314,t315,t316,t317,t318,t319,t32,t320,t321,t322,t323,t324,t325,t326,t327,t328,t329,t33,t330,t331,t332,t333,t334,t335,t336,t337,t338,t339,t34,t340,t341,t342,t343,t344,t345,t346,t347,t348,t349,t35,t350,t351,t352,t353,t354,t355,t356,t357,t358,t359,t36,t360,t361,t362,t363,t364,t365,t366,t367,t368,t369,t37,t370,t371,t372,t373,t374,t375,t376,t377,t378,t379,t38,t380,t381,t382,t383,t384,t385,t386,t387,t388,t389,t39,t390,t391,t392,t393,t394,t395,t396,t397,t398,t399,t4,t40,t400,t401,t402,t403,t404,t405,t406,t407,t408,t409,t41,t410,t411,t412,t413,t414,t415,t416,t417,t418,t419,t42,t420,t421,t422,t423,t424,t425,t426,t427,t428,t429,t43,t430,t431,t432,t433,t434,t435,t436,t437,t438,t439,t44,t440,t441,t442,t443,t444,t445,t446,t447,t448,t449,t45,t450,t451,t452,t453,t454,t455,t456,t457,t458,t459,t46,t460,t461,t462,t463,t464,t465,t466,t467,t468,t469,t47,t470,t471,t472,t473,t474,t475,t476,t477,t478,t479,t48,t480,t481,t482,t483,t484,t485,t486,t487,t488,t489,t49,t490,t491,t492,t493,t494,t495,t496,t497,t498,t499,t5,t50,t500,t501,t502,t503,t504,t505,t506,t507,t508,t509,t51,t510,t511,t512,t513,t514,t515,t516,t517,t518,t519,t52,t520,t521,t522,t523,t524,t525,t526,t527,t528,t529,t53,t530,t531,t532,t533,t534,t535,t536,t537,t538,t539,t54,t540,t541,t542,t543,t544,t545,t546,t547,t548,t549,t55,t550,t551,t552,t553,t554,t555,t556,t557,t558,t559,t56,t560,t561,t562,t563,t564,t565,t566,t567,t568,t569,t57,t570,t571,t572,t573,t574,t575,t576,t577,t578,t579,t58,t580,t581,t582,t583,t584,t585,t586,t587,t588,t589,t59,t590,t591,t592,t593,t594,t595,t596,t597,t598,t599,t6,t60,t600,t601,t602,t603,t604,t605,t606,t607,t608,t609,t61,t610,t611,t612,t613,t614,t615,t616,t617,t618,t619,t62,t620,t621,t622,t623,t624,t625,t626,t627,t628,t629,t63,t630,t631,t632,t633,t634,t635,t636,t637,t638,t639,t64,t640,t641,t642,t643,t644,t645,t646,t647,t648,t649,t65,t650,t651,t652,t653,t654,t655,t656,t657,t658,t659,t66,t660,t661,t662,t663,t664,t665,t666,t667,t668,t669,t67,t670,t671,t672,t673,t674,t675,t676,t677,t678,t679,t68,t680,t681,t682,t683,t684,t685,t686,t687,t688,t689,t69,t690,t691,t692,t693,t694,t695,t696,t697,t698,t699,t7,t70,t700,t701,t702,t703,t704,t705,t706,t707,t708,t709,t71,t710,t711,t712,t713,t714,t715,t716,t717,t718,t719,t72,t720,t721,t722,t723,t724,t725,t726,t727,t728,t729,t73,t730,t731,t732,t733,t734,t735,t736,t737,t738,t739,t74,t740,t741,t742,t743,t744,t745,t746,t747,t748,t749,t75,t750,t751,t752,t753,t754,t755,t756,t757,t758,t759,t76,t760,t761,t762,t763,t764,t765,t766,t767,t768,t769,t77,t770,t771,t772,t773,t774,t775,t776,t777,t778,t779,t78,t780,t781,t782,t783,t784,t785,t786,t787,t788,t789,t79,t790,t791,t792,t793,t794,t795,t796,t797,t798,t799,t8,t80,t800,t801,t802,t803,t804,t805,t806,t807,t808,t809,t81,t810,t811,t812,t813,t814,t815,t816,t817,t818,t819,t82,t820,t821,t822,t823,t824,t825,t826,t827,t828,t829,t83,t830,t831,t832,t833,t834,t835,t836,t837,t838,t839,t84,t840,t841,t842,t843,t844,t845,t846,t847,t848,t849,t85,t850,t851,t852,t853,t854,t855,t856,t857,t858,t859,t86,t860,t861,t862,t863,t864,t865,t866,t867,t868,t869,t87,t870,t871,t872,t873,t874,t875,t876,t877,t878,t879,t88,t880,t881,t882,t883,t884,t885,t886,t887,t888,t889,t89,t890,t891,t892,t893,t894,t895,t896,t897,t898,t899,t9,t90,t900,t901,t902,t903,t904,t905,t906,t907,t908,t909,t91,t910,t911,t912,t913,t914,t915,t916,t917,t918,t919,t92,t920,t921,t922,t923,t924,t925,t926,t927,t928,t929,t93,t930,t931,t932,t933,t934,t935,t936,t937,t938,t939,t94,t940,t941,t942,t943,t944,t945,t946,t947,t948,t949,t95,t950,t951,t952,t953,t954,t955,t956,t957,t958,t959,t96,t960,t961,t962,t963,t964,t965,t966,t967,t968,t969,t97,t970,t971,t972,t973,t974,t975,t976,t977,t978,t979,t98,t980,t981,t982,t983,t984,t985,t986,t987,t988,t989,t99,t990,t991,t992,t993,t994,t995,t996,t997,t998,t999; bool t1017,t1018,t1019,t1020,t1021,t1022,t1023,t1024,t1025,t1026,t1027,t1028,t1029,t1030,t1031,t1032,t1033,t1034,t1035,t1036,t1037,t1038,t1039,t1040,t1041,t1042,t1043,t1044,t1045,t1046,t1047,t1048,t1049,t1050,t1051,t1052,t1053,t1054,t1055,t1056,t1057,t1058; // compute partial products t0 = x0 * y0; t1 = t0 / 256; t2 = t0 % 256; t3 = x0 * y1; t4 = t3 / 256; t5 = t3 % 256; t6 = x1 * y0; t7 = t6 / 256; t8 = t6 % 256; t9 = x0 * y2; t10 = t9 / 256; t11 = t9 % 256; t12 = x1 * y1; t13 = t12 / 256; t14 = t12 % 256; t15 = x2 * y0; t16 = t15 / 256; t17 = t15 % 256; t18 = x0 * y3; t19 = t18 / 256; t20 = t18 % 256; t21 = x1 * y2; t22 = t21 / 256; t23 = t21 % 256; t24 = x2 * y1; t25 = t24 / 256; t26 = t24 % 256; t27 = x3 * y0; t28 = t27 / 256; t29 = t27 % 256; t30 = x0 * y4; t31 = t30 / 256; t32 = t30 % 256; t33 = x1 * y3; t34 = t33 / 256; t35 = t33 % 256; t36 = x2 * y2; t37 = t36 / 256; t38 = t36 % 256; t39 = x3 * y1; t40 = t39 / 256; t41 = t39 % 256; t42 = x4 * y0; t43 = t42 / 256; t44 = t42 % 256; t45 = x0 * y5; t46 = t45 / 256; t47 = t45 % 256; t48 = x1 * y4; t49 = t48 / 256; t50 = t48 % 256; t51 = x2 * y3; t52 = t51 / 256; t53 = t51 % 256; t54 = x3 * y2; t55 = t54 / 256; t56 = t54 % 256; t57 = x4 * y1; t58 = t57 / 256; t59 = t57 % 256; t60 = x5 * y0; t61 = t60 / 256; t62 = t60 % 256; t63 = x0 * y6; t64 = t63 / 256; t65 = t63 % 256; t66 = x1 * y5; t67 = t66 / 256; t68 = t66 % 256; t69 = x2 * y4; t70 = t69 / 256; t71 = t69 % 256; t72 = x3 * y3; t73 = t72 / 256; t74 = t72 % 256; t75 = x4 * y2; t76 = t75 / 256; t77 = t75 % 256; t78 = x5 * y1; t79 = t78 / 256; t80 = t78 % 256; t81 = x6 * y0; t82 = t81 / 256; t83 = t81 % 256; t84 = x0 * y7; t85 = t84 / 256; t86 = t84 % 256; t87 = x1 * y6; t88 = t87 / 256; t89 = t87 % 256; t90 = x2 * y5; t91 = t90 / 256; t92 = t90 % 256; t93 = x3 * y4; t94 = t93 / 256; t95 = t93 % 256; t96 = x4 * y3; t97 = t96 / 256; t98 = t96 % 256; t99 = x5 * y2; t100 = t99 / 256; t101 = t99 % 256; t102 = x6 * y1; t103 = t102 / 256; t104 = t102 % 256; t105 = x7 * y0; t106 = t105 / 256; t107 = t105 % 256; t108 = x0 * y8; t109 = t108 / 256; t110 = t108 % 256; t111 = x1 * y7; t112 = t111 / 256; t113 = t111 % 256; t114 = x2 * y6; t115 = t114 / 256; t116 = t114 % 256; t117 = x3 * y5; t118 = t117 / 256; t119 = t117 % 256; t120 = x4 * y4; t121 = t120 / 256; t122 = t120 % 256; t123 = x5 * y3; t124 = t123 / 256; t125 = t123 % 256; t126 = x6 * y2; t127 = t126 / 256; t128 = t126 % 256; t129 = x7 * y1; t130 = t129 / 256; t131 = t129 % 256; t132 = x8 * y0; t133 = t132 / 256; t134 = t132 % 256; t135 = x0 * y9; t136 = t135 / 256; t137 = t135 % 256; t138 = x1 * y8; t139 = t138 / 256; t140 = t138 % 256; t141 = x2 * y7; t142 = t141 / 256; t143 = t141 % 256; t144 = x3 * y6; t145 = t144 / 256; t146 = t144 % 256; t147 = x4 * y5; t148 = t147 / 256; t149 = t147 % 256; t150 = x5 * y4; t151 = t150 / 256; t152 = t150 % 256; t153 = x6 * y3; t154 = t153 / 256; t155 = t153 % 256; t156 = x7 * y2; t157 = t156 / 256; t158 = t156 % 256; t159 = x8 * y1; t160 = t159 / 256; t161 = t159 % 256; t162 = x9 * y0; t163 = t162 / 256; t164 = t162 % 256; t165 = x0 * y10; t166 = t165 / 256; t167 = t165 % 256; t168 = x1 * y9; t169 = t168 / 256; t170 = t168 % 256; t171 = x2 * y8; t172 = t171 / 256; t173 = t171 % 256; t174 = x3 * y7; t175 = t174 / 256; t176 = t174 % 256; t177 = x4 * y6; t178 = t177 / 256; t179 = t177 % 256; t180 = x5 * y5; t181 = t180 / 256; t182 = t180 % 256; t183 = x6 * y4; t184 = t183 / 256; t185 = t183 % 256; t186 = x7 * y3; t187 = t186 / 256; t188 = t186 % 256; t189 = x8 * y2; t190 = t189 / 256; t191 = t189 % 256; t192 = x9 * y1; t193 = t192 / 256; t194 = t192 % 256; t195 = x10 * y0; t196 = t195 / 256; t197 = t195 % 256; t198 = x1 * y10; t199 = t198 / 256; t200 = t198 % 256; t201 = x2 * y9; t202 = t201 / 256; t203 = t201 % 256; t204 = x3 * y8; t205 = t204 / 256; t206 = t204 % 256; t207 = x4 * y7; t208 = t207 / 256; t209 = t207 % 256; t210 = x5 * y6; t211 = t210 / 256; t212 = t210 % 256; t213 = x6 * y5; t214 = t213 / 256; t215 = t213 % 256; t216 = x7 * y4; t217 = t216 / 256; t218 = t216 % 256; t219 = x8 * y3; t220 = t219 / 256; t221 = t219 % 256; t222 = x9 * y2; t223 = t222 / 256; t224 = t222 % 256; t225 = x10 * y1; t226 = t225 / 256; t227 = t225 % 256; t228 = x2 * y10; t229 = t228 / 256; t230 = t228 % 256; t231 = x3 * y9; t232 = t231 / 256; t233 = t231 % 256; t234 = x4 * y8; t235 = t234 / 256; t236 = t234 % 256; t237 = x5 * y7; t238 = t237 / 256; t239 = t237 % 256; t240 = x6 * y6; t241 = t240 / 256; t242 = t240 % 256; t243 = x7 * y5; t244 = t243 / 256; t245 = t243 % 256; t246 = x8 * y4; t247 = t246 / 256; t248 = t246 % 256; t249 = x9 * y3; t250 = t249 / 256; t251 = t249 % 256; t252 = x10 * y2; t253 = t252 / 256; t254 = t252 % 256; t255 = x3 * y10; t256 = t255 / 256; t257 = t255 % 256; t258 = x4 * y9; t259 = t258 / 256; t260 = t258 % 256; t261 = x5 * y8; t262 = t261 / 256; t263 = t261 % 256; t264 = x6 * y7; t265 = t264 / 256; t266 = t264 % 256; t267 = x7 * y6; t268 = t267 / 256; t269 = t267 % 256; t270 = x8 * y5; t271 = t270 / 256; t272 = t270 % 256; t273 = x9 * y4; t274 = t273 / 256; t275 = t273 % 256; t276 = x10 * y3; t277 = t276 / 256; t278 = t276 % 256; t279 = x4 * y10; t280 = t279 / 256; t281 = t279 % 256; t282 = x5 * y9; t283 = t282 / 256; t284 = t282 % 256; t285 = x6 * y8; t286 = t285 / 256; t287 = t285 % 256; t288 = x7 * y7; t289 = t288 / 256; t290 = t288 % 256; t291 = x8 * y6; t292 = t291 / 256; t293 = t291 % 256; t294 = x9 * y5; t295 = t294 / 256; t296 = t294 % 256; t297 = x10 * y4; t298 = t297 / 256; t299 = t297 % 256; t300 = x5 * y10; t301 = t300 / 256; t302 = t300 % 256; t303 = x6 * y9; t304 = t303 / 256; t305 = t303 % 256; t306 = x7 * y8; t307 = t306 / 256; t308 = t306 % 256; t309 = x8 * y7; t310 = t309 / 256; t311 = t309 % 256; t312 = x9 * y6; t313 = t312 / 256; t314 = t312 % 256; t315 = x10 * y5; t316 = t315 / 256; t317 = t315 % 256; t318 = x6 * y10; t319 = t318 / 256; t320 = t318 % 256; t321 = x7 * y9; t322 = t321 / 256; t323 = t321 % 256; t324 = x8 * y8; t325 = t324 / 256; t326 = t324 % 256; t327 = x9 * y7; t328 = t327 / 256; t329 = t327 % 256; t330 = x10 * y6; t331 = t330 / 256; t332 = t330 % 256; t333 = x7 * y10; t334 = t333 / 256; t335 = t333 % 256; t336 = x8 * y9; t337 = t336 / 256; t338 = t336 % 256; t339 = x9 * y8; t340 = t339 / 256; t341 = t339 % 256; t342 = x10 * y7; t343 = t342 / 256; t344 = t342 % 256; t345 = x8 * y10; t346 = t345 / 256; t347 = t345 % 256; t348 = x9 * y9; t349 = t348 / 256; t350 = t348 % 256; t351 = x10 * y8; t352 = t351 / 256; t353 = t351 % 256; t354 = x9 * y10; t355 = t354 / 256; t356 = t354 % 256; t357 = x10 * y9; t358 = t357 / 256; t359 = t357 % 256; t360 = x10 * y10; t361 = t360 / 256; t362 = t360 % 256; // reduce heights of each column to 19 t363 = t197 + t194 + t191; t364 = t363 / 256; t365 = t363 % 256; t366 = t218 + t215; t367 = t366 / 256; t368 = t366 % 256; t369 = t227 + t224 + t221; t370 = t369 / 256; t371 = t369 % 256; t372 = t254 + t251 + t248; t373 = t372 / 256; t374 = t372 % 256; // reduce heights of each column to 13 t375 = t107 + t104 + t101; t376 = t375 / 256; t377 = t375 % 256; t378 = t116 + t113; t379 = t378 / 256; t380 = t378 % 256; t381 = t125 + t122 + t119; t382 = t381 / 256; t383 = t381 % 256; t384 = t134 + t131 + t128; t385 = t384 / 256; t386 = t384 % 256; t387 = t127 + t124; t388 = t387 / 256; t389 = t387 % 256; t390 = t137 + t133 + t130; t391 = t390 / 256; t392 = t390 % 256; t393 = t146 + t143 + t140; t394 = t393 / 256; t395 = t393 % 256; t396 = t155 + t152 + t149; t397 = t396 / 256; t398 = t396 % 256; t399 = t164 + t161 + t158; t400 = t399 / 256; t401 = t399 % 256; t402 = t142 + t139; t403 = t402 / 256; t404 = t402 % 256; t405 = t151 + t148 + t145; t406 = t405 / 256; t407 = t405 % 256; t408 = t160 + t157 + t154; t409 = t408 / 256; t410 = t408 % 256; t411 = t170 + t167 + t163; t412 = t411 / 256; t413 = t411 % 256; t414 = t179 + t176 + t173; t415 = t414 / 256; t416 = t414 % 256; t417 = t188 + t185 + t182; t418 = t417 / 256; t419 = t417 % 256; t420 = t166 + t364 + t368; t421 = t420 / 256; t422 = t420 % 256; t423 = t175 + t172 + t169; t424 = t423 / 256; t425 = t423 % 256; t426 = t184 + t181 + t178; t427 = t426 / 256; t428 = t426 % 256; t429 = t193 + t190 + t187; t430 = t429 / 256; t431 = t429 % 256; t432 = t203 + t200 + t196; t433 = t432 / 256; t434 = t432 % 256; t435 = t212 + t209 + t206; t436 = t435 / 256; t437 = t435 % 256; t438 = t199 + t367 + t370; t439 = t438 / 256; t440 = t438 % 256; t441 = t208 + t205 + t202; t442 = t441 / 256; t443 = t441 % 256; t444 = t217 + t214 + t211; t445 = t444 / 256; t446 = t444 % 256; t447 = t226 + t223 + t220; t448 = t447 / 256; t449 = t447 % 256; t450 = t236 + t233 + t230; t451 = t450 / 256; t452 = t450 % 256; t453 = t245 + t242 + t239; t454 = t453 / 256; t455 = t453 % 256; t456 = t232 + t229; t457 = t456 / 256; t458 = t456 % 256; t459 = t241 + t238 + t235; t460 = t459 / 256; t461 = t459 % 256; t462 = t250 + t247 + t244; t463 = t462 / 256; t464 = t462 % 256; t465 = t260 + t257 + t253; t466 = t465 / 256; t467 = t465 % 256; t468 = t269 + t266 + t263; t469 = t468 / 256; t470 = t468 % 256; t471 = t278 + t275 + t272; t472 = t471 / 256; t473 = t471 % 256; t474 = t271 + t268 + t265; t475 = t474 / 256; t476 = t474 % 256; t477 = t281 + t277 + t274; t478 = t477 / 256; t479 = t477 % 256; t480 = t290 + t287 + t284; t481 = t480 / 256; t482 = t480 % 256; t483 = t299 + t296 + t293; t484 = t483 / 256; t485 = t483 % 256; t486 = t308 + t305 + t302; t487 = t486 / 256; t488 = t486 % 256; t489 = t317 + t314 + t311; t490 = t489 / 256; t491 = t489 % 256; // reduce heights of each column to 9 t492 = t62 + t59 + t56; t493 = t492 / 256; t494 = t492 % 256; t495 = t65 + t61; t496 = t495 / 256; t497 = t495 % 256; t498 = t74 + t71 + t68; t499 = t498 / 256; t500 = t498 % 256; t501 = t83 + t80 + t77; t502 = t501 / 256; t503 = t501 % 256; t504 = t70 + t67; t505 = t504 / 256; t506 = t504 % 256; t507 = t79 + t76 + t73; t508 = t507 / 256; t509 = t507 % 256; t510 = t89 + t86 + t82; t511 = t510 / 256; t512 = t510 % 256; t513 = t98 + t95 + t92; t514 = t513 / 256; t515 = t513 % 256; t516 = t376 + t380 + t383; t517 = t516 / 256; t518 = t516 % 256; t519 = t91 + t88 + t85; t520 = t519 / 256; t521 = t519 % 256; t522 = t100 + t97 + t94; t523 = t522 / 256; t524 = t522 % 256; t525 = t110 + t106 + t103; t526 = t525 / 256; t527 = t525 % 256; t528 = t392 + t395 + t398; t529 = t528 / 256; t530 = t528 % 256; t531 = t382 + t385 + t389; t532 = t531 / 256; t533 = t531 % 256; t534 = t112 + t109 + t379; t535 = t534 / 256; t536 = t534 % 256; t537 = t121 + t118 + t115; t538 = t537 / 256; t539 = t537 % 256; t540 = t410 + t413 + t416; t541 = t540 / 256; t542 = t540 % 256; t543 = t400 + t404 + t407; t544 = t543 / 256; t545 = t543 % 256; t546 = t391 + t394 + t397; t547 = t546 / 256; t548 = t546 % 256; t549 = t136 + t365 + t388; t550 = t549 / 256; t551 = t549 % 256; t552 = t428 + t431 + t434; t553 = t552 / 256; t554 = t552 % 256; t555 = t418 + t422 + t425; t556 = t555 / 256; t557 = t555 % 256; t558 = t409 + t412 + t415; t559 = t558 / 256; t560 = t558 % 256; t561 = t371 + t403 + t406; t562 = t561 / 256; t563 = t561 % 256; t564 = t446 + t449 + t452; t565 = t564 / 256; t566 = t564 % 256; t567 = t436 + t440 + t443; t568 = t567 / 256; t569 = t567 % 256; t570 = t427 + t430 + t433; t571 = t570 / 256; t572 = t570 % 256; t573 = t374 + t421 + t424; t574 = t573 / 256; t575 = t573 % 256; t576 = t464 + t467 + t470; t577 = t576 / 256; t578 = t576 % 256; t579 = t454 + t458 + t461; t580 = t579 / 256; t581 = t579 % 256; t582 = t445 + t448 + t451; t583 = t582 / 256; t584 = t582 % 256; t585 = t373 + t439 + t442; t586 = t585 / 256; t587 = t585 % 256; t588 = t476 + t479 + t482; t589 = t588 / 256; t590 = t588 % 256; t591 = t466 + t469 + t472; t592 = t591 / 256; t593 = t591 % 256; t594 = t457 + t460 + t463; t595 = t594 / 256; t596 = t594 % 256; t597 = t262 + t259 + t256; t598 = t597 / 256; t599 = t597 % 256; t600 = t481 + t484 + t488; t601 = t600 / 256; t602 = t600 % 256; t603 = t280 + t475 + t478; t604 = t603 / 256; t605 = t603 % 256; t606 = t289 + t286 + t283; t607 = t606 / 256; t608 = t606 % 256; t609 = t298 + t295 + t292; t610 = t609 / 256; t611 = t609 % 256; t612 = t304 + t301 + t487; t613 = t612 / 256; t614 = t612 % 256; t615 = t313 + t310 + t307; t616 = t615 / 256; t617 = t615 % 256; t618 = t323 + t320 + t316; t619 = t618 / 256; t620 = t618 % 256; t621 = t332 + t329 + t326; t622 = t621 / 256; t623 = t621 % 256; t624 = t335 + t331 + t328; t625 = t624 / 256; t626 = t624 % 256; t627 = t344 + t341 + t338; t628 = t627 / 256; t629 = t627 % 256; // reduce heights of each column to 6 t630 = t29 + t26; t631 = t630 / 256; t632 = t630 % 256; t633 = t35 + t32 + t28; t634 = t633 / 256; t635 = t633 % 256; t636 = t44 + t41 + t38; t637 = t636 / 256; t638 = t636 % 256; t639 = t34 + t31; t640 = t639 / 256; t641 = t639 % 256; t642 = t43 + t40 + t37; t643 = t642 / 256; t644 = t642 % 256; t645 = t53 + t50 + t47; t646 = t645 / 256; t647 = t645 % 256; t648 = t497 + t500 + t503; t649 = t648 / 256; t650 = t648 % 256; t651 = t49 + t46 + t493; t652 = t651 / 256; t653 = t651 % 256; t654 = t58 + t55 + t52; t655 = t654 / 256; t656 = t654 % 256; t657 = t509 + t512 + t515; t658 = t657 / 256; t659 = t657 % 256; t660 = t499 + t502 + t506; t661 = t660 / 256; t662 = t660 % 256; t663 = t64 + t377 + t496; t664 = t663 / 256; t665 = t663 % 256; t666 = t521 + t524 + t527; t667 = t666 / 256; t668 = t666 % 256; t669 = t511 + t514 + t518; t670 = t669 / 256; t671 = t669 % 256; t672 = t386 + t505 + t508; t673 = t672 / 256; t674 = t672 % 256; t675 = t533 + t536 + t539; t676 = t675 / 256; t677 = t675 % 256; t678 = t523 + t526 + t530; t679 = t678 / 256; t680 = t678 % 256; t681 = t401 + t517 + t520; t682 = t681 / 256; t683 = t681 % 256; t684 = t545 + t548 + t551; t685 = t684 / 256; t686 = t684 % 256; t687 = t535 + t538 + t542; t688 = t687 / 256; t689 = t687 % 256; t690 = t419 + t529 + t532; t691 = t690 / 256; t692 = t690 % 256; t693 = t557 + t560 + t563; t694 = t693 / 256; t695 = t693 % 256; t696 = t547 + t550 + t554; t697 = t696 / 256; t698 = t696 % 256; t699 = t437 + t541 + t544; t700 = t699 / 256; t701 = t699 % 256; t702 = t569 + t572 + t575; t703 = t702 / 256; t704 = t702 % 256; t705 = t559 + t562 + t566; t706 = t705 / 256; t707 = t705 % 256; t708 = t455 + t553 + t556; t709 = t708 / 256; t710 = t708 % 256; t711 = t581 + t584 + t587; t712 = t711 / 256; t713 = t711 % 256; t714 = t571 + t574 + t578; t715 = t714 / 256; t716 = t714 % 256; t717 = t473 + t565 + t568; t718 = t717 / 256; t719 = t717 % 256; t720 = t593 + t596 + t599; t721 = t720 / 256; t722 = t720 % 256; t723 = t583 + t586 + t590; t724 = t723 / 256; t725 = t723 % 256; t726 = t485 + t577 + t580; t727 = t726 / 256; t728 = t726 % 256; t729 = t605 + t608 + t611; t730 = t729 / 256; t731 = t729 % 256; t732 = t595 + t598 + t602; t733 = t732 / 256; t734 = t732 % 256; t735 = t491 + t589 + t592; t736 = t735 / 256; t737 = t735 % 256; t738 = t617 + t620 + t623; t739 = t738 / 256; t740 = t738 % 256; t741 = t607 + t610 + t614; t742 = t741 / 256; t743 = t741 % 256; t744 = t490 + t601 + t604; t745 = t744 / 256; t746 = t744 % 256; t747 = t622 + t626 + t629; t748 = t747 / 256; t749 = t747 % 256; t750 = t613 + t616 + t619; t751 = t750 / 256; t752 = t750 % 256; t753 = t325 + t322 + t319; t754 = t753 / 256; t755 = t753 % 256; t756 = t334 + t625 + t628; t757 = t756 / 256; t758 = t756 % 256; t759 = t343 + t340 + t337; t760 = t759 / 256; t761 = t759 % 256; t762 = t353 + t350 + t347; t763 = t762 / 256; t764 = t762 % 256; t765 = t359 + t356 + t352; t766 = t765 / 256; t767 = t765 % 256; // reduce heights of each column to 4 t768 = t17 + t14; t769 = t768 / 256; t770 = t768 % 256; t771 = t13 + t10; t772 = t771 / 256; t773 = t771 % 256; t774 = t23 + t20 + t16; t775 = t774 / 256; t776 = t774 % 256; t777 = t631 + t635 + t638; t778 = t777 / 256; t779 = t777 % 256; t780 = t25 + t22 + t19; t781 = t780 / 256; t782 = t780 % 256; t783 = t641 + t644 + t647; t784 = t783 / 256; t785 = t783 % 256; t786 = t494 + t634 + t637; t787 = t786 / 256; t788 = t786 % 256; t789 = t650 + t653 + t656; t790 = t789 / 256; t791 = t789 % 256; t792 = t640 + t643 + t646; t793 = t792 / 256; t794 = t792 % 256; t795 = t659 + t662 + t665; t796 = t795 / 256; t797 = t795 % 256; t798 = t649 + t652 + t655; t799 = t798 / 256; t800 = t798 % 256; t801 = t668 + t671 + t674; t802 = t801 / 256; t803 = t801 % 256; t804 = t658 + t661 + t664; t805 = t804 / 256; t806 = t804 % 256; t807 = t677 + t680 + t683; t808 = t807 / 256; t809 = t807 % 256; t810 = t667 + t670 + t673; t811 = t810 / 256; t812 = t810 % 256; t813 = t686 + t689 + t692; t814 = t813 / 256; t815 = t813 % 256; t816 = t676 + t679 + t682; t817 = t816 / 256; t818 = t816 % 256; t819 = t695 + t698 + t701; t820 = t819 / 256; t821 = t819 % 256; t822 = t685 + t688 + t691; t823 = t822 / 256; t824 = t822 % 256; t825 = t704 + t707 + t710; t826 = t825 / 256; t827 = t825 % 256; t828 = t694 + t697 + t700; t829 = t828 / 256; t830 = t828 % 256; t831 = t713 + t716 + t719; t832 = t831 / 256; t833 = t831 % 256; t834 = t703 + t706 + t709; t835 = t834 / 256; t836 = t834 % 256; t837 = t722 + t725 + t728; t838 = t837 / 256; t839 = t837 % 256; t840 = t712 + t715 + t718; t841 = t840 / 256; t842 = t840 % 256; t843 = t731 + t734 + t737; t844 = t843 / 256; t845 = t843 % 256; t846 = t721 + t724 + t727; t847 = t846 / 256; t848 = t846 % 256; t849 = t740 + t743 + t746; t850 = t849 / 256; t851 = t849 % 256; t852 = t730 + t733 + t736; t853 = t852 / 256; t854 = t852 % 256; t855 = t749 + t752 + t755; t856 = t855 / 256; t857 = t855 % 256; t858 = t739 + t742 + t745; t859 = t858 / 256; t860 = t858 % 256; t861 = t758 + t761 + t764; t862 = t861 / 256; t863 = t861 % 256; t864 = t748 + t751 + t754; t865 = t864 / 256; t866 = t864 % 256; t867 = t760 + t763 + t767; t868 = t867 / 256; t869 = t867 % 256; t870 = t349 + t346 + t757; t871 = t870 / 256; t872 = t870 % 256; t873 = t362 + t358 + t355; t874 = t873 / 256; t875 = t873 % 256; // reduce heights of each column to 3 t876 = t11 + t7; t877 = t876 / 256; t878 = t876 % 256; t879 = t632 + t769 + t773; t880 = t879 / 256; t881 = t879 % 256; t882 = t772 + t775 + t779; t883 = t882 / 256; t884 = t882 % 256; t885 = t778 + t781 + t785; t886 = t885 / 256; t887 = t885 % 256; t888 = t784 + t787 + t791; t889 = t888 / 256; t890 = t888 % 256; t891 = t790 + t793 + t797; t892 = t891 / 256; t893 = t891 % 256; t894 = t796 + t799 + t803; t895 = t894 / 256; t896 = t894 % 256; t897 = t802 + t805 + t809; t898 = t897 / 256; t899 = t897 % 256; t900 = t808 + t811 + t815; t901 = t900 / 256; t902 = t900 % 256; t903 = t814 + t817 + t821; t904 = t903 / 256; t905 = t903 % 256; t906 = t820 + t823 + t827; t907 = t906 / 256; t908 = t906 % 256; t909 = t826 + t829 + t833; t910 = t909 / 256; t911 = t909 % 256; t912 = t832 + t835 + t839; t913 = t912 / 256; t914 = t912 % 256; t915 = t838 + t841 + t845; t916 = t915 / 256; t917 = t915 % 256; t918 = t844 + t847 + t851; t919 = t918 / 256; t920 = t918 % 256; t921 = t850 + t853 + t857; t922 = t921 / 256; t923 = t921 % 256; t924 = t856 + t859 + t863; t925 = t924 / 256; t926 = t924 % 256; t927 = t862 + t865 + t869; t928 = t927 / 256; t929 = t927 % 256; t930 = t766 + t868 + t871; t931 = t930 / 256; t932 = t930 % 256; // reduce heights of each column to 2 t933 = t8 + t5; t934 = t933 / 256; t935 = t933 % 256; t936 = t4 + t770 + t878; t937 = t936 / 256; t938 = t936 % 256; t939 = t776 + t877 + t881; t940 = t939 / 256; t941 = t939 % 256; t942 = t782 + t880 + t884; t943 = t942 / 256; t944 = t942 % 256; t945 = t788 + t883 + t887; t946 = t945 / 256; t947 = t945 % 256; t948 = t794 + t886 + t890; t949 = t948 / 256; t950 = t948 % 256; t951 = t800 + t889 + t893; t952 = t951 / 256; t953 = t951 % 256; t954 = t806 + t892 + t896; t955 = t954 / 256; t956 = t954 % 256; t957 = t812 + t895 + t899; t958 = t957 / 256; t959 = t957 % 256; t960 = t818 + t898 + t902; t961 = t960 / 256; t962 = t960 % 256; t963 = t824 + t901 + t905; t964 = t963 / 256; t965 = t963 % 256; t966 = t830 + t904 + t908; t967 = t966 / 256; t968 = t966 % 256; t969 = t836 + t907 + t911; t970 = t969 / 256; t971 = t969 % 256; t972 = t842 + t910 + t914; t973 = t972 / 256; t974 = t972 % 256; t975 = t848 + t913 + t917; t976 = t975 / 256; t977 = t975 % 256; t978 = t854 + t916 + t920; t979 = t978 / 256; t980 = t978 % 256; t981 = t860 + t919 + t923; t982 = t981 / 256; t983 = t981 % 256; t984 = t866 + t922 + t926; t985 = t984 / 256; t986 = t984 % 256; t987 = t872 + t925 + t929; t988 = t987 / 256; t989 = t987 % 256; t990 = t875 + t928 + t932; t991 = t990 / 256; t992 = t990 % 256; t993 = t361 + t874 + t931; t994 = t993 / 256; t995 = t993 % 256; // preliminary addition of the two remaining numbers t996 = t1 + t935; t997 = t934 + t938; t998 = t937 + t941; t999 = t940 + t944; t1000 = t943 + t947; t1001 = t946 + t950; t1002 = t949 + t953; t1003 = t952 + t956; t1004 = t955 + t959; t1005 = t958 + t962; t1006 = t961 + t965; t1007 = t964 + t968; t1008 = t967 + t971; t1009 = t970 + t974; t1010 = t973 + t977; t1011 = t976 + t980; t1012 = t979 + t983; t1013 = t982 + t986; t1014 = t985 + t989; t1015 = t988 + t992; t1016 = t991 + t995; // compute generate and propagate pairs t1017 = t996 > 255; t1018 = t996 == 255; t1019 = t997 > 255; t1020 = t997 == 255; t1021 = t998 > 255; t1022 = t998 == 255; t1023 = t999 > 255; t1024 = t999 == 255; t1025 = t1000 > 255; t1026 = t1000 == 255; t1027 = t1001 > 255; t1028 = t1001 == 255; t1029 = t1002 > 255; t1030 = t1002 == 255; t1031 = t1003 > 255; t1032 = t1003 == 255; t1033 = t1004 > 255; t1034 = t1004 == 255; t1035 = t1005 > 255; t1036 = t1005 == 255; t1037 = t1006 > 255; t1038 = t1006 == 255; t1039 = t1007 > 255; t1040 = t1007 == 255; t1041 = t1008 > 255; t1042 = t1008 == 255; t1043 = t1009 > 255; t1044 = t1009 == 255; t1045 = t1010 > 255; t1046 = t1010 == 255; t1047 = t1011 > 255; t1048 = t1011 == 255; t1049 = t1012 > 255; t1050 = t1012 == 255; t1051 = t1013 > 255; t1052 = t1013 == 255; t1053 = t1014 > 255; t1054 = t1014 == 255; t1055 = t1015 > 255; t1056 = t1015 == 255; t1057 = t1016 > 255; t1058 = t1016 == 255; // parallel prefix tree for computing carry bits // up-level 1 t1019 = t1020 & t1017 | t1019; t1020 = t1020 & t1018; t1023 = t1024 & t1021 | t1023; t1024 = t1024 & t1022; t1027 = t1028 & t1025 | t1027; t1028 = t1028 & t1026; t1031 = t1032 & t1029 | t1031; t1032 = t1032 & t1030; t1035 = t1036 & t1033 | t1035; t1036 = t1036 & t1034; t1039 = t1040 & t1037 | t1039; t1040 = t1040 & t1038; t1043 = t1044 & t1041 | t1043; t1044 = t1044 & t1042; t1047 = t1048 & t1045 | t1047; t1048 = t1048 & t1046; t1051 = t1052 & t1049 | t1051; t1052 = t1052 & t1050; t1055 = t1056 & t1053 | t1055; t1056 = t1056 & t1054; // up-level 2 t1023 = t1024 & t1019 | t1023; t1024 = t1024 & t1020; t1031 = t1032 & t1027 | t1031; t1032 = t1032 & t1028; t1039 = t1040 & t1035 | t1039; t1040 = t1040 & t1036; t1047 = t1048 & t1043 | t1047; t1048 = t1048 & t1044; t1055 = t1056 & t1051 | t1055; t1056 = t1056 & t1052; // up-level 3 t1031 = t1032 & t1023 | t1031; t1032 = t1032 & t1024; t1047 = t1048 & t1039 | t1047; t1048 = t1048 & t1040; // up-level 4 t1047 = t1048 & t1031 | t1047; t1048 = t1048 & t1032; // down-level 6 // down-level 7 t1055 = t1056 & t1047 | t1055; t1056 = t1056 & t1048; t1039 = t1040 & t1031 | t1039; t1040 = t1040 & t1032; t1055 = t1056 & t1047 | t1055; t1056 = t1056 & t1048; // down-level 8 t1027 = t1028 & t1023 | t1027; t1028 = t1028 & t1024; t1035 = t1036 & t1031 | t1035; t1036 = t1036 & t1032; t1043 = t1044 & t1055 | t1043; t1044 = t1044 & t1056; t1051 = t1052 & t1039 | t1051; t1052 = t1052 & t1040; // down-level 9 t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1021 = t1022 & t1019 | t1021; t1022 = t1022 & t1020; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1025 = t1026 & t1023 | t1025; t1026 = t1026 & t1024; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1029 = t1030 & t1027 | t1029; t1030 = t1030 & t1028; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1033 = t1034 & t1031 | t1033; t1034 = t1034 & t1032; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1037 = t1038 & t1035 | t1037; t1038 = t1038 & t1036; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1041 = t1042 & t1055 | t1041; t1042 = t1042 & t1056; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1045 = t1046 & t1043 | t1045; t1046 = t1046 & t1044; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1049 = t1050 & t1039 | t1049; t1050 = t1050 & t1040; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; t1053 = t1054 & t1051 | t1053; t1054 = t1054 & t1052; t1057 = t1058 & t1047 | t1057; t1058 = t1058 & t1048; // compute final sum digits as the digits of the product t1016 = t1016 + (nat) (t1055&(bool)1); t1015 = t1015 + (nat) (t1053&(bool)1); t1014 = t1014 + (nat) (t1051&(bool)1); t1013 = t1013 + (nat) (t1049&(bool)1); t1012 = t1012 + (nat) (t1047&(bool)1); t1011 = t1011 + (nat) (t1045&(bool)1); t1010 = t1010 + (nat) (t1043&(bool)1); t1009 = t1009 + (nat) (t1041&(bool)1); t1008 = t1008 + (nat) (t1039&(bool)1); t1007 = t1007 + (nat) (t1037&(bool)1); t1006 = t1006 + (nat) (t1035&(bool)1); t1005 = t1005 + (nat) (t1033&(bool)1); t1004 = t1004 + (nat) (t1031&(bool)1); t1003 = t1003 + (nat) (t1029&(bool)1); t1002 = t1002 + (nat) (t1027&(bool)1); t1001 = t1001 + (nat) (t1025&(bool)1); t1000 = t1000 + (nat) (t1023&(bool)1); t999 = t999 + (nat) (t1021&(bool)1); t998 = t998 + (nat) (t1019&(bool)1); t997 = t997 + (nat) (t1017&(bool)1); // get the product digits p0 = t2; p1 = t996 % 256; p2 = t997 % 256; p3 = t998 % 256; p4 = t999 % 256; p5 = t1000 % 256; p6 = t1001 % 256; p7 = t1002 % 256; p8 = t1003 % 256; p9 = t1004 % 256; p10 = t1005 % 256; p11 = t1006 % 256; p12 = t1007 % 256; p13 = t1008 % 256; p14 = t1009 % 256; p15 = t1010 % 256; p16 = t1011 % 256; p17 = t1012 % 256; p18 = t1013 % 256; p19 = t1014 % 256; p20 = t1015 % 256; p21 = t1016 % 256; }