Skip to content

Commit

Permalink
.
Browse files Browse the repository at this point in the history
  • Loading branch information
EvgenyMakarov committed Jan 29, 2013
1 parent 4dfdc13 commit 52cff51
Show file tree
Hide file tree
Showing 2 changed files with 1 addition and 3 deletions.
2 changes: 0 additions & 2 deletions broken/BanachFixpoint.v
Original file line number Diff line number Diff line change
Expand Up @@ -199,8 +199,6 @@ end.
- intros; apply mspc_symm; now apply A.
Qed.

SearchAbout (?x = ?y ∨ ?x < ?y).

Let a := lim (reg_fun x _ cauchy_x).

Lemma banach_fixpoint : f a = a.
Expand Down
2 changes: 1 addition & 1 deletion broken/metric.v
Original file line number Diff line number Diff line change
Expand Up @@ -630,7 +630,7 @@ constructor.
+ intros z1 z2 e [A1 A2].
(* Below we prove [0 ≤ e] using [radius_nonneg], which requires
[ExtMetricSpaceClass]. Another way is to add the assymption [0 ≤ e] to
[lip_prf], sinilar to [uc_prf]. *)
[lip_prf], similar to [uc_prf]. *)
assert (0 ≤ e) by now apply (radius_nonneg (fst z1) (fst z2)).
split; simpl.
- apply (mspc_monotone (L1 * e)); [apply (order_preserving (.* e)); apply join_ub_l |].
Expand Down

0 comments on commit 52cff51

Please sign in to comment.