RosettaCodeData/Task/First-class-functions/Maple/first-class-functions.maple

8 lines
220 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
> A := [ sin, cos, x -> x^3 ]:
> B := [ arcsin, arccos, rcurry( surd, 3 ) ]:
> zip( `@`, A, B )( 2/3 );
[2/3, 2/3, 2/3]
> zip( `@`, B, A )( 2/3 );
[2/3, 2/3, 2/3]