1⍝ Binomial.tc 2 3⍝]log 42 4 5 2!8 628 7 8 2!5 910 10 11 2!3J2 121J5 13 14 2 3 4!6 18 24 1515 816 10626 16 17 3!.05 2.5 ¯3.6 180.0154375 0.3125 ¯15.456 19 20 21 A←¯6+ι11 22 A ∘.!A 23 1 ¯4 6 ¯4 1 0 0 0 0 0 0 24 0 1 ¯3 3 ¯1 0 0 0 0 0 0 25 0 0 1 ¯2 1 0 0 0 0 0 0 26 0 0 0 1 ¯1 0 0 0 0 0 0 27 0 0 0 0 1 0 0 0 0 0 0 28 1 1 1 1 1 1 1 1 1 1 1 29 ¯5 ¯4 ¯3 ¯2 ¯1 0 1 2 3 4 5 30 15 10 6 3 1 0 0 1 3 6 10 31 ¯35 ¯20 ¯10 ¯4 ¯1 0 0 0 1 4 10 32 70 35 15 5 1 0 0 0 0 1 5 33¯126 ¯56 ¯21 ¯6 ¯1 0 0 0 0 0 1 34 35 0 1 2 3!3 361 3 3 1 37 38 ⍝ some more values (integer result) 39 ⍝ 40 MAX_N←9223372036854775807,4294967296,3810779,121977,16175,4337,1733 41 MAX_N←MAX_N, 887,534,361,265,206,169,143,125,111,101,94,88,83,79,76 42 MAX_N←MAX_N, 74,72,70,69,68,67,67,66,66,66,66 43 ⎕←MAX_K←⍴MAX_N 4433 45 46∇Z←NK K 47 Z←0 3⍴0 48 ⊣ { Z←Z⍪ 1 3⍴K,⍵,K!⍵ }¨0 1 2 3 4 5, (? 5⍴MAX_N[K]), MAX_N[K] 49∇ 50 51 ⎕RL←42 52 Q←0 3⍴0 53 ⊣ { Q←Q⍪NK ⍵ }¨ 1 2 3 4 5 8 13 19 24 30,MAX_K 54 Q 55 1 0 0 56 1 1 1 57 1 2 2 58 1 3 3 59 1 4 4 60 1 5 5 61 1 733621415450823169 733621415450823169 62 1 7201192572413703971 7201192572413703971 63 1 4766846659954301174 4766846659954301174 64 1 4698523324959751691 4698523324959751691 65 1 1520599422057448132 1520599422057448132 66 1 9223372036854775807 9223372036854775807 67 2 0 0 68 2 1 0 69 2 2 1 70 2 3 3 71 2 4 6 72 2 5 10 73 2 856713145 366978705979538940 74 2 1270397095 806954388857020965 75 2 422265614 89154124172265691 76 2 287639920 41368361644983240 77 2 4195311207 8800318059692242821 78 2 4294967296 9223372034707292160 79 3 0 0 80 3 1 0 81 3 2 0 82 3 3 1 83 3 4 4 84 3 5 10 85 3 551349 27933551778417474 86 3 2749310 3463533646064260220 87 3 258222 2869613624244940 88 3 2152391 1661925863615794435 89 3 1169013 266259834283306786 90 3 3810779 9223371416043870029 91 4 0 0 92 4 1 0 93 4 2 0 94 4 3 0 95 4 4 1 96 4 5 5 97 4 106615 5383163394544579215 98 4 19883 6510065312019570 99 4 45027 171246985352263800 100 4 120084 8663784512230179501 101 4 31135 39147185417392585 102 4 121977 9223148185681446450 103 5 0 0 104 5 1 0 105 5 2 0 106 5 3 0 107 5 4 0 108 5 5 1 109 5 7760 234189594272745552 110 5 4085 9456175489077317 111 5 14250 4893147140768909100 112 5 596 616232819664 113 5 12599 2643348272435353769 114 5 16175 9220865312154653235 115 8 0 0 116 8 1 0 117 8 2 0 118 8 3 0 119 8 4 0 120 8 5 0 121 8 547 188818693654132620 122 8 711 1556943346369972440 123 8 559 224865291924227799 124 8 317 2313593405249685 125 8 803 4140120227034970860 126 8 887 9207044098280898870 12713 0 0 12813 1 0 12913 2 0 13013 3 0 13113 4 0 13213 5 0 13313 49 262596783764 13413 142 870136377630555630 13513 71 58104729088840 13613 7 0 13713 137 534492856408644000 13813 169 9176358300744339432 13919 0 0 14019 1 0 14119 2 0 14219 3 0 14319 4 0 14419 5 0 14519 57 636983969321700 14619 67 24151581961607100 14719 8 0 14819 35 4059928950 14919 49 18851684897584 15019 88 8910491434304783400 15124 0 0 15224 1 0 15324 2 0 15424 3 0 15524 4 0 15624 5 0 15724 66 624439409096903400 15824 58 12832205713993575 15924 11 0 16024 65 397370533061665800 16124 21 0 16224 72 7950261662089028100 16330 0 0 16430 1 0 16530 2 0 16630 3 0 16730 4 0 16830 5 0 16930 24 0 17030 61 232714176627630544 17130 51 114456658306760 17230 10 0 17330 2 0 17430 66 5516694892996182896 17533 0 0 17633 1 0 17733 2 0 17833 3 0 17933 4 0 18033 5 0 18133 61 191724747789809255 18233 1 0 18333 59 39602161018878633 18433 12 0 18533 48 1093260079344 18633 66 7219428434016265740 187 188