Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
newtype
newtype Degree = Degree Float
newtype Radian = Radian Float
toRad :: Degree -> Radian
toRad (Degree deg) = Radian (deg * pi / 180)
-- this works
new1 = toRad (Degree 90.0)
-- this doesn't work
-- new2 = toRad (Radian 1.25)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment