# HG changeset patch
# User Shinji KONO <kono@ie.u-ryukyu.ac.jp>
# Date 1592891155 -32400
# Node ID 171f23379e2e164210b6a3576e5877b8ad76f1e0
# Parent  3795ffb127d02ba7a525ae32ffd61eb384948f3e
better to use ordinal number hierachy to create HOD

diff -r 3795ffb127d0 -r 171f23379e2e OD.agda
--- a/OD.agda	Tue Jun 23 11:14:30 2020 +0900
+++ b/OD.agda	Tue Jun 23 14:45:55 2020 +0900
@@ -98,8 +98,8 @@
 Ords : OD
 Ords = record { def = λ x → One }
 
--- maxod : {x : OD} → od→ord x o< od→ord Ords
--- maxod {x} = c<→o< OneObj
+maxod0 : {x : OD} → od→ord x o< od→ord Ords
+maxod0 {x} = c<→o< OneObj
 
 -- Ordinal in OD ( and ZFSet ) Transitive Set
 Ord : ( a : Ordinal  ) → OD