fork download 
  1. main = do
  2. 	print [25 .. 25]
  3. 	let t = (-1/0, 0/0)
  4. 	print t
  5. 	print $ uncurry compare t
  6. 	print [4, 1 .. 10]
  7. 	print [100, 1 .. 10]
  8. 	print [1/0, 1 .. 10]
  9. 	print [-1/0, 1 .. 10]
  10. 	print [0/0, 1 .. 10]
  11. 	print [-1/0, -1/0 .. -1/0]
  12.  
Success #stdin #stdout 0.02s 3640KB
comments (?)
stdin 
Standard input is empty
stdout 
[25]
(-Infinity,NaN)
GT
[]
[100]
[Infinity]
[-Infinity]
[]
[]
https://ideone.com/9HQgCW
language:
Haskell (ghc 8.4.4)
created:
13 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!