English
If ∠p1 p2 p3 = π/2, then ∠p2 p3 p1 = arctan( dist(p1,p2) / dist(p3,p2) ).
Русский
Если ∠p1 p2 p3 = π/2, то ∠p2 p3 p1 = arctan( dist(p1,p2) / dist(p3,p2) ).
LaTeX
$$$\angle p_2 p_3 p_1 = \arctan\left( \frac{\operatorname{dist}(p_1,p_2)}{\operatorname{dist}(p_3,p_2)} \right) \quad\text{при } \angle p_1 p_2 p_3 = \frac{\pi}{2}$$$
Lean4
/-- 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₂) :=
by
have hs : (∡ p₂ p₃ p₁).sign = 1 := by rw [oangle_rotate_sign, h, Real.Angle.sign_coe_pi_div_two]
rw [oangle_eq_angle_of_sign_eq_one hs,
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)]