Bernoulli numbers: Difference between revisions

Content added Content deleted
Line 838: Line 838:
0 1 1 "%2d : %d / %d\n" printf
0 1 1 "%2d : %d / %d\n" printf
1 -1 2 "%2d : %d / %d\n" printf
1 -1 2 "%2d : %d / %d\n" printf
30 iota [ 1 + 2 * dup bernoulli [ numerator ] [ denominator ] bi
30 iota [
1 + 2 * dup bernoulli [ numerator ] [ denominator ] bi
"%2d : %d / %d\n" printf ] each
"%2d : %d / %d\n" printf
] each
] time
] time
0 : 1 / 1
0 : 1 / 1