| Copyright | (C) 2013 Richard Eisenberg |
|---|---|
| License | BSD-style (see LICENSE) |
| Maintainer | Richard Eisenberg (rae@cs.brynmawr.edu) |
| Stability | experimental |
| Portability | non-portable |
| Safe Haskell | None |
| Language | Haskell2010 |
Data.Singletons.Prelude.Ord
Contents
Synopsis
- class PEq a => POrd (a :: Type) where
- class SEq a => SOrd a where
- type family Comparing (a :: TyFun b a -> Type) (a :: b) (a :: b) :: Ordering where ...
- sComparing :: forall (t :: TyFun b a -> Type) (t :: b) (t :: b). SOrd a => Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply ComparingSym0 t) t) t :: Ordering)
- thenCmp :: Ordering -> Ordering -> Ordering
- type family ThenCmp (a :: Ordering) (a :: Ordering) :: Ordering where ...
- sThenCmp :: forall (t :: Ordering) (t :: Ordering). Sing t -> Sing t -> Sing (Apply (Apply ThenCmpSym0 t) t :: Ordering)
- data family Sing (a :: k)
- data ThenCmpSym0 (l :: TyFun Ordering (TyFun Ordering Ordering -> Type))
- data ThenCmpSym1 (l :: Ordering) (l :: TyFun Ordering Ordering)
- type ThenCmpSym2 (t :: Ordering) (t :: Ordering) = ThenCmp t t
- type LTSym0 = LT
- type EQSym0 = EQ
- type GTSym0 = GT
- data CompareSym0 (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Ordering -> Type))
- data CompareSym1 (l :: a6989586621679315171) (l :: TyFun a6989586621679315171 Ordering)
- type CompareSym2 (t :: a6989586621679315171) (t :: a6989586621679315171) = Compare t t
- data (<@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type))
- data (l :: a6989586621679315171) <@#@$$ (l :: TyFun a6989586621679315171 Bool)
- type (<@#@$$$) (t :: a6989586621679315171) (t :: a6989586621679315171) = (<) t t
- data (<=@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type))
- data (l :: a6989586621679315171) <=@#@$$ (l :: TyFun a6989586621679315171 Bool)
- type (<=@#@$$$) (t :: a6989586621679315171) (t :: a6989586621679315171) = (<=) t t
- data (>@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type))
- data (l :: a6989586621679315171) >@#@$$ (l :: TyFun a6989586621679315171 Bool)
- type (>@#@$$$) (t :: a6989586621679315171) (t :: a6989586621679315171) = (>) t t
- data (>=@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type))
- data (l :: a6989586621679315171) >=@#@$$ (l :: TyFun a6989586621679315171 Bool)
- type (>=@#@$$$) (t :: a6989586621679315171) (t :: a6989586621679315171) = (>=) t t
- data MaxSym0 (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type))
- data MaxSym1 (l :: a6989586621679315171) (l :: TyFun a6989586621679315171 a6989586621679315171)
- type MaxSym2 (t :: a6989586621679315171) (t :: a6989586621679315171) = Max t t
- data MinSym0 (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type))
- data MinSym1 (l :: a6989586621679315171) (l :: TyFun a6989586621679315171 a6989586621679315171)
- type MinSym2 (t :: a6989586621679315171) (t :: a6989586621679315171) = Min t t
- data ComparingSym0 (l :: TyFun (TyFun b6989586621679315161 a6989586621679315160 -> Type) (TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> Type))
- data ComparingSym1 (l :: TyFun b6989586621679315161 a6989586621679315160 -> Type) (l :: TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type))
- data ComparingSym2 (l :: TyFun b6989586621679315161 a6989586621679315160 -> Type) (l :: b6989586621679315161) (l :: TyFun b6989586621679315161 Ordering)
- type ComparingSym3 (t :: TyFun b6989586621679315161 a6989586621679315160 -> Type) (t :: b6989586621679315161) (t :: b6989586621679315161) = Comparing t t t
Documentation
class PEq a => POrd (a :: Type) #
Associated Types
type Compare (arg :: a) (arg :: a) :: Ordering #
type (arg :: a) < (arg :: a) :: Bool #
type (arg :: a) <= (arg :: a) :: Bool #
type (arg :: a) > (arg :: a) :: Bool #
type (arg :: a) >= (arg :: a) :: Bool #
Methods
sCompare :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply CompareSym0 t) t :: Ordering) #
(%<) :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply (<@#@$) t) t :: Bool) infix 4 #
(%<=) :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply (<=@#@$) t) t :: Bool) infix 4 #
(%>) :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply (>@#@$) t) t :: Bool) infix 4 #
(%>=) :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply (>=@#@$) t) t :: Bool) infix 4 #
sMax :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply MaxSym0 t) t :: a) #
sMin :: forall (t :: a) (t :: a). Sing t -> Sing t -> Sing (Apply (Apply MinSym0 t) t :: a) #
sCompare :: forall (t :: a) (t :: a). ((Apply (Apply CompareSym0 t) t :: Ordering) ~ Apply (Apply Compare_6989586621679316629Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply CompareSym0 t) t :: Ordering) #
(%<) :: forall (t :: a) (t :: a). ((Apply (Apply (<@#@$) t) t :: Bool) ~ Apply (Apply TFHelper_6989586621679316662Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply (<@#@$) t) t :: Bool) infix 4 #
(%<=) :: forall (t :: a) (t :: a). ((Apply (Apply (<=@#@$) t) t :: Bool) ~ Apply (Apply TFHelper_6989586621679316695Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply (<=@#@$) t) t :: Bool) infix 4 #
(%>) :: forall (t :: a) (t :: a). ((Apply (Apply (>@#@$) t) t :: Bool) ~ Apply (Apply TFHelper_6989586621679316728Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply (>@#@$) t) t :: Bool) infix 4 #
(%>=) :: forall (t :: a) (t :: a). ((Apply (Apply (>=@#@$) t) t :: Bool) ~ Apply (Apply TFHelper_6989586621679316761Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply (>=@#@$) t) t :: Bool) infix 4 #
sMax :: forall (t :: a) (t :: a). ((Apply (Apply MaxSym0 t) t :: a) ~ Apply (Apply Max_6989586621679316794Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply MaxSym0 t) t :: a) #
sMin :: forall (t :: a) (t :: a). ((Apply (Apply MinSym0 t) t :: a) ~ Apply (Apply Min_6989586621679316827Sym0 t) t) => Sing t -> Sing t -> Sing (Apply (Apply MinSym0 t) t :: a) #
Instances
sComparing :: forall (t :: TyFun b a -> Type) (t :: b) (t :: b). SOrd a => Sing t -> Sing t -> Sing t -> Sing (Apply (Apply (Apply ComparingSym0 t) t) t :: Ordering) #
sThenCmp :: forall (t :: Ordering) (t :: Ordering). Sing t -> Sing t -> Sing (Apply (Apply ThenCmpSym0 t) t :: Ordering) #
The singleton kind-indexed data family.
Instances
Defunctionalization symbols
data ThenCmpSym0 (l :: TyFun Ordering (TyFun Ordering Ordering -> Type)) #
Instances
| SuppressUnusedWarnings ThenCmpSym0 # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ThenCmpSym0 (l :: Ordering) # | |
Defined in Data.Singletons.Prelude.Ord | |
data ThenCmpSym1 (l :: Ordering) (l :: TyFun Ordering Ordering) #
Instances
| SuppressUnusedWarnings ThenCmpSym1 # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (ThenCmpSym1 l1 :: TyFun Ordering Ordering -> *) (l2 :: Ordering) # | |
Defined in Data.Singletons.Prelude.Ord | |
type ThenCmpSym2 (t :: Ordering) (t :: Ordering) = ThenCmp t t #
data CompareSym0 (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Ordering -> Type)) #
Instances
| SuppressUnusedWarnings (CompareSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Ordering -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (CompareSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Ordering -> Type) -> *) (l :: a6989586621679315171) # | |
Defined in Data.Singletons.Prelude.Ord type Apply (CompareSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Ordering -> Type) -> *) (l :: a6989586621679315171) = CompareSym1 l | |
data CompareSym1 (l :: a6989586621679315171) (l :: TyFun a6989586621679315171 Ordering) #
Instances
| SuppressUnusedWarnings (CompareSym1 :: a6989586621679315171 -> TyFun a6989586621679315171 Ordering -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (CompareSym1 l1 :: TyFun a Ordering -> *) (l2 :: a) # | |
Defined in Data.Singletons.Prelude.Ord | |
type CompareSym2 (t :: a6989586621679315171) (t :: a6989586621679315171) = Compare t t #
data (<@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type)) #
Instances
| SuppressUnusedWarnings ((<@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((<@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) (l :: a6989586621679315171) # | |
data (l :: a6989586621679315171) <@#@$$ (l :: TyFun a6989586621679315171 Bool) #
Instances
| SuppressUnusedWarnings ((<@#@$$) :: a6989586621679315171 -> TyFun a6989586621679315171 Bool -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((<@#@$$) l1 :: TyFun a Bool -> *) (l2 :: a) # | |
data (<=@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type)) #
Instances
| SuppressUnusedWarnings ((<=@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((<=@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) (l :: a6989586621679315171) # | |
data (l :: a6989586621679315171) <=@#@$$ (l :: TyFun a6989586621679315171 Bool) #
Instances
| SuppressUnusedWarnings ((<=@#@$$) :: a6989586621679315171 -> TyFun a6989586621679315171 Bool -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((<=@#@$$) l1 :: TyFun a Bool -> *) (l2 :: a) # | |
type (<=@#@$$$) (t :: a6989586621679315171) (t :: a6989586621679315171) = (<=) t t #
data (>@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type)) #
Instances
| SuppressUnusedWarnings ((>@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((>@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) (l :: a6989586621679315171) # | |
data (l :: a6989586621679315171) >@#@$$ (l :: TyFun a6989586621679315171 Bool) #
Instances
| SuppressUnusedWarnings ((>@#@$$) :: a6989586621679315171 -> TyFun a6989586621679315171 Bool -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((>@#@$$) l1 :: TyFun a Bool -> *) (l2 :: a) # | |
data (>=@#@$) (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type)) #
Instances
| SuppressUnusedWarnings ((>=@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((>=@#@$) :: TyFun a6989586621679315171 (TyFun a6989586621679315171 Bool -> Type) -> *) (l :: a6989586621679315171) # | |
data (l :: a6989586621679315171) >=@#@$$ (l :: TyFun a6989586621679315171 Bool) #
Instances
| SuppressUnusedWarnings ((>=@#@$$) :: a6989586621679315171 -> TyFun a6989586621679315171 Bool -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply ((>=@#@$$) l1 :: TyFun a Bool -> *) (l2 :: a) # | |
type (>=@#@$$$) (t :: a6989586621679315171) (t :: a6989586621679315171) = (>=) t t #
data MaxSym0 (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type)) #
Instances
| SuppressUnusedWarnings (MaxSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (MaxSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type) -> *) (l :: a6989586621679315171) # | |
data MaxSym1 (l :: a6989586621679315171) (l :: TyFun a6989586621679315171 a6989586621679315171) #
Instances
| SuppressUnusedWarnings (MaxSym1 :: a6989586621679315171 -> TyFun a6989586621679315171 a6989586621679315171 -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (MaxSym1 l1 :: TyFun a a -> *) (l2 :: a) # | |
data MinSym0 (l :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type)) #
Instances
| SuppressUnusedWarnings (MinSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (MinSym0 :: TyFun a6989586621679315171 (TyFun a6989586621679315171 a6989586621679315171 -> Type) -> *) (l :: a6989586621679315171) # | |
data MinSym1 (l :: a6989586621679315171) (l :: TyFun a6989586621679315171 a6989586621679315171) #
Instances
| SuppressUnusedWarnings (MinSym1 :: a6989586621679315171 -> TyFun a6989586621679315171 a6989586621679315171 -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (MinSym1 l1 :: TyFun a a -> *) (l2 :: a) # | |
data ComparingSym0 (l :: TyFun (TyFun b6989586621679315161 a6989586621679315160 -> Type) (TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> Type)) #
Instances
| SuppressUnusedWarnings (ComparingSym0 :: TyFun (TyFun b6989586621679315161 a6989586621679315160 -> Type) (TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (ComparingSym0 :: TyFun (TyFun b6989586621679315161 a6989586621679315160 -> Type) (TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> Type) -> *) (l :: TyFun b6989586621679315161 a6989586621679315160 -> Type) # | |
Defined in Data.Singletons.Prelude.Ord | |
data ComparingSym1 (l :: TyFun b6989586621679315161 a6989586621679315160 -> Type) (l :: TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type)) #
Instances
| SuppressUnusedWarnings (ComparingSym1 :: (TyFun b6989586621679315161 a6989586621679315160 -> Type) -> TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (ComparingSym1 l1 :: TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> *) (l2 :: b6989586621679315161) # | |
Defined in Data.Singletons.Prelude.Ord type Apply (ComparingSym1 l1 :: TyFun b6989586621679315161 (TyFun b6989586621679315161 Ordering -> Type) -> *) (l2 :: b6989586621679315161) = ComparingSym2 l1 l2 | |
data ComparingSym2 (l :: TyFun b6989586621679315161 a6989586621679315160 -> Type) (l :: b6989586621679315161) (l :: TyFun b6989586621679315161 Ordering) #
Instances
| SuppressUnusedWarnings (ComparingSym2 :: (TyFun b6989586621679315161 a6989586621679315160 -> Type) -> b6989586621679315161 -> TyFun b6989586621679315161 Ordering -> *) # | |
Defined in Data.Singletons.Prelude.Ord Methods suppressUnusedWarnings :: () # | |
| type Apply (ComparingSym2 l1 l2 :: TyFun b Ordering -> *) (l3 :: b) # | |
Defined in Data.Singletons.Prelude.Ord | |
type ComparingSym3 (t :: TyFun b6989586621679315161 a6989586621679315160 -> Type) (t :: b6989586621679315161) (t :: b6989586621679315161) = Comparing t t t #