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