diff options
Diffstat (limited to 'ycomb.pez')
| -rw-r--r-- | ycomb.pez | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1,5 +1,5 @@ -@Y: {[f] {[i] i[i]}[{[i] f[{[x] i[i][x]}]}]} +@Y: $[f]{$[i]{i[i]}[$[i]{f[$[x]{i[i][x]}]}]} -@fact: {[n] Y[{[f] {[n] n == 0 ? 1 : n * f[n - 1]}}][n]} +@fact: $[n] {Y[$[f]{$[n] {n == 0 ? 1 : n * f[n - 1]}}][n]} printf["%a\n", fact[5]] |