rcases hdvdc with ⟨l, hl⟩
case left.intro
hpo b c : ℕplus
hdvdc : ∃ c_1, c = b * c_1
k : ℕplus
hk : b = hpo * k
⊢ ∃ c_1, c = hpo * c_1
case left.intro.intro
hpo b c k : ℕplus
hk : b = hpo * k
l : ℕplus
hl : c = b * l
⊢ ∃ c_1, c = hpo * c_1