Mercurial > hg > Members > kono > Proof > ZF-in-agda
diff Ordinals.agda @ 324:fbabb20f222e
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sat, 04 Jul 2020 18:18:17 +0900 |
parents | a81824502ebd |
children | feeba7fd499a |
line wrap: on
line diff
--- a/Ordinals.agda Sat Jul 04 12:53:40 2020 +0900 +++ b/Ordinals.agda Sat Jul 04 18:18:17 2020 +0900 @@ -22,7 +22,7 @@ osuc-≡< : { a x : ord } → x o< osuc a → (x ≡ a ) ∨ (x o< a) is-limit : ( x : ord ) → Dec ( ¬ ((y : ord) → x ≡ osuc y) ) next-limit : { y : ord } → (y o< next y ) ∧ ((x : ord) → x o< next y → osuc x o< next y ) - TransFinite : { ψ : ord → Set (suc n) } + TransFinite : { ψ : ord → Set n } → ( (x : ord) → ( (y : ord ) → y o< x → ψ y ) → ψ x ) → ∀ (x : ord) → ψ x