rhi/quox
rhi/quox
1
0
Fork 0
Code Issues 15 Pull requests 1 Releases Wiki Activity

Eq/Ord/Show for No

Browse source
This commit is contained in:
rhiannon morris 2024-05-23 23:27:00 +02:00
parent 2d75b92d6d
commit 42c2217907
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lib/Quox/No.idr
View file

@ -13,6 +13,10 @@ data No : Pred Bool where
export Uninhabited (No True) where uninhabited _ impossible export Uninhabited (No True) where uninhabited _ impossible
export Eq (No p) where _ == _ = True
export Ord (No p) where compare _ _ = EQ
export Show (No p) where showPrec _ _ = "Ah"
export %inline export %inline
soNo : So b -> No b -> Void soNo : So b -> No b -> Void
soNo Oh Ah impossible soNo Oh Ah impossible