Merge branch 'master' into actual-inductives
This commit is contained in:
commit
f5d387b689
|
@ -50,8 +50,7 @@
|
||||||
(check-true (t? (term (λ (x_0 : (Unv 0)) x_0)))))
|
(check-true (t? (term (λ (x_0 : (Unv 0)) x_0)))))
|
||||||
|
|
||||||
;; 'A'
|
;; 'A'
|
||||||
;; (Unv 0)s of Universes
|
;; Types of Universes
|
||||||
;; Replace with sub-typing
|
|
||||||
(define-judgment-form cicL
|
(define-judgment-form cicL
|
||||||
#:mode (unv-ok I O)
|
#:mode (unv-ok I O)
|
||||||
#:contract (unv-ok U U)
|
#:contract (unv-ok U U)
|
||||||
|
|
Loading…
Reference in New Issue
Block a user