changeset 973:2a67cae517d8

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 07 Nov 2022 17:56:03 +0900
parents 520aff512969
children 9bfe54cd9fb9 94357ced682d
files src/zorn.agda
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/zorn.agda	Mon Nov 07 16:08:29 2022 +0900
+++ b/src/zorn.agda	Mon Nov 07 17:56:03 2022 +0900
@@ -1221,6 +1221,8 @@
                            cs11 : px o< z1 →  odef (UnionCF A f mf ay supf1 x) (supf1 z1)
                            cs11 px<z1 = ⊥-elim ( ¬p<x<op ⟪ px<sf0px , subst₂ (λ j k → j o< k ) refl (sym (Oprev.oprev=x op)) 
                               (ordtrans≤-< (subst (λ k → supf0 px o< k) (cong osuc (sym (sf1=sp1 px<z1 )))  sfpx≤sp1 ) sz1<x) ⟫ )
+                           cs12 : z1 o≤ px →  odef (UnionCF A f mf ay supf1 x) (supf1 z1)
+                           cs12 = ?
 
 
           zc41 | (case1 x<sp ) = record { supf = supf0 ; sup=u = ? ; asupf = ? ; supf-mono = ? ; supf-< = ?