geometry.euclidean.angle.oriented.right_angle ⟷ Mathlib.Geometry.Euclidean.Angle.Oriented.RightAngle

mathlib commit https://github.com/leanprover-community/mathlib/commit/65a1391a0106c9204fe45bc73a039f056558cb83

@@ -652,7 +652,7 @@ theorem oangle_add_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ
         sub_eq_zero, add_comm, sub_neg_eq_add, ← Real.Angle.coe_add, ← Real.Angle.coe_add,
         add_assoc, add_halves, ← two_mul, Real.Angle.coe_two_pi]
       simpa using h
-    rw [← neg_inj, ← oangle_neg_orientation_eq_neg, neg_neg] at ha 
+    rw [← neg_inj, ← oangle_neg_orientation_eq_neg, neg_neg] at ha
     rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj, oangle_rev,
       (-o).oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two ha, norm_smul,
       LinearIsometryEquiv.norm_map, mul_div_assoc, div_self (norm_ne_zero_iff.2 h), mul_one,

mathlib commit https://github.com/leanprover-community/mathlib/commit/ce64cd319bb6b3e82f31c2d38e79080d377be451

@@ -3,8 +3,8 @@ Copyright (c) 2022 Joseph Myers. All rights reserved.
 Released under Apache 2.0 license as described in the file LICENSE.
 Authors: Joseph Myers
 -/
-import Mathbin.Geometry.Euclidean.Angle.Oriented.Affine
-import Mathbin.Geometry.Euclidean.Angle.Unoriented.RightAngle
+import Geometry.Euclidean.Angle.Oriented.Affine
+import Geometry.Euclidean.Angle.Unoriented.RightAngle
 
 #align_import geometry.euclidean.angle.oriented.right_angle from "leanprover-community/mathlib"@"8af7091a43227e179939ba132e54e54e9f3b089a"
 

mathlib commit https://github.com/leanprover-community/mathlib/commit/8ea5598db6caeddde6cb734aa179cc2408dbd345

@@ -2,15 +2,12 @@
 Copyright (c) 2022 Joseph Myers. All rights reserved.
 Released under Apache 2.0 license as described in the file LICENSE.
 Authors: Joseph Myers
-
-! This file was ported from Lean 3 source module geometry.euclidean.angle.oriented.right_angle
-! leanprover-community/mathlib commit 8af7091a43227e179939ba132e54e54e9f3b089a
-! Please do not edit these lines, except to modify the commit id
-! if you have ported upstream changes.
 -/
 import Mathbin.Geometry.Euclidean.Angle.Oriented.Affine
 import Mathbin.Geometry.Euclidean.Angle.Unoriented.RightAngle
 
+#align_import geometry.euclidean.angle.oriented.right_angle from "leanprover-community/mathlib"@"8af7091a43227e179939ba132e54e54e9f3b089a"
+
 /-!
 # Oriented angles in right-angled triangles.
 

mathlib commit https://github.com/leanprover-community/mathlib/commit/2a0ce625dbb0ffbc7d1316597de0b25c1ec75303

@@ -39,6 +39,7 @@ variable {V : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V]
 
 variable [hd2 : Fact (finrank ℝ V = 2)] (o : Orientation ℝ V (Fin 2))
 
+#print Orientation.oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arccos`. -/
 theorem oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle x (x + y) = Real.arccos (‖x‖ / ‖x + y‖) :=
@@ -49,7 +50,9 @@ theorem oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
     InnerProductGeometry.angle_add_eq_arccos_of_inner_eq_zero
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two Orientation.oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arccos`. -/
 theorem oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x + y) y = Real.arccos (‖y‖ / ‖x + y‖) :=
@@ -58,7 +61,9 @@ theorem oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangl
   rw [add_comm]
   exact (-o).oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two h
 #align orientation.oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two Orientation.oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arcsin`. -/
 theorem oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle x (x + y) = Real.arcsin (‖y‖ / ‖x + y‖) :=
@@ -70,7 +75,9 @@ theorem oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.left_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two Orientation.oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arcsin`. -/
 theorem oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x + y) y = Real.arcsin (‖x‖ / ‖x + y‖) :=
@@ -79,7 +86,9 @@ theorem oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangl
   rw [add_comm]
   exact (-o).oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two h
 #align orientation.oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two Orientation.oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`. -/
 theorem oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle x (x + y) = Real.arctan (‖y‖ / ‖x‖) :=
