{-# LANGUAGE ForeignFunctionInterface, TypeFamilies, MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances, EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-} module GDAL.OGREnvelope.RawType where import Foreign.Ptr import FFICXX.Runtime.Cast data RawOGREnvelope newtype OGREnvelope = OGREnvelope (Ptr RawOGREnvelope) deriving (OGREnvelope -> OGREnvelope -> Bool (OGREnvelope -> OGREnvelope -> Bool) -> (OGREnvelope -> OGREnvelope -> Bool) -> Eq OGREnvelope forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: OGREnvelope -> OGREnvelope -> Bool == :: OGREnvelope -> OGREnvelope -> Bool $c/= :: OGREnvelope -> OGREnvelope -> Bool /= :: OGREnvelope -> OGREnvelope -> Bool Eq, Eq OGREnvelope Eq OGREnvelope -> (OGREnvelope -> OGREnvelope -> Ordering) -> (OGREnvelope -> OGREnvelope -> Bool) -> (OGREnvelope -> OGREnvelope -> Bool) -> (OGREnvelope -> OGREnvelope -> Bool) -> (OGREnvelope -> OGREnvelope -> Bool) -> (OGREnvelope -> OGREnvelope -> OGREnvelope) -> (OGREnvelope -> OGREnvelope -> OGREnvelope) -> Ord OGREnvelope OGREnvelope -> OGREnvelope -> Bool OGREnvelope -> OGREnvelope -> Ordering OGREnvelope -> OGREnvelope -> OGREnvelope forall a. Eq a -> (a -> a -> Ordering) -> (a -> a -> Bool) -> (a -> a -> Bool) -> (a -> a -> Bool) -> (a -> a -> Bool) -> (a -> a -> a) -> (a -> a -> a) -> Ord a $ccompare :: OGREnvelope -> OGREnvelope -> Ordering compare :: OGREnvelope -> OGREnvelope -> Ordering $c< :: OGREnvelope -> OGREnvelope -> Bool < :: OGREnvelope -> OGREnvelope -> Bool $c<= :: OGREnvelope -> OGREnvelope -> Bool <= :: OGREnvelope -> OGREnvelope -> Bool $c> :: OGREnvelope -> OGREnvelope -> Bool > :: OGREnvelope -> OGREnvelope -> Bool $c>= :: OGREnvelope -> OGREnvelope -> Bool >= :: OGREnvelope -> OGREnvelope -> Bool $cmax :: OGREnvelope -> OGREnvelope -> OGREnvelope max :: OGREnvelope -> OGREnvelope -> OGREnvelope $cmin :: OGREnvelope -> OGREnvelope -> OGREnvelope min :: OGREnvelope -> OGREnvelope -> OGREnvelope Ord, Int -> OGREnvelope -> ShowS [OGREnvelope] -> ShowS OGREnvelope -> String (Int -> OGREnvelope -> ShowS) -> (OGREnvelope -> String) -> ([OGREnvelope] -> ShowS) -> Show OGREnvelope forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> OGREnvelope -> ShowS showsPrec :: Int -> OGREnvelope -> ShowS $cshow :: OGREnvelope -> String show :: OGREnvelope -> String $cshowList :: [OGREnvelope] -> ShowS showList :: [OGREnvelope] -> ShowS Show) instance () => FPtr (OGREnvelope) where type Raw OGREnvelope = RawOGREnvelope get_fptr :: OGREnvelope -> Ptr (Raw OGREnvelope) get_fptr (OGREnvelope Ptr RawOGREnvelope ptr) = Ptr (Raw OGREnvelope) Ptr RawOGREnvelope ptr cast_fptr_to_obj :: Ptr (Raw OGREnvelope) -> OGREnvelope cast_fptr_to_obj = Ptr (Raw OGREnvelope) -> OGREnvelope Ptr RawOGREnvelope -> OGREnvelope OGREnvelope