AV
newtype NonZeroInt = NonZeroInt Int
toInt (NonZeroInt n) | n < 0 = n
| otherwise = n +1
Size: a a a
AV
newtype NonZeroInt = NonZeroInt Int
toInt (NonZeroInt n) | n < 0 = n
| otherwise = n +1
AV
AV
AV
AV
YR
AV
newtype NonZeroInt = NonZeroInt Int
toInt (NonZeroInt n) | n < 0 = n
| otherwise = n +1
AV
AV
YR
AV
AV
AV