@@ -90,7 +99,9 @@ theorem oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
     InnerProductGeometry.angle_add_eq_arctan_of_inner_eq_zero
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h) (o.left_ne_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two Orientation.oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`. -/
 theorem oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x + y) y = Real.arctan (‖x‖ / ‖y‖) :=
@@ -99,7 +110,9 @@ theorem oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangl
   rw [add_comm]
   exact (-o).oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two h
 #align orientation.oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two Orientation.oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_add_right_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem cos_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.cos (o.oangle x (x + y)) = ‖x‖ / ‖x + y‖ :=
@@ -109,7 +122,9 @@ theorem cos_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [o.oangle_eq_angle_of_sign_eq_one hs, Real.Angle.cos_coe,
     InnerProductGeometry.cos_angle_add_of_inner_eq_zero (o.inner_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.cos_oangle_add_right_of_oangle_eq_pi_div_two Orientation.cos_oangle_add_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_add_left_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem cos_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.cos (o.oangle (x + y) y) = ‖y‖ / ‖x + y‖ :=
@@ -118,7 +133,9 @@ theorem cos_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [add_comm]
   exact (-o).cos_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_add_left_of_oangle_eq_pi_div_two Orientation.cos_oangle_add_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_add_right_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem sin_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.sin (o.oangle x (x + y)) = ‖y‖ / ‖x + y‖ :=
@@ -129,7 +146,9 @@ theorem sin_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
     InnerProductGeometry.sin_angle_add_of_inner_eq_zero (o.inner_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.left_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.sin_oangle_add_right_of_oangle_eq_pi_div_two Orientation.sin_oangle_add_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_add_left_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem sin_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.sin (o.oangle (x + y) y) = ‖x‖ / ‖x + y‖ :=
@@ -138,7 +157,9 @@ theorem sin_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [add_comm]
   exact (-o).sin_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_add_left_of_oangle_eq_pi_div_two Orientation.sin_oangle_add_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_add_right_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle as a ratio of sides. -/
 theorem tan_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.tan (o.oangle x (x + y)) = ‖y‖ / ‖x‖ :=
@@ -148,7 +169,9 @@ theorem tan_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [o.oangle_eq_angle_of_sign_eq_one hs, Real.Angle.tan_coe,
     InnerProductGeometry.tan_angle_add_of_inner_eq_zero (o.inner_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.tan_oangle_add_right_of_oangle_eq_pi_div_two Orientation.tan_oangle_add_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_add_left_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle as a ratio of sides. -/
 theorem tan_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.tan (o.oangle (x + y) y) = ‖x‖ / ‖y‖ :=
@@ -157,7 +180,9 @@ theorem tan_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [add_comm]
   exact (-o).tan_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_add_left_of_oangle_eq_pi_div_two Orientation.tan_oangle_add_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 adjacent side. -/
 theorem cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -169,7 +194,9 @@ theorem cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     InnerProductGeometry.cos_angle_add_mul_norm_of_inner_eq_zero
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two Orientation.cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 adjacent side. -/
 theorem cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -179,7 +206,9 @@ theorem cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
   rw [add_comm]
   exact (-o).cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two Orientation.cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 opposite side. -/
 theorem sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -191,7 +220,9 @@ theorem sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     InnerProductGeometry.sin_angle_add_mul_norm_of_inner_eq_zero
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two Orientation.sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 opposite side. -/
 theorem sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -201,7 +232,9 @@ theorem sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
   rw [add_comm]
   exact (-o).sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two Orientation.sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle multiplied by the adjacent side equals
 the opposite side. -/
 theorem tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -214,7 +247,9 @@ theorem tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.left_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two Orientation.tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle multiplied by the adjacent side equals
 the opposite side. -/
 theorem tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -224,7 +259,9 @@ theorem tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
   rw [add_comm]
   exact (-o).tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two Orientation.tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the cosine of the adjacent angle equals the
 hypotenuse. -/
 theorem norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two {x y : V}
@@ -237,7 +274,9 @@ theorem norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.left_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two Orientation.norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the cosine of the adjacent angle equals the
 hypotenuse. -/
 theorem norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
@@ -247,7 +286,9 @@ theorem norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
   rw [add_comm]
   exact (-o).norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two Orientation.norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the sine of the opposite angle equals the
 hypotenuse. -/
 theorem norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two {x y : V}
@@ -260,7 +301,9 @@ theorem norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inr (o.right_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two Orientation.norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the sine of the opposite angle equals the
 hypotenuse. -/
 theorem norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
@@ -270,7 +313,9 @@ theorem norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
   rw [add_comm]
   exact (-o).norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two Orientation.norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the tangent of the opposite angle equals the
 adjacent side. -/
 theorem norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two {x y : V}
@@ -283,7 +328,9 @@ theorem norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inr (o.right_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two Orientation.norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the tangent of the opposite angle equals the
 adjacent side. -/
 theorem norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
@@ -293,7 +340,9 @@ theorem norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
   rw [add_comm]
   exact (-o).norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two Orientation.norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arccos`, version subtracting vectors. -/
 theorem oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle y (y - x) = Real.arccos (‖y‖ / ‖y - x‖) :=
@@ -304,7 +353,9 @@ theorem oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
     InnerProductGeometry.angle_sub_eq_arccos_of_inner_eq_zero
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two Orientation.oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arccos`, version subtracting vectors. -/
 theorem oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x - y) x = Real.arccos (‖x‖ / ‖x - y‖) :=
@@ -312,7 +363,9 @@ theorem oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangl
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two h
 #align orientation.oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two Orientation.oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arcsin`, version subtracting vectors. -/
 theorem oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle y (y - x) = Real.arcsin (‖x‖ / ‖y - x‖) :=
@@ -324,7 +377,9 @@ theorem oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.right_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two Orientation.oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arcsin`, version subtracting vectors. -/
 theorem oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x - y) x = Real.arcsin (‖y‖ / ‖x - y‖) :=
@@ -332,7 +387,9 @@ theorem oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangl
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two h
 #align orientation.oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two Orientation.oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`, version subtracting vectors. -/
 theorem oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle y (y - x) = Real.arctan (‖x‖ / ‖y‖) :=
@@ -343,7 +400,9 @@ theorem oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
     InnerProductGeometry.angle_sub_eq_arctan_of_inner_eq_zero
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h) (o.right_ne_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two Orientation.oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`, version subtracting vectors. -/
 theorem oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x - y) x = Real.arctan (‖y‖ / ‖x‖) :=
@@ -351,7 +410,9 @@ theorem oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangl
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two h
 #align orientation.oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two Orientation.oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_sub_right_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle as a ratio of sides, version subtracting
 vectors. -/
 theorem cos_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
@@ -363,7 +424,9 @@ theorem cos_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
     InnerProductGeometry.cos_angle_sub_of_inner_eq_zero
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.cos_oangle_sub_right_of_oangle_eq_pi_div_two Orientation.cos_oangle_sub_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_sub_left_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle as a ratio of sides, version subtracting
 vectors. -/
 theorem cos_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
@@ -372,7 +435,9 @@ theorem cos_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).cos_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.cos_oangle_sub_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_sub_right_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle as a ratio of sides, version subtracting
 vectors. -/
 theorem sin_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
@@ -385,7 +450,9 @@ theorem sin_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.right_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.sin_oangle_sub_right_of_oangle_eq_pi_div_two Orientation.sin_oangle_sub_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_sub_left_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle as a ratio of sides, version subtracting
 vectors. -/
 theorem sin_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
@@ -394,7 +461,9 @@ theorem sin_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).sin_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.sin_oangle_sub_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_sub_right_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle as a ratio of sides, version subtracting
 vectors. -/
 theorem tan_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
@@ -406,7 +475,9 @@ theorem tan_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
     InnerProductGeometry.tan_angle_sub_of_inner_eq_zero
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.tan_oangle_sub_right_of_oangle_eq_pi_div_two Orientation.tan_oangle_sub_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_sub_left_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle as a ratio of sides, version subtracting
 vectors. -/
 theorem tan_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
@@ -415,7 +486,9 @@ theorem tan_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).tan_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.tan_oangle_sub_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 adjacent side, version subtracting vectors. -/
 theorem cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -427,7 +500,9 @@ theorem cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     InnerProductGeometry.cos_angle_sub_mul_norm_of_inner_eq_zero
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two Orientation.cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 adjacent side, version subtracting vectors. -/
 theorem cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -436,7 +511,9 @@ theorem cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two Orientation.cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 opposite side, version subtracting vectors. -/
 theorem sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -448,7 +525,9 @@ theorem sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     InnerProductGeometry.sin_angle_sub_mul_norm_of_inner_eq_zero
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)]
 #align orientation.sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two Orientation.sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 opposite side, version subtracting vectors. -/
 theorem sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -457,7 +536,9 @@ theorem sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two Orientation.sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle multiplied by the adjacent side equals
 the opposite side, version subtracting vectors. -/
 theorem tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -470,7 +551,9 @@ theorem tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.right_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two Orientation.tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle multiplied by the adjacent side equals
 the opposite side, version subtracting vectors. -/
 theorem tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
@@ -479,7 +562,9 @@ theorem tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two Orientation.tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the cosine of the adjacent angle equals the
 hypotenuse, version subtracting vectors. -/
 theorem norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V}
@@ -492,7 +577,9 @@ theorem norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inl (o.right_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two Orientation.norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the cosine of the adjacent angle equals the
 hypotenuse, version subtracting vectors. -/
 theorem norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
@@ -501,7 +588,9 @@ theorem norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the sine of the opposite angle equals the
 hypotenuse, version subtracting vectors. -/
 theorem norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V}
@@ -514,7 +603,9 @@ theorem norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inr (o.left_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two Orientation.norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the sine of the opposite angle equals the
 hypotenuse, version subtracting vectors. -/
 theorem norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
@@ -523,7 +614,9 @@ theorem norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the tangent of the opposite angle equals the
 adjacent side, version subtracting vectors. -/
 theorem norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V}
@@ -536,7 +629,9 @@ theorem norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two {x y : V}
       (o.inner_rev_eq_zero_of_oangle_eq_pi_div_two h)
       (Or.inr (o.left_ne_zero_of_oangle_eq_pi_div_two h))]
 #align orientation.norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two Orientation.norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the tangent of the opposite angle equals the
 adjacent side, version subtracting vectors. -/
 theorem norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
@@ -545,7 +640,9 @@ theorem norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two
+-/
 
+#print Orientation.oangle_add_right_smul_rotation_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`, where one side is a multiple
 of a rotation of another by `π / 2`. -/
 theorem oangle_add_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
@@ -570,7 +667,9 @@ theorem oangle_add_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ
       LinearIsometryEquiv.norm_map, mul_div_assoc, div_self (norm_ne_zero_iff.2 h), mul_one,
       Real.norm_eq_abs, abs_of_pos hr]
 #align orientation.oangle_add_right_smul_rotation_pi_div_two Orientation.oangle_add_right_smul_rotation_pi_div_two
