{-# LANGUAGE ForeignFunctionInterface, TypeFamilies,
  MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances,
  EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-}
module HROOT.Hist.TH3.RawType where
import Foreign.Ptr
import FFICXX.Runtime.Cast

data RawTH3

newtype TH3 = TH3 (Ptr RawTH3)
                deriving (TH3 -> TH3 -> Bool
(TH3 -> TH3 -> Bool) -> (TH3 -> TH3 -> Bool) -> Eq TH3
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TH3 -> TH3 -> Bool
== :: TH3 -> TH3 -> Bool
$c/= :: TH3 -> TH3 -> Bool
/= :: TH3 -> TH3 -> Bool
Eq, Eq TH3
Eq TH3
-> (TH3 -> TH3 -> Ordering)
-> (TH3 -> TH3 -> Bool)
-> (TH3 -> TH3 -> Bool)
-> (TH3 -> TH3 -> Bool)
-> (TH3 -> TH3 -> Bool)
-> (TH3 -> TH3 -> TH3)
-> (TH3 -> TH3 -> TH3)
-> Ord TH3
TH3 -> TH3 -> Bool
TH3 -> TH3 -> Ordering
TH3 -> TH3 -> TH3
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 :: TH3 -> TH3 -> Ordering
compare :: TH3 -> TH3 -> Ordering
$c< :: TH3 -> TH3 -> Bool
< :: TH3 -> TH3 -> Bool
$c<= :: TH3 -> TH3 -> Bool
<= :: TH3 -> TH3 -> Bool
$c> :: TH3 -> TH3 -> Bool
> :: TH3 -> TH3 -> Bool
$c>= :: TH3 -> TH3 -> Bool
>= :: TH3 -> TH3 -> Bool
$cmax :: TH3 -> TH3 -> TH3
max :: TH3 -> TH3 -> TH3
$cmin :: TH3 -> TH3 -> TH3
min :: TH3 -> TH3 -> TH3
Ord, Int -> TH3 -> ShowS
[TH3] -> ShowS
TH3 -> String
(Int -> TH3 -> ShowS)
-> (TH3 -> String) -> ([TH3] -> ShowS) -> Show TH3
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TH3 -> ShowS
showsPrec :: Int -> TH3 -> ShowS
$cshow :: TH3 -> String
show :: TH3 -> String
$cshowList :: [TH3] -> ShowS
showList :: [TH3] -> ShowS
Show)

instance () => FPtr (TH3) where
        type Raw TH3 = RawTH3
        get_fptr :: TH3 -> Ptr (Raw TH3)
get_fptr (TH3 Ptr RawTH3
ptr) = Ptr (Raw TH3)
Ptr RawTH3
ptr
        cast_fptr_to_obj :: Ptr (Raw TH3) -> TH3
cast_fptr_to_obj = Ptr (Raw TH3) -> TH3
Ptr RawTH3 -> TH3
TH3