RosettaCodeData/Task/Function-composition/11l/function-composition.11l

4 lines
108 B
Plaintext

V compose = (f, g) -> (x -> @f(@g(x)))
V sin_asin = compose(x -> sin(x), x -> asin(x))
print(sin_asin(0.5))