+-/
 
+#print Orientation.oangle_add_left_smul_rotation_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`, where one side is a multiple
 of a rotation of another by `π / 2`. -/
 theorem oangle_add_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
@@ -584,14 +683,18 @@ theorem oangle_add_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ)
   refine' (-o).oangle_add_right_smul_rotation_pi_div_two _ _
   simp [hr, h]
 #align orientation.oangle_add_left_smul_rotation_pi_div_two Orientation.oangle_add_left_smul_rotation_pi_div_two
+-/
 
+#print Orientation.tan_oangle_add_right_smul_rotation_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle, where one side is a multiple of a
 rotation of another by `π / 2`. -/
 theorem tan_oangle_add_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
     Real.Angle.tan (o.oangle x (x + r • o.rotation (π / 2 : ℝ) x)) = r := by
   rw [o.oangle_add_right_smul_rotation_pi_div_two h, Real.Angle.tan_coe, Real.tan_arctan]
 #align orientation.tan_oangle_add_right_smul_rotation_pi_div_two Orientation.tan_oangle_add_right_smul_rotation_pi_div_two
+-/
 
+#print Orientation.tan_oangle_add_left_smul_rotation_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle, where one side is a multiple of a
 rotation of another by `π / 2`. -/
 theorem tan_oangle_add_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
@@ -599,7 +702,9 @@ theorem tan_oangle_add_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r :
       r⁻¹ :=
   by rw [o.oangle_add_left_smul_rotation_pi_div_two h, Real.Angle.tan_coe, Real.tan_arctan]
 #align orientation.tan_oangle_add_left_smul_rotation_pi_div_two Orientation.tan_oangle_add_left_smul_rotation_pi_div_two
+-/
 
+#print Orientation.oangle_sub_right_smul_rotation_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`, where one side is a multiple
 of a rotation of another by `π / 2`, version subtracting vectors. -/
 theorem oangle_sub_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
@@ -611,7 +716,9 @@ theorem oangle_sub_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ
   rw [sub_eq_add_neg, hx, o.oangle_add_right_smul_rotation_pi_div_two]
   simpa [hr] using h
 #align orientation.oangle_sub_right_smul_rotation_pi_div_two Orientation.oangle_sub_right_smul_rotation_pi_div_two
+-/
 
+#print Orientation.oangle_sub_left_smul_rotation_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`, where one side is a multiple
 of a rotation of another by `π / 2`, version subtracting vectors. -/
 theorem oangle_sub_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
@@ -626,6 +733,7 @@ theorem oangle_sub_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ)
   rw [o.oangle_add_left_smul_rotation_pi_div_two, inv_inv]
   simpa [hr] using h
 #align orientation.oangle_sub_left_smul_rotation_pi_div_two Orientation.oangle_sub_left_smul_rotation_pi_div_two
+-/
 
 end Orientation
 
