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

data RawTH1S

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

instance () => FPtr (TH1S) where
        type Raw TH1S = RawTH1S
        get_fptr :: TH1S -> Ptr (Raw TH1S)
get_fptr (TH1S Ptr RawTH1S
ptr) = Ptr (Raw TH1S)
Ptr RawTH1S
ptr
        cast_fptr_to_obj :: Ptr (Raw TH1S) -> TH1S
cast_fptr_to_obj = Ptr (Raw TH1S) -> TH1S
Ptr RawTH1S -> TH1S
TH1S