Anonymous user
First-class functions: Difference between revisions
→{{header|Elena}}
Line 972:
=={{header|Elena}}==
ELENA 3.3 :
<lang elena>import system'routines.
import system'math.
Line 985:
program =
[
var fs := (%"mathOp.sin[0]", %"mathOp.cos[0]", { eval [ ^
var gs := (%"mathOp.arcsin[0]", %"mathOp.arccos[0]", { eval[ ^
fs zip:gs by(:f:g)( 0.5r compose(f,g) );
| |||