Partial function application: Difference between revisions
Content deleted Content added
m Corrected the F# header |
No edit summary |
||
| Line 483: | Line 483: | ||
} |
} |
||
}</lang> |
}</lang> |
||
=={{header|Egison}}== |
|||
<lang egison> |
|||
(define $fs (map $1 $2)) |
|||
(define $f1 (* $ 2)) |
|||
(define $f2 (power $ 2)) |
|||
(define $fsf1 (fs f1 $)) |
|||
(define $fsf2 (fs f2 $)) |
|||
(test (fsf1 {0 1 2 3})) |
|||
(test (fsf2 {0 1 2 3})) |
|||
(test (fsf1 {2 4 6 8})) |
|||
(test (fsf2 {2 4 6 8})) |
|||
</lang> |
|||
```Output:``` |
|||
<lang egison> |
|||
{0 2 4 6} |
|||
{0 1 4 9} |
|||
{4 8 12 16} |
|||
{4 16 36 64} |
|||
</lang> |
|||
=={{Header|F_Sharp|F#}}== |
=={{Header|F_Sharp|F#}}== |
||