S : Type ?u.258028
T : Type ?u.258031
R : Type u_1
inst✝¹ : CommRing R
c₁ c₂ r x y z : R
a b c : ℍ[R,c₁,c₂]
inst✝ : StrongRankCondition R
⊢ ↑4 = 4
S : Type ?u.258028
T : Type ?u.258031
R : Type u_1
inst✝¹ : CommRing R
c₁ c₂ r x y z : R
a b c : ℍ[R,c₁,c₂]
inst✝ : StrongRankCondition R
⊢ Module.rank R ℍ[R,c₁,c₂] = 4
rw [rank_eq_card_basis (basisOneIJK c₁ c₂), Fintype.card_fin]
no goals
S : Type ?u.258028
T : Type ?u.258031
R : Type u_1
inst✝¹ : CommRing R
c₁ c₂ r x y z : R
a b c : ℍ[R,c₁,c₂]
inst✝ : StrongRankCondition R
⊢ ↑4 = 4
norm_num