path: root/libraries/base/tests/Numeric/sqrt.hs

main = do
    print (sqrt (-7 :: Double))
    print (sqrt (-7 :: Float))