RosettaCodeData/Task/Partial-function-application/Mathematica/partial-function-application.math

6 lines
98 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
fs[f_, s_] := Map[f, s]
f1 [n_] := n*2
f2 [n_] := n^2
fsf1[s_] := fs[f1, s]
fsf2[s_] := fs[f2, s]