User:Coderjoe/Sandbox2: Difference between revisions
Content added Content deleted
No edit summary |
No edit summary |
||
Line 1:
<lang oz>declare
fun {Compose F G}
{F {G X}}
end
fun {CubeRoot X} {Number.pow X 1.0/3.0} end
in
} 0..2;</lang>▼
for
F in [Float.sin Float.cos Cube]
I in [Float.asin Float.acos CubeRoot]
do▼
{Show {{Compose I F} 0.5}}
end
|
Revision as of 20:38, 16 July 2011
<lang oz>declare
fun {Compose F G} fun {$ X} {F {G X}} end end
fun {Cube X} X*X*X end
fun {CubeRoot X} {Number.pow X 1.0/3.0} end
in
for F in [Float.sin Float.cos Cube] I in [Float.asin Float.acos CubeRoot] do {Show {{Compose I F} 0.5}} end
</lang>