Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/tests/conformance98/Misc/wolfram/Main.hs
floatFromInt :: Int -> Float floatFromInt = toEnum main = putStrLn (show (map floatFromInt [1,3,5,7,9,11,13,19]))
