Uninhabited instances

This commit is contained in:
rhiannon morris 2022-08-22 10:07:46 +02:00
parent 77e94a3033
commit 6dd18d89bd

View file

@ -74,7 +74,11 @@ data IsSubj : Qty -> Type where
SZero : IsSubj Zero SZero : IsSubj Zero
SOne : IsSubj One SOne : IsSubj One
export Uninhabited (IsSubj Any) where uninhabited _ impossible
public export public export
data IsGlobal : Qty -> Type where data IsGlobal : Qty -> Type where
GZero : IsGlobal Zero GZero : IsGlobal Zero
GAny : IsGlobal Any GAny : IsGlobal Any
export Uninhabited (IsGlobal One) where uninhabited _ impossible