RosettaCodeData/Task/Function-composition/Lingo/function-composition-4.lingo
2023-07-01 13:44:08 -04: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