fix(analysis/metric_space): unnecessary import, style, remove unnecessary lines

This commit is contained in:
Rob Lewis 2016-02-02 13:22:21 -05:00 committed by Leonardo de Moura
parent a675a5ede2
commit 87ec5ada07

View file

@ -5,7 +5,7 @@ Author: Jeremy Avigad
Metric spaces.
-/
import data.real.complete data.pnat data.list.sort data.fin
import data.real.complete data.pnat data.list.sort
open nat real eq.ops classical
structure metric_space [class] (M : Type) : Type :=
@ -314,7 +314,8 @@ open pnat rat
section
omit strucM
theorem of_rat_rat_of_pnat_eq_of_nat_nat_of_pnat {p : pnat} : of_rat (rat_of_pnat p) = of_nat (nat_of_pnat p) :=
private lemma of_rat_rat_of_pnat_eq_of_nat_nat_of_pnat (p : pnat) :
of_rat (rat_of_pnat p) = of_nat (nat_of_pnat p) :=
rfl
end
@ -459,9 +460,6 @@ theorem converges_seq_comp_of_converges_seq_of_cts [instance] (X : → M) [H
cases Hxlim (and.left Hδ) with B HB,
existsi B,
intro n Hn,
cases em (xlim = X n),
rewrite [a, dist_self],
assumption,
apply and.right Hδ,
apply HB Hn
end
@ -495,7 +493,7 @@ complete_metric_space.complete X H
end analysis
/- the reals form a metris space -/
/- the reals form a metric space -/
noncomputable definition metric_space_real [instance] : metric_space :=
⦃ metric_space,