Mercurial > hg > Members > kono > Proof > ZF-in-agda

diff ordinal.agda @ 202:ed88384b5102

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
ε-induction like loop again
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 30 Jul 2019 17:52:15 +0900
parents 65e1b2e415bb
children 8edd2a13a7f3
line wrap: on
line diff
--- a/ordinal.agda	Tue Jul 30 01:12:24 2019 +0900
+++ b/ordinal.agda	Tue Jul 30 17:52:15 2019 +0900
@@ -13,6 +13,7 @@
    OSuc : (lv : Nat) → OrdinalD {n} lv → OrdinalD lv
 
 record Ordinal {n : Level} : Set n where
+   constructor ordinal  
    field
      lv : Nat
      ord : OrdinalD {n} lv