fork download
copy 
  1. myreverse = foldl (\ys x -> x:ys) []
  2. xs = [1..1000001]
  3. main = putStr ("new list's head:" ++ (show $ head (myreverse xs)) ++ " old list's head:" ++  (show $ head xs))
Success #stdin #stdout 0.41s 64008KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
new list's head:1000001 old list's head:1
https://ideone.com/KGg1L
language:
Haskell (ghc 8.4.4)
created:
12 years ago
visibility:
public

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!