module Numeric.LAPACK.Wrapper where

-- cf. Data.Bifunctor.Flip
newtype Flip f b a = Flip {Flip f b a -> f a b
getFlip :: f a b}