@@ -636,6 +744,7 @@ open FiniteDimensional
 variable {V : Type _} {P : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V] [MetricSpace P]
   [NormedAddTorsor V P] [hd2 : Fact (finrank ℝ V = 2)] [Module.Oriented ℝ V (Fin 2)]
 
+#print EuclideanGeometry.oangle_right_eq_arccos_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arccos`. -/
 theorem oangle_right_eq_arccos_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₂ p₃ p₁ = Real.arccos (dist p₃ p₂ / dist p₁ p₃) :=
@@ -644,7 +753,9 @@ theorem oangle_right_eq_arccos_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h :
   rw [oangle_eq_angle_of_sign_eq_one hs,
     angle_eq_arccos_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.oangle_right_eq_arccos_of_oangle_eq_pi_div_two EuclideanGeometry.oangle_right_eq_arccos_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.oangle_left_eq_arccos_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arccos`. -/
 theorem oangle_left_eq_arccos_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₃ p₁ p₂ = Real.arccos (dist p₁ p₂ / dist p₁ p₃) :=
@@ -654,7 +765,9 @@ theorem oangle_left_eq_arccos_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h :
     angle_eq_arccos_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h),
     dist_comm p₁ p₃]
 #align euclidean_geometry.oangle_left_eq_arccos_of_oangle_eq_pi_div_two EuclideanGeometry.oangle_left_eq_arccos_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.oangle_right_eq_arcsin_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arcsin`. -/
 theorem oangle_right_eq_arcsin_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₂ p₃ p₁ = Real.arcsin (dist p₁ p₂ / dist p₁ p₃) :=
@@ -664,7 +777,9 @@ theorem oangle_right_eq_arcsin_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h :
     angle_eq_arcsin_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inl (left_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.oangle_right_eq_arcsin_of_oangle_eq_pi_div_two EuclideanGeometry.oangle_right_eq_arcsin_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.oangle_left_eq_arcsin_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arcsin`. -/
 theorem oangle_left_eq_arcsin_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₃ p₁ p₂ = Real.arcsin (dist p₃ p₂ / dist p₁ p₃) :=
@@ -675,7 +790,9 @@ theorem oangle_left_eq_arcsin_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h :
       (Or.inr (left_ne_of_oangle_eq_pi_div_two h)),
     dist_comm p₁ p₃]
 #align euclidean_geometry.oangle_left_eq_arcsin_of_oangle_eq_pi_div_two EuclideanGeometry.oangle_left_eq_arcsin_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.oangle_right_eq_arctan_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`. -/
 theorem oangle_right_eq_arctan_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₂ p₃ p₁ = Real.arctan (dist p₁ p₂ / dist p₃ p₂) :=
@@ -685,7 +802,9 @@ theorem oangle_right_eq_arctan_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h :
     angle_eq_arctan_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (right_ne_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.oangle_right_eq_arctan_of_oangle_eq_pi_div_two EuclideanGeometry.oangle_right_eq_arctan_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.oangle_left_eq_arctan_of_oangle_eq_pi_div_two /-
 /-- An angle in a right-angled triangle expressed using `arctan`. -/
 theorem oangle_left_eq_arctan_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₃ p₁ p₂ = Real.arctan (dist p₃ p₂ / dist p₁ p₂) :=
@@ -695,7 +814,9 @@ theorem oangle_left_eq_arctan_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h :
     angle_eq_arctan_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (left_ne_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.oangle_left_eq_arctan_of_oangle_eq_pi_div_two EuclideanGeometry.oangle_left_eq_arctan_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.cos_oangle_right_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem cos_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     Real.Angle.cos (∡ p₂ p₃ p₁) = dist p₃ p₂ / dist p₁ p₃ :=
@@ -704,7 +825,9 @@ theorem cos_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p
   rw [oangle_eq_angle_of_sign_eq_one hs, Real.Angle.cos_coe,
     cos_angle_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.cos_oangle_right_of_oangle_eq_pi_div_two EuclideanGeometry.cos_oangle_right_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.cos_oangle_left_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem cos_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     Real.Angle.cos (∡ p₃ p₁ p₂) = dist p₁ p₂ / dist p₁ p₃ :=
@@ -714,7 +837,9 @@ theorem cos_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p
     cos_angle_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h),
     dist_comm p₁ p₃]
 #align euclidean_geometry.cos_oangle_left_of_oangle_eq_pi_div_two EuclideanGeometry.cos_oangle_left_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.sin_oangle_right_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem sin_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     Real.Angle.sin (∡ p₂ p₃ p₁) = dist p₁ p₂ / dist p₁ p₃ :=
@@ -724,7 +849,9 @@ theorem sin_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p
     sin_angle_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inl (left_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.sin_oangle_right_of_oangle_eq_pi_div_two EuclideanGeometry.sin_oangle_right_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.sin_oangle_left_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle as a ratio of sides. -/
 theorem sin_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     Real.Angle.sin (∡ p₃ p₁ p₂) = dist p₃ p₂ / dist p₁ p₃ :=
@@ -735,7 +862,9 @@ theorem sin_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p
       (Or.inr (left_ne_of_oangle_eq_pi_div_two h)),
     dist_comm p₁ p₃]
 #align euclidean_geometry.sin_oangle_left_of_oangle_eq_pi_div_two EuclideanGeometry.sin_oangle_left_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.tan_oangle_right_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle as a ratio of sides. -/
 theorem tan_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     Real.Angle.tan (∡ p₂ p₃ p₁) = dist p₁ p₂ / dist p₃ p₂ :=
@@ -744,7 +873,9 @@ theorem tan_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p
   rw [oangle_eq_angle_of_sign_eq_one hs, Real.Angle.tan_coe,
     tan_angle_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.tan_oangle_right_of_oangle_eq_pi_div_two EuclideanGeometry.tan_oangle_right_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.tan_oangle_left_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle as a ratio of sides. -/
 theorem tan_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     Real.Angle.tan (∡ p₃ p₁ p₂) = dist p₃ p₂ / dist p₁ p₂ :=
@@ -753,7 +884,9 @@ theorem tan_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p
   rw [oangle_eq_angle_of_sign_eq_one hs, angle_comm, Real.Angle.tan_coe,
     tan_angle_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.tan_oangle_left_of_oangle_eq_pi_div_two EuclideanGeometry.tan_oangle_left_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.cos_oangle_right_mul_dist_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 adjacent side. -/
 theorem cos_oangle_right_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -763,7 +896,9 @@ theorem cos_oangle_right_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
   rw [oangle_eq_angle_of_sign_eq_one hs, Real.Angle.cos_coe,
     cos_angle_mul_dist_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.cos_oangle_right_mul_dist_of_oangle_eq_pi_div_two EuclideanGeometry.cos_oangle_right_mul_dist_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.cos_oangle_left_mul_dist_of_oangle_eq_pi_div_two /-
 /-- The cosine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 adjacent side. -/
 theorem cos_oangle_left_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -773,7 +908,9 @@ theorem cos_oangle_left_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
   rw [oangle_eq_angle_of_sign_eq_one hs, angle_comm, Real.Angle.cos_coe, dist_comm p₁ p₃,
     cos_angle_mul_dist_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.cos_oangle_left_mul_dist_of_oangle_eq_pi_div_two EuclideanGeometry.cos_oangle_left_mul_dist_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.sin_oangle_right_mul_dist_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 opposite side. -/
 theorem sin_oangle_right_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -783,7 +920,9 @@ theorem sin_oangle_right_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
   rw [oangle_eq_angle_of_sign_eq_one hs, Real.Angle.sin_coe,
     sin_angle_mul_dist_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.sin_oangle_right_mul_dist_of_oangle_eq_pi_div_two EuclideanGeometry.sin_oangle_right_mul_dist_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.sin_oangle_left_mul_dist_of_oangle_eq_pi_div_two /-
 /-- The sine of an angle in a right-angled triangle multiplied by the hypotenuse equals the
 opposite side. -/
 theorem sin_oangle_left_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -793,7 +932,9 @@ theorem sin_oangle_left_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
   rw [oangle_eq_angle_of_sign_eq_one hs, angle_comm, Real.Angle.sin_coe, dist_comm p₁ p₃,
     sin_angle_mul_dist_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)]
 #align euclidean_geometry.sin_oangle_left_mul_dist_of_oangle_eq_pi_div_two EuclideanGeometry.sin_oangle_left_mul_dist_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.tan_oangle_right_mul_dist_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle multiplied by the adjacent side equals
 the opposite side. -/
 theorem tan_oangle_right_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -804,7 +945,9 @@ theorem tan_oangle_right_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     tan_angle_mul_dist_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inr (right_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.tan_oangle_right_mul_dist_of_oangle_eq_pi_div_two EuclideanGeometry.tan_oangle_right_mul_dist_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.tan_oangle_left_mul_dist_of_oangle_eq_pi_div_two /-
 /-- The tangent of an angle in a right-angled triangle multiplied by the adjacent side equals
 the opposite side. -/
 theorem tan_oangle_left_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -815,7 +958,9 @@ theorem tan_oangle_left_mul_dist_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     tan_angle_mul_dist_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inr (left_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.tan_oangle_left_mul_dist_of_oangle_eq_pi_div_two EuclideanGeometry.tan_oangle_left_mul_dist_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.dist_div_cos_oangle_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the cosine of the adjacent angle equals the
 hypotenuse. -/
 theorem dist_div_cos_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -826,7 +971,9 @@ theorem dist_div_cos_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     dist_div_cos_angle_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inr (right_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.dist_div_cos_oangle_right_of_oangle_eq_pi_div_two EuclideanGeometry.dist_div_cos_oangle_right_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.dist_div_cos_oangle_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the cosine of the adjacent angle equals the
 hypotenuse. -/
 theorem dist_div_cos_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -837,7 +984,9 @@ theorem dist_div_cos_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     dist_div_cos_angle_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inr (left_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.dist_div_cos_oangle_left_of_oangle_eq_pi_div_two EuclideanGeometry.dist_div_cos_oangle_left_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.dist_div_sin_oangle_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the sine of the opposite angle equals the
 hypotenuse. -/
 theorem dist_div_sin_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -848,7 +997,9 @@ theorem dist_div_sin_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     dist_div_sin_angle_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inl (left_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.dist_div_sin_oangle_right_of_oangle_eq_pi_div_two EuclideanGeometry.dist_div_sin_oangle_right_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.dist_div_sin_oangle_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the sine of the opposite angle equals the
 hypotenuse. -/
 theorem dist_div_sin_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -859,7 +1010,9 @@ theorem dist_div_sin_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     dist_div_sin_angle_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inl (right_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.dist_div_sin_oangle_left_of_oangle_eq_pi_div_two EuclideanGeometry.dist_div_sin_oangle_left_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.dist_div_tan_oangle_right_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the tangent of the opposite angle equals the
 adjacent side. -/
 theorem dist_div_tan_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -870,7 +1023,9 @@ theorem dist_div_tan_oangle_right_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     dist_div_tan_angle_of_angle_eq_pi_div_two (angle_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inl (left_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.dist_div_tan_oangle_right_of_oangle_eq_pi_div_two EuclideanGeometry.dist_div_tan_oangle_right_of_oangle_eq_pi_div_two
+-/
 
+#print EuclideanGeometry.dist_div_tan_oangle_left_of_oangle_eq_pi_div_two /-
 /-- A side of a right-angled triangle divided by the tangent of the opposite angle equals the
 adjacent side. -/
 theorem dist_div_tan_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
@@ -881,6 +1036,7 @@ theorem dist_div_tan_oangle_left_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P}
     dist_div_tan_angle_of_angle_eq_pi_div_two (angle_rev_eq_pi_div_two_of_oangle_eq_pi_div_two h)
       (Or.inl (right_ne_of_oangle_eq_pi_div_two h))]
 #align euclidean_geometry.dist_div_tan_oangle_left_of_oangle_eq_pi_div_two EuclideanGeometry.dist_div_tan_oangle_left_of_oangle_eq_pi_div_two
+-/
 
 end EuclideanGeometry
 

mathlib commit https://github.com/leanprover-community/mathlib/commit/bf9bbbcf0c1c1ead18280b0d010e417b10abb1b6

@@ -4,7 +4,7 @@ Released under Apache 2.0 license as described in the file LICENSE.
 Authors: Joseph Myers
 
 ! This file was ported from Lean 3 source module geometry.euclidean.angle.oriented.right_angle
-! leanprover-community/mathlib commit 46b633fd842bef9469441c0209906f6dddd2b4f5
+! leanprover-community/mathlib commit 8af7091a43227e179939ba132e54e54e9f3b089a
 ! Please do not edit these lines, except to modify the commit id
 ! if you have ported upstream changes.
 -/
@@ -14,6 +14,9 @@ import Mathbin.Geometry.Euclidean.Angle.Unoriented.RightAngle
 /-!
 # Oriented angles in right-angled triangles.
 
+> THIS FILE IS SYNCHRONIZED WITH MATHLIB4.
+> Any changes to this file require a corresponding PR to mathlib4.
+
 This file proves basic geometrical results about distances and oriented angles in (possibly
 degenerate) right-angled triangles in real inner product spaces and Euclidean affine spaces.
 

mathlib commit https://github.com/leanprover-community/mathlib/commit/9fb8964792b4237dac6200193a0d533f1b3f7423

@@ -36,8 +36,6 @@ variable {V : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V]
 
 variable [hd2 : Fact (finrank ℝ V = 2)] (o : Orientation ℝ V (Fin 2))
 
-include hd2 o
-
 /-- An angle in a right-angled triangle expressed using `arccos`. -/
 theorem oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle x (x + y) = Real.arccos (‖x‖ / ‖x + y‖) :=
@@ -635,8 +633,6 @@ open FiniteDimensional
 variable {V : Type _} {P : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V] [MetricSpace P]
   [NormedAddTorsor V P] [hd2 : Fact (finrank ℝ V = 2)] [Module.Oriented ℝ V (Fin 2)]
 
-include hd2
-
 /-- An angle in a right-angled triangle expressed using `arccos`. -/
 theorem oangle_right_eq_arccos_of_oangle_eq_pi_div_two {p₁ p₂ p₃ : P} (h : ∡ p₁ p₂ p₃ = ↑(π / 2)) :
     ∡ p₂ p₃ p₁ = Real.arccos (dist p₃ p₂ / dist p₁ p₃) :=

mathlib commit https://github.com/leanprover-community/mathlib/commit/cca40788df1b8755d5baf17ab2f27dacc2e17acb

@@ -53,7 +53,7 @@ theorem oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
 theorem oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x + y) y = Real.arccos (‖y‖ / ‖x + y‖) :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).oangle_add_right_eq_arccos_of_oangle_eq_pi_div_two h
 #align orientation.oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two Orientation.oangle_add_left_eq_arccos_of_oangle_eq_pi_div_two
@@ -74,7 +74,7 @@ theorem oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
 theorem oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x + y) y = Real.arcsin (‖x‖ / ‖x + y‖) :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).oangle_add_right_eq_arcsin_of_oangle_eq_pi_div_two h
 #align orientation.oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two Orientation.oangle_add_left_eq_arcsin_of_oangle_eq_pi_div_two
@@ -94,7 +94,7 @@ theorem oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
 theorem oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x + y) y = Real.arctan (‖x‖ / ‖y‖) :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two h
 #align orientation.oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two Orientation.oangle_add_left_eq_arctan_of_oangle_eq_pi_div_two
@@ -113,7 +113,7 @@ theorem cos_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
 theorem cos_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.cos (o.oangle (x + y) y) = ‖y‖ / ‖x + y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).cos_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_add_left_of_oangle_eq_pi_div_two Orientation.cos_oangle_add_left_of_oangle_eq_pi_div_two
@@ -133,7 +133,7 @@ theorem sin_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
 theorem sin_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.sin (o.oangle (x + y) y) = ‖x‖ / ‖x + y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).sin_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_add_left_of_oangle_eq_pi_div_two Orientation.sin_oangle_add_left_of_oangle_eq_pi_div_two
@@ -152,7 +152,7 @@ theorem tan_oangle_add_right_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y
 theorem tan_oangle_add_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.tan (o.oangle (x + y) y) = ‖x‖ / ‖y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).tan_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_add_left_of_oangle_eq_pi_div_two Orientation.tan_oangle_add_left_of_oangle_eq_pi_div_two
@@ -174,7 +174,7 @@ adjacent side. -/
 theorem cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : Real.Angle.cos (o.oangle (x + y) y) * ‖x + y‖ = ‖y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).cos_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two Orientation.cos_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two
@@ -196,7 +196,7 @@ opposite side. -/
 theorem sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : Real.Angle.sin (o.oangle (x + y) y) * ‖x + y‖ = ‖x‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).sin_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two Orientation.sin_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two
@@ -219,7 +219,7 @@ the opposite side. -/
 theorem tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : Real.Angle.tan (o.oangle (x + y) y) * ‖y‖ = ‖x‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).tan_oangle_add_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two Orientation.tan_oangle_add_left_mul_norm_of_oangle_eq_pi_div_two
@@ -242,7 +242,7 @@ hypotenuse. -/
 theorem norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : ‖y‖ / Real.Angle.cos (o.oangle (x + y) y) = ‖x + y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).norm_div_cos_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two Orientation.norm_div_cos_oangle_add_left_of_oangle_eq_pi_div_two
@@ -265,7 +265,7 @@ hypotenuse. -/
 theorem norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : ‖x‖ / Real.Angle.sin (o.oangle (x + y) y) = ‖x + y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).norm_div_sin_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two Orientation.norm_div_sin_oangle_add_left_of_oangle_eq_pi_div_two
