proposition: Lemma wbase2_recr a l: wbase2 (rcons l a) = wbase2 l + 2 ^ size l * a.
proof: Proof. elim: l a => [a | a l H b]; first by rewrite /= addn0 mul1n //. by rewrite /= H doubleD addnA doubleMl expn2S. Qed.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat) mathcomp(seq choice fintype order bigop ssralg) mathcomp(div ssrnum ssrint rat prime path binomial) mathcomp(tuple finset) gaia(fibm)