RosettaCodeData/Task/Function-composition/Lingo/function-composition-4.lingo
2016-12-05 23:44:36 +01:00

14 lines
174 B
Text

-- in some movie script
on asin (x)
res = atan(sqrt(x*x/(1-x*x)))
if x<0 then res = -res
return res
end
on double (x)
return x*2
end
on triple (x)
return x*3
end