proposition: Lemma alpha5_small : ((α_[5] 0 = 2) * (α_[5] 1 = 4) * (α_[5] 2 = 5) * (α_[5] 3 = 6) * ( α_[5] 4 = 8) * (α_[5] 5 = 12))%type.
proof: Proof. by rewrite /alphaL /delta !S5_small; compute. Qed.
imports: mathcomp(all_ssreflect finmap) hanoi(extra)