diff cardinal.agda @ 274:29a85a427ed2

ε-induction
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sat, 25 Apr 2020 15:09:07 +0900
parents 985a1af11bce
children 6f10c47e4e7a
line wrap: on
line diff
--- a/cardinal.agda	Sat Jan 11 20:11:51 2020 +0900
+++ b/cardinal.agda	Sat Apr 25 15:09:07 2020 +0900
@@ -5,6 +5,7 @@
 open import zf
 open import logic
 import OD 
+import OPair
 open import Data.Nat renaming ( zero to Zero ; suc to Suc ;  ℕ to Nat ; _⊔_ to _n⊔_ ) 
 open import Relation.Binary.PropositionalEquality
 open import Data.Nat.Properties 
@@ -16,6 +17,7 @@
 open inOrdinal O
 open OD O
 open OD.OD
+open OPair O
 
 open _∧_
 open _∨_