
Untitled
By: a guest on
Apr 7th, 2012 | syntax:
Haskell | size: 0.17 KB | hits: 34 | expires: Never
data Color = Color Int Int Int deriving Show
changeRed (Color red green blue) newred = (Color newred green blue)
main = putStrLn $ show $ changeRed (Color 1 2 3) 2