@@ -288,7 +288,7 @@ adjacent side. -/
 theorem norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : ‖x‖ / Real.Angle.tan (o.oangle (x + y) y) = ‖y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   rw [add_comm]
   exact (-o).norm_div_tan_oangle_add_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two Orientation.norm_div_tan_oangle_add_left_of_oangle_eq_pi_div_two
@@ -308,7 +308,7 @@ theorem oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
 theorem oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x - y) x = Real.arccos (‖x‖ / ‖x - y‖) :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).oangle_sub_right_eq_arccos_of_oangle_eq_pi_div_two h
 #align orientation.oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two Orientation.oangle_sub_left_eq_arccos_of_oangle_eq_pi_div_two
 
@@ -328,7 +328,7 @@ theorem oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
 theorem oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x - y) x = Real.arcsin (‖y‖ / ‖x - y‖) :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).oangle_sub_right_eq_arcsin_of_oangle_eq_pi_div_two h
 #align orientation.oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two Orientation.oangle_sub_left_eq_arcsin_of_oangle_eq_pi_div_two
 
@@ -347,7 +347,7 @@ theorem oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oang
 theorem oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     o.oangle (x - y) x = Real.arctan (‖y‖ / ‖x‖) :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).oangle_sub_right_eq_arctan_of_oangle_eq_pi_div_two h
 #align orientation.oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two Orientation.oangle_sub_left_eq_arctan_of_oangle_eq_pi_div_two
 
