...

[helm.git] / helm / software / matita / dama / constructive_pointfree / lebesgue.ma

diff --git a/helm/software/matita/dama/constructive_pointfree/lebesgue.ma b/helm/software/matita/dama/constructive_pointfree/lebesgue.ma
index 1eb6e4aac306deb2fb1cb9f663b7f768c36071c5..824202a78e4a3ef832c08ac4f8ba93c2ef2d5cae 100644 (file)
--- a/helm/software/matita/dama/constructive_pointfree/lebesgue.ma
+++ b/helm/software/matita/dama/constructive_pointfree/lebesgue.ma
@@ -19,3 +19,9 @@ include "sequence.ma".
 
 (* Section 3.2 *)
 
+(* 3.17 *)
+
+
+(* 3.20 *)
+lemma uniq_sup: ∀O:ogroup.∀s:sequence O.∀x,y:O. is_sup ? s x → is_sup ? s y → x ≈ y.
+intros; 
\ No newline at end of file