simp_rw [hk, ℕplus.mul_def]
case h
hpo b c k : ℕplus
hk : ↑b = ↑(hpo * k)
l : ℕplus
hl : ↑c = ↑(b * l)
⊢ ↑b * ↑l = ↑hpo * (↑k * ↑l)
case h
hpo b c k : ℕplus
hk : ↑b = ↑(hpo * k)
l : ℕplus
hl : ↑c = ↑(b * l)
⊢ ↑hpo * ↑k * ↑l = ↑hpo * (↑k * ↑l)