Theorem: EuclideanGeometry.reflection_eq_self_iff
File: Mathlib/Geometry/Euclidean/Basic.lean

tactic: rw [← orthogonalProjection_eq_self_iff, reflection_apply]
state_before: V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
⊢ ↑(reflection s) p = p ↔ p ∈ s

tactic: constructor
state_before: V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
⊢ ↑(↑(orthogonalProjection s) p) -ᵥ p +ᵥ ↑(↑(orthogonalProjection s) p) = p ↔ ↑(↑(orthogonalProjection s) p) = p

tactic: intro h
state_before: case mp
V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
⊢ ↑(↑(orthogonalProjection s) p) -ᵥ p +ᵥ ↑(↑(orthogonalProjection s) p) = p → ↑(↑(orthogonalProjection s) p) = p

tactic: rw [← @vsub_eq_zero_iff_eq V, vadd_vsub_assoc, ← two_smul ℝ (↑(orthogonalProjection s p) -ᵥ p),
  smul_eq_zero] at h
state_before: case mp
V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
h : ↑(↑(orthogonalProjection s) p) -ᵥ p +ᵥ ↑(↑(orthogonalProjection s) p) = p
⊢ ↑(↑(orthogonalProjection s) p) = p

tactic: norm_num at h
state_before: case mp
V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
h : 2 = 0 ∨ ↑(↑(orthogonalProjection s) p) -ᵥ p = 0
⊢ ↑(↑(orthogonalProjection s) p) = p

tactic: exact h
state_before: case mp
V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
h : ↑(↑(orthogonalProjection s) p) = p
⊢ ↑(↑(orthogonalProjection s) p) = p

tactic: intro h
state_before: case mpr
V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
⊢ ↑(↑(orthogonalProjection s) p) = p → ↑(↑(orthogonalProjection s) p) -ᵥ p +ᵥ ↑(↑(orthogonalProjection s) p) = p

tactic: simp [h]
state_before: case mpr
V : Type u_1
P : Type u_2
inst✝⁵ : NormedAddCommGroup V
inst✝⁴ : InnerProductSpace ℝ V
inst✝³ : MetricSpace P
inst✝² : NormedAddTorsor V P
s : AffineSubspace ℝ P
inst✝¹ : Nonempty { x // x ∈ s }
inst✝ : CompleteSpace { x // x ∈ direction s }
p : P
h : ↑(↑(orthogonalProjection s) p) = p
⊢ ↑(↑(orthogonalProjection s) p) -ᵥ p +ᵥ ↑(↑(orthogonalProjection s) p) = p