Nuprl Lemma : implies-isometry-lemma4

rv:InnerProductSpace. ∀f:Point(rv) ⟶ Point(rv). ∀r:{r:ℝr0 < r} .
  ((∀x,y:Point(rv).  (x ≡  x ≡ y))
   (∀x,y:Point(rv).  (((||x y|| r) ∨ (||x y|| (r(2) r)))  (||f y|| ||x y||)))
   (∀n,m:ℕ+. ∀x,y:Point(rv).  ((||x y|| < (r(n) r/r(m)))  (||f y|| ≤ (r(n) r/r(m))))))


Proof




Definitions occuring in Statement :  rv-norm: ||x|| rv-sub: y inner-product-space: InnerProductSpace rdiv: (x/y) rleq: x ≤ y rless: x < y req: y rmul: b int-to-real: r(n) real: nat_plus: + all: x:A. B[x] implies:  Q or: P ∨ Q set: {x:A| B[x]}  apply: a function: x:A ⟶ B[x] natural_number: $n
Definitions unfolded in proof :  all: x:A. B[x] member: t ∈ T implies:  Q uall: [x:A]. B[x] subtype_rel: A ⊆B nat_plus: + uimplies: supposing a rneq: x ≠ y guard: {T} or: P ∨ Q iff: ⇐⇒ Q and: P ∧ Q rev_implies:  Q decidable: Dec(P) not: ¬A satisfiable_int_formula: satisfiable_int_formula(fmla) exists: x:A. B[x] false: False prop: rless: x < y sq_exists: x:A [B[x]] stable: Stable{P} uiff: uiff(P;Q) rev_uimplies: rev_uimplies(P;Q) less_than: a < b squash: T less_than': less_than'(a;b) true: True so_lambda: λ2x.t[x] so_apply: x[s] sq_type: SQType(T) int_nzero: -o nequal: a ≠ b ∈  rdiv: (x/y) req_int_terms: t1 ≡ t2 top: Top rv-sub: y rv-minus: -x cand: c∧ B ip-congruent: ab=cd nat: le: A ≤ B sq_stable: SqStable(P) rge: x ≥ y real:
Lemmas referenced :  implies-isometry-lemma3 rless_wf rv-norm_wf rv-sub_wf rdiv_wf rmul_wf int-to-real_wf rless-int nat_plus_properties decidable__lt full-omega-unsat intformand_wf intformnot_wf intformless_wf itermConstant_wf itermVar_wf istype-int int_formula_prop_and_lemma int_formula_prop_not_lemma int_formula_prop_less_lemma int_term_value_constant_lemma int_term_value_var_lemma int_formula_prop_wf Error :ss-point_wf,  nat_plus_wf req_wf inner-product-space_subtype Error :ss-eq_wf,  real_wf real-vector-space_subtype1 subtype_rel_transitivity inner-product-space_wf real-vector-space_wf Error :separation-space_wf,  stable__rleq false_wf not_wf rleq_wf istype-void minimal-double-negation-hyp-elim minimal-not-not-excluded-middle rless_transitivity2 rleq_weakening_rless rmul_preserves_req itermMultiply_wf int_term_value_mul_lemma rinv_wf2 itermSubtract_wf rneq_functionality rmul-int req_weakening rneq-int intformeq_wf int_formula_prop_eq_lemma set_subtype_base less_than_wf int_subtype_base subtype_base_sq decidable__equal_int nequal_wf req_functionality req_transitivity rmul_functionality req_inversion rmul-rinv3 rinv_functionality2 rinv-of-rmul int-rinv-cancel req-iff-rsub-is-0 real_polynomial_null real_term_value_sub_lemma real_term_value_mul_lemma real_term_value_var_lemma real_term_value_const_lemma rless_functionality rv-sep-iff-norm rmul_preserves_rless rv-add_wf rv-mul_wf radd_wf rminus_wf rv-minus_wf itermMinus_wf itermAdd_wf uiff_transitivity Error :ss-eq_functionality,  Error :ss-eq_weakening,  rv-mul-linear rv-add_functionality rv-add-assoc rv-mul-mul rv-mul-1-add rv-add-swap rv-mul-add rv-mul_functionality radd_functionality real_term_value_minus_lemma real_term_value_add_lemma rv-add-comm rv-mul-add-alt ip-circle-circle-lemma3 Error :ss-sep_wf,  ip-congruent_wf rabs_wf rleq_functionality rv-norm_functionality rv-norm-mul rabs-of-nonneg rsub_wf Error :ss-eq_transitivity,  rv-mul-1-add-alt rv-norm-difference-symmetry rabs_functionality rminus_functionality rinv-mul-as-rdiv square-rleq-implies rnexp_wf istype-le rnexp2-nonneg rnexp2 radd-preserves-rleq rnexp-rmul rabs-rnexp sq_stable__and sq_stable__req req_witness istype-less_than rv-norm-triangle-inequality2 rleq_functionality_wrt_implies rleq_transitivity rleq_weakening rleq_weakening_equal radd-rdiv rleq-int-fractions sq_stable__less_than decidable__le intformle_wf int_formula_prop_le_lemma rmul-is-positive sq_stable__rless rmul_preserves_rleq2 not-rless rv-norm-nonneg rleq_antisymmetry rv-sub-is-zero rv-norm-is-zero rv-sub_functionality rv-sub-same rv-0_wf rv-norm0
Rules used in proof :  cut introduction extract_by_obid sqequalSubstitution sqequalTransitivity computationStep sqequalReflexivity lambdaFormation_alt hypothesis sqequalHypSubstitution dependent_functionElimination thin hypothesisEquality independent_functionElimination universeIsType isectElimination applyEquality because_Cache sqequalRule setElimination rename independent_isectElimination inrFormation_alt productElimination natural_numberEquality unionElimination approximateComputation dependent_pairFormation_alt lambdaEquality_alt int_eqEquality Error :memTop,  independent_pairFormation voidElimination inhabitedIsType functionIsType unionIsType equalityTransitivity equalitySymmetry setIsType instantiate unionEquality functionEquality equalityIstype multiplyEquality closedConclusion imageMemberEquality baseClosed baseApply intEquality sqequalBase cumulativity dependent_set_memberEquality_alt isect_memberEquality_alt minusEquality productIsType functionIsTypeImplies promote_hyp imageElimination addEquality inlFormation_alt

Latex:
\mforall{}rv:InnerProductSpace.  \mforall{}f:Point(rv)  {}\mrightarrow{}  Point(rv).  \mforall{}r:\{r:\mBbbR{}|  r0  <  r\}  .
    ((\mforall{}x,y:Point(rv).    (x  \mequiv{}  y  {}\mRightarrow{}  f  x  \mequiv{}  f  y))
    {}\mRightarrow{}  (\mforall{}x,y:Point(rv).
                (((||x  -  y||  =  r)  \mvee{}  (||x  -  y||  =  (r(2)  *  r)))  {}\mRightarrow{}  (||f  x  -  f  y||  =  ||x  -  y||)))
    {}\mRightarrow{}  (\mforall{}n,m:\mBbbN{}\msupplus{}.  \mforall{}x,y:Point(rv).
                ((||x  -  y||  <  (r(n)  *  r/r(m)))  {}\mRightarrow{}  (||f  x  -  f  y||  \mleq{}  (r(n)  *  r/r(m))))))



Date html generated: 2020_05_20-PM-01_16_13
Last ObjectModification: 2019_12_11-PM-07_59_28

Theory : inner!product!spaces


Home Index