Use a newtype
24 Days of GHC Extensions: Welcome