Proove that IsCategory is a mere proposition!

This commit is contained in:
Frederik Hanghøj Iversen 2018-02-20 18:01:26 +01:00
parent 159bffa6ae
commit a4f8a37e36

View file

@ -165,7 +165,7 @@ module _ {a b : Level} {C : RawCategory a b} where
P y eq = (b' : Univ y) U eq b'
helper : (b' : Univ X.ident)
(λ _ Univ X.ident) [ X.univalent b' ]
helper univ = {!!}
helper univ = propUnivalent x X.univalent univ
foo = pathJ P helper Y.ident ident
eqUni : U ident Y.univalent
eqUni = foo Y.univalent