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

8 lines
220 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04: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]