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