RosettaCodeData/Task/Function-composition/Oforth/function-composition-3.fth

3 lines
106 B
Forth

1.2 compose(#asin, #sin) perform
[ 1, 2, 3, 4, 5 ] compose(#[ map(#sqrt) ], #[ filter(#isEven) ]) perform