@@ -368,7 +368,7 @@ vectors. -/
 theorem cos_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.cos (o.oangle (x - y) x) = ‖x‖ / ‖x - y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).cos_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.cos_oangle_sub_left_of_oangle_eq_pi_div_two
 
@@ -390,7 +390,7 @@ vectors. -/
 theorem sin_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.sin (o.oangle (x - y) x) = ‖y‖ / ‖x - y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).sin_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.sin_oangle_sub_left_of_oangle_eq_pi_div_two
 
@@ -411,7 +411,7 @@ vectors. -/
 theorem tan_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V} (h : o.oangle x y = ↑(π / 2)) :
     Real.Angle.tan (o.oangle (x - y) x) = ‖y‖ / ‖x‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).tan_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.tan_oangle_sub_left_of_oangle_eq_pi_div_two
 
@@ -432,7 +432,7 @@ adjacent side, version subtracting vectors. -/
 theorem cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : Real.Angle.cos (o.oangle (x - y) x) * ‖x - y‖ = ‖x‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).cos_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two Orientation.cos_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two
 
@@ -453,7 +453,7 @@ opposite side, version subtracting vectors. -/
 theorem sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : Real.Angle.sin (o.oangle (x - y) x) * ‖x - y‖ = ‖y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).sin_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two Orientation.sin_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two
 
