Use bot from stdlib

This commit is contained in:
Frederik Hanghøj Iversen 2017-11-15 22:56:04 +01:00
parent b46ef652ab
commit 1d040e5391

View file

@ -6,6 +6,7 @@ open import Agda.Primitive
open import Data.Unit.Base open import Data.Unit.Base
open import Data.Product open import Data.Product
open import Cubical.PathPrelude open import Cubical.PathPrelude
open import Data.Empty
postulate undefined : { : Level} {A : Set } A postulate undefined : { : Level} {A : Set } A
@ -115,8 +116,6 @@ module _ { ' : Level} { : Category {} {'}} { A B : Object } w
iso-is-epi-mono : {X} (f : .Arrow A B ) Isomorphism f Epimorphism {X = X} f × Monomorphism {X = X} f iso-is-epi-mono : {X} (f : .Arrow A B ) Isomorphism f Epimorphism {X = X} f × Monomorphism {X = X} f
iso-is-epi-mono f iso = iso-is-epi f iso , iso-is-mono f iso iso-is-epi-mono f iso = iso-is-epi f iso , iso-is-mono f iso
data : Set where
¬_ : { : Level} Set Set ¬_ : { : Level} Set Set
¬ A = A ¬ A = A