IN: scratchpad [ 0 1 1 "%2d : %d / %d\n" printf 1 -1 2 "%2d : %d / %d\n" printf 30 iota [ 1 + 2 * dup bernoulli [ numerator ] [ denominator ] bi "%2d : %d / %d\n" printf ] each ] time 0 : 1 / 1 1 : -1 / 2 2 : 1 / 6 4 : -1 / 30 6 : 1 / 42 8 : -1 / 30 10 : 5 / 66 12 : -691 / 2730 14 : 7 / 6 16 : -3617 / 510 18 : 43867 / 798 20 : -174611 / 330 22 : 854513 / 138 24 : -236364091 / 2730 26 : 8553103 / 6 28 : -23749461029 / 870 30 : 8615841276005 / 14322 32 : -7709321041217 / 510 34 : 2577687858367 / 6 36 : -26315271553053477373 / 1919190 38 : 2929993913841559 / 6 40 : -261082718496449122051 / 13530 42 : 1520097643918070802691 / 1806 44 : -27833269579301024235023 / 690 46 : 596451111593912163277961 / 282 48 : -5609403368997817686249127547 / 46410 50 : 495057205241079648212477525 / 66 52 : -801165718135489957347924991853 / 1590 54 : 29149963634884862421418123812691 / 798 56 : -2479392929313226753685415739663229 / 870 58 : 84483613348880041862046775994036021 / 354 60 : -1215233140483755572040304994079820246041491 / 56786730 Running time: 0.00489444 seconds