Metamath Proof Explorer


Theorem sqrtdiv

Description: Square root distributes over division. (Contributed by Mario Carneiro, 5-May-2016)

Ref Expression
Assertion sqrtdiv ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B = A B

Proof

Step Hyp Ref Expression
1 rerpdivcl ⊢ A ∈ ℝ ∧ B ∈ ℝ + → A B ∈ ℝ
2 1 adantlr ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ∈ ℝ
3 elrp ⊢ B ∈ ℝ + ↔ B ∈ ℝ ∧ 0 < B
4 divge0 ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ ∧ 0 < B → 0 ≤ A B
5 3 4 sylan2b ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → 0 ≤ A B
6 resqrtcl ⊢ A B ∈ ℝ ∧ 0 ≤ A B → A B ∈ ℝ
7 2 5 6 syl2anc ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ∈ ℝ
8 7 recnd ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ∈ ℂ
9 rpsqrtcl ⊢ B ∈ ℝ + → B ∈ ℝ +
10 9 adantl ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → B ∈ ℝ +
11 10 rpcnd ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → B ∈ ℂ
12 10 rpne0d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → B ≠ 0
13 8 11 12 divcan4d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ⁢ B B = A B
14 rprege0 ⊢ B ∈ ℝ + → B ∈ ℝ ∧ 0 ≤ B
15 14 adantl ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → B ∈ ℝ ∧ 0 ≤ B
16 sqrtmul ⊢ A B ∈ ℝ ∧ 0 ≤ A B ∧ B ∈ ℝ ∧ 0 ≤ B → A B ⁢ B = A B ⁢ B
17 2 5 15 16 syl21anc ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ⁢ B = A B ⁢ B
18 simpll ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A ∈ ℝ
19 18 recnd ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A ∈ ℂ
20 rpcn ⊢ B ∈ ℝ + → B ∈ ℂ
21 20 adantl ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → B ∈ ℂ
22 rpne0 ⊢ B ∈ ℝ + → B ≠ 0
23 22 adantl ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → B ≠ 0
24 19 21 23 divcan1d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ⁢ B = A
25 24 fveq2d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ⁢ B = A
26 17 25 eqtr3d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ⁢ B = A
27 26 oveq1d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B ⁢ B B = A B
28 13 27 eqtr3d ⊢ A ∈ ℝ ∧ 0 ≤ A ∧ B ∈ ℝ + → A B = A B