Skip to content

Instantly share code, notes, and snippets.

@daemonfire300

daemonfire300/shit.hs

Created November 29, 2012 21:40
Show Gist options
  • Save daemonfire300/4172101 to your computer and use it in GitHub Desktop.
Save daemonfire300/4172101 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
shit.hs
map (\(k:ks) -> k ++ (k:ks) ) (map (\x -> map (\y -> (x,y)) [1,2,3,4]) [1,2,3,4])
<interactive>:32:54:
Couldn't match expected type `[a0]' with actual type `(t0, t1)'
In the expression: (x, y)
In the first argument of `map', namely `(\ y -> (x, y))'
In the expression: map (\ y -> (x, y)) [1, 2, 3, 4]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment