Function composition: Difference between revisions

Added Arturo implementation
(Added Arturo implementation)
Line 351:
f.data = data
f</lang>
 
=={{header|Arturo}}==
 
<lang rebol>compose: function [f,g] ->
return function [x].import:[f,g][
call f @[call g @[x]]
]
 
sincos: compose 'sin 'cos
 
print call 'sincos [0.5]</lang>
 
{{out}}
 
<pre>0.7691963548410083</pre>
 
=={{header|AutoHotkey}}==
1,532

edits