1#! /usr/bin/bc -q 2 3define printarray(a[], len) { 4 5 auto i 6 7 for (i = 0; i < len; ++i) { 8 a[i] 9 } 10} 11 12define a2(a[], len) { 13 14 auto i 15 16 for (i = 0; i < len; ++i) { 17 a[i] = a[i] * a[i] 18 } 19 20 printarray(len, len) 21} 22 23define a4(a__[], len) { 24 25 auto i 26 27 for (i = 0; i < len; ++i) { 28 a__[i] = a__[i] * a__[i] 29 } 30 31 printarray(a__[], len) 32} 33 34define a6(*a__[], len) { 35 36 auto i 37 38 for (i = 0; i < len; ++i) { 39 a__[i] = a__[i] * a__[i] 40 } 41 42 printarray(a__[], len) 43} 44 45define a1(*a[], len) { 46 47 auto i 48 49 for (i = 0; i < len; ++i) { 50 a[i] = i 51 } 52 53 a2(a[], len) 54 55 printarray(a[], len) 56} 57 58define a3(*a__[], len) { 59 60 auto i 61 62 for (i = 0; i < len; ++i) { 63 a__[i] = i 64 } 65 66 a4(a__[], len) 67 68 printarray(a__[], len) 69} 70 71define a5(*a__[], len) { 72 73 auto i 74 75 for (i = 0; i < len; ++i) { 76 a__[i] = i 77 } 78 79 a2(a__[], len) 80 81 printarray(a__[], len) 82} 83 84define a7(*a__[], len) { 85 86 auto i 87 88 for (i = 0; i < len; ++i) { 89 a__[i] = i 90 } 91 92 a6(a__[], len) 93 94 printarray(a__[], len) 95} 96 97len = 16 98 99a1(a[], len) 100printarray(a[], len) 101a3(a[], len) 102printarray(a[], len) 103a5(a[], len) 104printarray(a[], len) 105a7(a[], len) 106printarray(a[], len) 107 108a1(b[], len) 109printarray(b[], len) 110a3(b[], len) 111printarray(b[], len) 112a5(b[], len) 113printarray(b[], len) 114a7(b[], len) 115printarray(b[], len) 116 117a1[0] = 0 118a2[0] = 0 119a3[0] = 0 120a4[0] = 0 121a5[0] = 0 122a6[0] = 0 123a7[0] = 0 124a8[0] = 0 125a9[0] = 0 126a10[0] = 0 127a11[0] = 0 128a12[0] = 0 129a13[0] = 0 130a14[0] = 0 131a15[0] = 0 132a16[0] = 0 133a17[0] = 0 134a18[0] = 0 135a19[0] = 0 136a20[0] = 0 137a21[0] = 0 138a22[0] = 0 139a23[0] = 0 140a24[0] = 0 141a25[0] = 0 142a26[0] = 0 143a27[0] = 0 144a28[0] = 0 145a29[0] = 0 146a30[0] = 0 147a31[0] = 0 148a32[0] = 0 149a33[0] = 0 150a34[0] = 0 151a35[0] = 0 152a36[0] = 0 153a37[0] = 0 154a38[0] = 0 155a39[0] = 0 156a40[0] = 0 157a41[0] = 0 158a42[0] = 0 159a43[0] = 0 160a44[0] = 0 161a45[0] = 0 162a46[0] = 0 163a47[0] = 0 164a48[0] = 0 165a49[0] = 0 166a50[0] = 0 167a51[0] = 0 168a52[0] = 0 169a53[0] = 0 170a54[0] = 0 171a55[0] = 0 172a56[0] = 0 173a57[0] = 0 174a58[0] = 0 175a59[0] = 0 176a60[0] = 0 177a61[0] = 0 178a62[0] = 0 179a63[0] = 0 180a64[0] = 0 181a65[0] = 0 182a66[0] = 0 183a67[0] = 0 184a68[0] = 0 185a69[0] = 0 186a70[0] = 0 187a71[0] = 0 188a72[0] = 0 189a73[0] = 0 190a74[0] = 0 191a75[0] = 0 192a76[0] = 0 193a77[0] = 0 194a78[0] = 0 195a79[0] = 0 196a80[0] = 0 197a81[0] = 0 198a82[0] = 0 199a83[0] = 0 200a84[0] = 0 201a85[0] = 0 202a86[0] = 0 203a87[0] = 0 204a88[0] = 0 205a89[0] = 0 206a90[0] = 0 207a91[0] = 0 208a92[0] = 0 209a93[0] = 0 210a94[0] = 0 211a95[0] = 0 212a96[0] = 0 213a97[0] = 0 214a98[0] = 0 215a99[0] = 0 216a100[0] = 0 217a101[0] = 0 218a102[0] = 0 219a103[0] = 0 220a104[0] = 0 221a105[0] = 0 222a106[0] = 0 223a107[0] = 0 224a108[0] = 0 225a109[0] = 0 226a110[0] = 0 227a111[0] = 0 228a112[0] = 0 229a113[0] = 0 230a114[0] = 0 231a115[0] = 0 232a116[0] = 0 233a117[0] = 0 234a118[0] = 0 235a119[0] = 0 236a120[0] = 0 237a121[0] = 0 238a122[0] = 0 239a123[0] = 0 240a124[0] = 0 241a125[0] = 0 242a126[0] = 0 243a127[0] = 0 244a128[0] = 0 245a129[0] = 0 246a130[0] = 0 247a131[0] = 0 248a132[0] = 0 249a133[0] = 0 250a134[0] = 0 251a135[0] = 0 252a136[0] = 0 253a137[0] = 0 254a138[0] = 0 255a139[0] = 0 256a140[0] = 0 257a141[0] = 0 258a142[0] = 0 259a143[0] = 0 260a144[0] = 0 261a145[0] = 0 262a146[0] = 0 263a147[0] = 0 264a148[0] = 0 265a149[0] = 0 266a150[0] = 0 267a151[0] = 0 268a152[0] = 0 269a153[0] = 0 270a154[0] = 0 271a155[0] = 0 272a156[0] = 0 273a157[0] = 0 274a158[0] = 0 275a159[0] = 0 276a160[0] = 0 277a161[0] = 0 278a162[0] = 0 279a163[0] = 0 280a164[0] = 0 281a165[0] = 0 282a166[0] = 0 283a167[0] = 0 284a168[0] = 0 285a169[0] = 0 286a170[0] = 0 287a171[0] = 0 288a172[0] = 0 289a173[0] = 0 290a174[0] = 0 291a175[0] = 0 292a176[0] = 0 293a177[0] = 0 294a178[0] = 0 295a179[0] = 0 296a180[0] = 0 297a181[0] = 0 298a182[0] = 0 299a183[0] = 0 300a184[0] = 0 301a185[0] = 0 302a186[0] = 0 303a187[0] = 0 304a188[0] = 0 305a189[0] = 0 306a190[0] = 0 307a191[0] = 0 308a192[0] = 0 309a193[0] = 0 310a194[0] = 0 311a195[0] = 0 312a196[0] = 0 313a197[0] = 0 314a198[0] = 0 315a199[0] = 0 316a200[0] = 0 317a201[0] = 0 318a202[0] = 0 319a203[0] = 0 320a204[0] = 0 321a205[0] = 0 322a206[0] = 0 323a207[0] = 0 324a208[0] = 0 325a209[0] = 0 326a210[0] = 0 327a211[0] = 0 328a212[0] = 0 329a213[0] = 0 330a214[0] = 0 331a215[0] = 0 332a216[0] = 0 333a217[0] = 0 334a218[0] = 0 335a219[0] = 0 336a220[0] = 0 337a221[0] = 0 338a222[0] = 0 339a223[0] = 0 340a224[0] = 0 341a225[0] = 0 342a226[0] = 0 343a227[0] = 0 344a228[0] = 0 345a229[0] = 0 346a230[0] = 0 347a231[0] = 0 348a232[0] = 0 349a233[0] = 0 350a234[0] = 0 351a235[0] = 0 352a236[0] = 0 353a237[0] = 0 354a238[0] = 0 355a239[0] = 0 356a240[0] = 0 357a241[0] = 0 358a242[0] = 0 359a243[0] = 0 360a244[0] = 0 361a245[0] = 0 362a246[0] = 0 363a247[0] = 0 364a248[0] = 0 365a249[0] = 0 366a250[0] = 0 367a251[0] = 0 368a252[0] = 0 369a253[0] = 0 370a254[0] = 0 371a255[0] = 0 372a256[0] = 0 373 374a1(a253[], len) 375printarray(a253[], len) 376a3(a253[], len) 377printarray(a253[], len) 378a5(a253[], len) 379printarray(a253[], len) 380a7(a253[], len) 381printarray(a253[], len) 382 383a1(a254[], len) 384printarray(a254[], len) 385a3(a254[], len) 386printarray(a254[], len) 387a5(a254[], len) 388printarray(a254[], len) 389a7(a254[], len) 390printarray(a254[], len) 391 392a1(a255[], len) 393printarray(a255[], len) 394a3(a255[], len) 395printarray(a255[], len) 396a5(a255[], len) 397printarray(a255[], len) 398a7(a255[], len) 399printarray(a255[], len) 400 401a1(a256[], len) 402printarray(a256[], len) 403a3(a256[], len) 404printarray(a256[], len) 405a5(a256[], len) 406printarray(a256[], len) 407a7(a256[], len) 408printarray(a256[], len) 409