{-# OPTIONS_GHC -Wno-orphans #-} module Mischief.Math.Vec.Orphans.Default where import Data.Default import Linear instance (Default a) => Default (V2 a) where def :: V2 a def = a -> a -> V2 a forall a. a -> a -> V2 a V2 (forall a. Default a => a def @a) (forall a. Default a => a def @a) instance (Default a) => Default (V3 a) where def :: V3 a def = a -> a -> a -> V3 a forall a. a -> a -> a -> V3 a V3 (forall a. Default a => a def @a) (forall a. Default a => a def @a) (forall a. Default a => a def @a)