fact: Definition starts_withFT l:= if l is [:: false, true & l] then true else false.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype) mathcomp(ssrnat seq path div) mathcomp(fintype tuple finfun bigop finset binomial)