{-# LANGUAGE NoImplicitPrelude #-}
module Phladiprelio.AuxiliaryG (
lastFrom3
, firstFrom3
, secondFrom3
) where
import GHC.Base
lastFrom3 :: (a,b,c) -> c
lastFrom3 :: forall a b c. (a, b, c) -> c
lastFrom3 (a
_,b
_,c
z) = c
z
{-# INLINE lastFrom3 #-}
firstFrom3 :: (a, b, c) -> a
firstFrom3 :: forall a b c. (a, b, c) -> a
firstFrom3 (a
x, b
_, c
_) = a
x
{-# INLINE firstFrom3 #-}
secondFrom3 :: (a, b, c) -> b
secondFrom3 :: forall a b c. (a, b, c) -> b
secondFrom3 (a
_, b
y, c
_) = b
y
{-# INLINE secondFrom3 #-}