drop both from Definitions

This commit is contained in:
Richard Marko 2022-03-21 16:00:36 +01:00
parent d2082aeec0
commit ad45724dae

View File

@ -17,7 +17,6 @@ module Graphics.Implicit.Definitions (
module N,
,
2,
both,
3,
min,
ComponentWiseMultable,
@ -108,11 +107,6 @@ min = 0.0000000000000002
-- for Floats.
--min = 0.00000011920928955078125 * 2
-- | apply a function to both items in the provided tuple.
both :: (t -> b) -> (t, t) -> (b, b)
both f (x,y) = (f x, f y)
{-# INLINABLE both #-}
-- Wrap the functions that convert datatypes.
-- | Convert from our Integral to our Rational.