Mercurial > hg > Members > kono > Proof > ZF-in-agda
diff zf.agda @ 73:dd430a95610f
fix ordinal
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Sat, 01 Jun 2019 18:17:24 +0900 |
parents | f39f1a90d154 |
children | 8e8f54e7a030 |
line wrap: on
line diff
--- a/zf.agda Sat Jun 01 14:43:05 2019 +0900 +++ b/zf.agda Sat Jun 01 18:17:24 2019 +0900 @@ -51,7 +51,7 @@ pair : ( A B : ZFSet ) → ( (A , B) ∋ A ) ∧ ( (A , B) ∋ B ) -- ∀ x ∃ y ∀ z (z ∈ y ⇔ ∃ u ∈ x ∧ (z ∈ u)) union-u : ( X z : ZFSet ) → Union X ∋ z → ZFSet - union→ : ( X z u : ZFSet ) → ((Union X ∋ u ) ∧ (u ∋ z )) → Union X ∋ z + union→ : ( X z u : ZFSet ) → ( X ∋ u ) ∧ (u ∋ z ) → Union X ∋ z union← : ( X z : ZFSet ) → (X∋z : Union X ∋ z ) → (X ∋ union-u X z X∋z) ∧ (union-u X z X∋z ∋ z ) _∈_ : ( A B : ZFSet ) → Set m A ∈ B = B ∋ A