Skip to content

Instantly share code, notes, and snippets.

@mrcrilly

mrcrilly/01.hs

Created July 20, 2019 11:37
Show Gist options
  • Save mrcrilly/6d024c93a67f4907f27bef3056e88730 to your computer and use it in GitHub Desktop.
Save mrcrilly/6d024c93a67f4907f27bef3056e88730 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
01.hs
type Colour = String
type ColourPoint = (Int, Int, Colour)
c1 = (10, 10, "red")
c2 = (90, 90, "yellow")
colourOfPoint (x, y, c) = c
Raw
02.hs
type Colour = String
type ColourPoint = (Int, Int, Colour)
c1 = (10, 10, "red")
c2 = (90, 90, "yellow")
colourOfPoint :: ColourPoint -> String
colourOfPoint (x, y, c) = c
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment