arbitraryDegrees :: Gen Degrees
arbitraryDegrees = fromFloatDigits <$> (arbitrary :: Gen Double)
arbitraryDegrees :: Gen Degrees
arbitraryDegrees = fromFloatDigits <$> (arbitrary :: Gen Double)
arbitraryDegrees = fromFloatDigits <$> (arbitrary :: Gen Double)