fact: Definition card_max_rep n m:= \sum_((fib n).-1 <= i < (fib n.+1).-1) (size (ZeckM i)== m).
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat) mathcomp(seq path fintype div bigop binomial) mathcomp(prime finset ssralg ssrnum ssrint)