@@ -475,7 +475,7 @@ the opposite side, version subtracting vectors. -/
 theorem tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : Real.Angle.tan (o.oangle (x - y) x) * ‖x‖ = ‖y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).tan_oangle_sub_right_mul_norm_of_oangle_eq_pi_div_two h
 #align orientation.tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two Orientation.tan_oangle_sub_left_mul_norm_of_oangle_eq_pi_div_two
 
@@ -497,7 +497,7 @@ hypotenuse, version subtracting vectors. -/
 theorem norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : ‖x‖ / Real.Angle.cos (o.oangle (x - y) x) = ‖x - y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).norm_div_cos_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.norm_div_cos_oangle_sub_left_of_oangle_eq_pi_div_two
 
@@ -519,7 +519,7 @@ hypotenuse, version subtracting vectors. -/
 theorem norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : ‖y‖ / Real.Angle.sin (o.oangle (x - y) x) = ‖x - y‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).norm_div_sin_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.norm_div_sin_oangle_sub_left_of_oangle_eq_pi_div_two
 
@@ -541,7 +541,7 @@ adjacent side, version subtracting vectors. -/
 theorem norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two {x y : V}
     (h : o.oangle x y = ↑(π / 2)) : ‖y‖ / Real.Angle.tan (o.oangle (x - y) x) = ‖x‖ :=
   by
-  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h⊢
+  rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj] at h ⊢
   exact (-o).norm_div_tan_oangle_sub_right_of_oangle_eq_pi_div_two h
 #align orientation.norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two Orientation.norm_div_tan_oangle_sub_left_of_oangle_eq_pi_div_two
 
@@ -557,7 +557,7 @@ theorem oangle_add_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ
         sub_eq_zero, add_comm, sub_neg_eq_add, ← Real.Angle.coe_add, ← Real.Angle.coe_add,
         add_assoc, add_halves, ← two_mul, Real.Angle.coe_two_pi]
       simpa using h
-    rw [← neg_inj, ← oangle_neg_orientation_eq_neg, neg_neg] at ha
+    rw [← neg_inj, ← oangle_neg_orientation_eq_neg, neg_neg] at ha 
     rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj, oangle_rev,
       (-o).oangle_add_right_eq_arctan_of_oangle_eq_pi_div_two ha, norm_smul,
       LinearIsometryEquiv.norm_map, mul_div_assoc, div_self (norm_ne_zero_iff.2 h), mul_one,

mathlib commit https://github.com/leanprover-community/mathlib/commit/917c3c072e487b3cccdbfeff17e75b40e45f66cb

@@ -22,11 +22,11 @@ degenerate) right-angled triangles in real inner product spaces and Euclidean af
 
 noncomputable section
 
-open EuclideanGeometry
+open scoped EuclideanGeometry
 
-open Real
+open scoped Real
 
-open RealInnerProductSpace
+open scoped RealInnerProductSpace
 
 namespace Orientation
 

mathlib commit https://github.com/leanprover-community/mathlib/commit/917c3c072e487b3cccdbfeff17e75b40e45f66cb

@@ -575,8 +575,7 @@ of a rotation of another by `π / 2`. -/
 theorem oangle_add_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
     o.oangle (x + r • o.rotation (π / 2 : ℝ) x) (r • o.rotation (π / 2 : ℝ) x) = Real.arctan r⁻¹ :=
   by
-  by_cases hr : r = 0
-  · simp [hr]
+  by_cases hr : r = 0; · simp [hr]
   rw [← neg_inj, oangle_rev, ← oangle_neg_orientation_eq_neg, neg_inj, ←
     neg_neg ((π / 2 : ℝ) : Real.Angle), ← rotation_neg_orientation_eq_neg, add_comm]
   have hx : x = r⁻¹ • (-o).rotation (π / 2 : ℝ) (r • (-o).rotation (-(π / 2 : ℝ)) x) := by simp [hr]
@@ -605,8 +604,7 @@ of a rotation of another by `π / 2`, version subtracting vectors. -/
 theorem oangle_sub_right_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
     o.oangle (r • o.rotation (π / 2 : ℝ) x) (r • o.rotation (π / 2 : ℝ) x - x) = Real.arctan r⁻¹ :=
   by
