fact: Hypothesis wf: forall (P : T -> Type), (forall x, (forall y, y < x -> P y) -> P x) -> forall x, P x.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat seq path) mathcomp(choice fintype tuple finfun bigop finset order) mathcomp(ssralg)