mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-25 12:42:02 +03:00
22 lines
281 B
Idris
22 lines
281 B
Idris
|
module TestDoubles
|
||
|
|
|
||
|
|
put : Double -> IO ()
|
||
|
|
put = putStrLn . show
|
||
|
|
|
||
|
|
main : IO ()
|
||
|
|
main = do
|
||
|
|
put $ exp 1
|
||
|
|
put $ log 1
|
||
|
|
|
||
|
|
put $ sin 1
|
||
|
|
put $ cos 1
|
||
|
|
put $ tan 1
|
||
|
|
put $ asin 1
|
||
|
|
put $ acos 1
|
||
|
|
put $ atan 1
|
||
|
|
|
||
|
|
put $ sqrt 2
|
||
|
|
|
||
|
|
put $ floor 1.5
|
||
|
|
put $ ceiling 1.5
|