-  by_cases hr : r = 0
-  · simp [hr]
+  by_cases hr : r = 0; · simp [hr]
   have hx : -x = r⁻¹ • o.rotation (π / 2 : ℝ) (r • o.rotation (π / 2 : ℝ) x) := by
     simp [hr, ← Real.Angle.coe_add]
   rw [sub_eq_add_neg, hx, o.oangle_add_right_smul_rotation_pi_div_two]
@@ -618,8 +616,7 @@ of a rotation of another by `π / 2`, version subtracting vectors. -/
 theorem oangle_sub_left_smul_rotation_pi_div_two {x : V} (h : x ≠ 0) (r : ℝ) :
     o.oangle (x - r • o.rotation (π / 2 : ℝ) x) x = Real.arctan r :=
   by
-  by_cases hr : r = 0
-  · simp [hr]
+  by_cases hr : r = 0; · simp [hr]
   have hx : x = r⁻¹ • o.rotation (π / 2 : ℝ) (-(r • o.rotation (π / 2 : ℝ) x)) := by
     simp [hr, ← Real.Angle.coe_add]
   rw [sub_eq_add_neg, add_comm]

mathlib commit https://github.com/leanprover-community/mathlib/commit/55d771df074d0dd020139ee1cd4b95521422df9f

@@ -4,7 +4,7 @@ Released under Apache 2.0 license as described in the file LICENSE.
 Authors: Joseph Myers
 
 ! This file was ported from Lean 3 source module geometry.euclidean.angle.oriented.right_angle
-! leanprover-community/mathlib commit e8a452533ab40cd726031244874c482519a4b187
+! leanprover-community/mathlib commit 46b633fd842bef9469441c0209906f6dddd2b4f5
 ! Please do not edit these lines, except to modify the commit id
 ! if you have ported upstream changes.
 -/
@@ -32,7 +32,7 @@ namespace Orientation
 
 open FiniteDimensional
 
-variable {V : Type _} [InnerProductSpace ℝ V]
+variable {V : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V]
 
 variable [hd2 : Fact (finrank ℝ V = 2)] (o : Orientation ℝ V (Fin 2))
 
@@ -635,9 +635,8 @@ namespace EuclideanGeometry
 
 open FiniteDimensional
 
-variable {V : Type _} {P : Type _} [InnerProductSpace ℝ V] [MetricSpace P]
-
-variable [NormedAddTorsor V P] [hd2 : Fact (finrank ℝ V = 2)] [Module.Oriented ℝ V (Fin 2)]
+variable {V : Type _} {P : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V] [MetricSpace P]
+  [NormedAddTorsor V P] [hd2 : Fact (finrank ℝ V = 2)] [Module.Oriented ℝ V (Fin 2)]
 
 include hd2
 

mathlib commit https://github.com/leanprover-community/mathlib/commit/bd9851ca476957ea4549eb19b40e7b5ade9428cc

Empty lines were removed by executing the following Python script twice

import os
import re


# Loop through each file in the repository
for dir_path, dirs, files in os.walk('.'):
  for filename in files:
    if filename.endswith('.lean'):
      file_path = os.path.join(dir_path, filename)

      # Open the file and read its contents
      with open(file_path, 'r') as file:
        content = file.read()

      # Use a regular expression to replace sequences of "variable" lines separated by empty lines
      # with sequences without empty lines
      modified_content = re.sub(r'(variable.*\n)\n(variable(?! .* in))', r'\1\2', content)

      # Write the modified content back to the file
      with open(file_path, 'w') as file:
        file.write(modified_content)

@@ -30,7 +30,6 @@ namespace Orientation
 open FiniteDimensional
 
 variable {V : Type*} [NormedAddCommGroup V] [InnerProductSpace ℝ V]
-
 variable [hd2 : Fact (finrank ℝ V = 2)] (o : Orientation ℝ V (Fin 2))
 
 /-- An angle in a right-angled triangle expressed using `arccos`. -/

We remove all possible occurences of Type _ and Sort _ in favor of Type* and Sort*.

This has nice performance benefits.

@@ -29,7 +29,7 @@ namespace Orientation
 
 open FiniteDimensional
 
-variable {V : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V]
+variable {V : Type*} [NormedAddCommGroup V] [InnerProductSpace ℝ V]
 
 variable [hd2 : Fact (finrank ℝ V = 2)] (o : Orientation ℝ V (Fin 2))
 
@@ -578,7 +578,7 @@ namespace EuclideanGeometry
 
 open FiniteDimensional
 
-variable {V : Type _} {P : Type _} [NormedAddCommGroup V] [InnerProductSpace ℝ V] [MetricSpace P]
+variable {V : Type*} {P : Type*} [NormedAddCommGroup V] [InnerProductSpace ℝ V] [MetricSpace P]
   [NormedAddTorsor V P] [hd2 : Fact (finrank ℝ V = 2)] [Module.Oriented ℝ V (Fin 2)]
 
 /-- An angle in a right-angled triangle expressed using `arccos`. -/

• depends on: #5966

Co-authored-by: Eric Wieser <wieser.eric@gmail.com> Co-authored-by: Scott Morrison <scott.morrison@gmail.com>

@@ -2,15 +2,12 @@
 Copyright (c) 2022 Joseph Myers. All rights reserved.
 Released under Apache 2.0 license as described in the file LICENSE.
 Authors: Joseph Myers
-
-! This file was ported from Lean 3 source module geometry.euclidean.angle.oriented.right_angle
-! leanprover-community/mathlib commit 46b633fd842bef9469441c0209906f6dddd2b4f5
-! Please do not edit these lines, except to modify the commit id
-! if you have ported upstream changes.
 -/
 import Mathlib.Geometry.Euclidean.Angle.Oriented.Affine
 import Mathlib.Geometry.Euclidean.Angle.Unoriented.RightAngle
 
+#align_import geometry.euclidean.angle.oriented.right_angle from "leanprover-community/mathlib"@"46b633fd842bef9469441c0209906f6dddd2b4f5"
+
 /-!
 # Oriented angles in right-angled triangles.