fact: Definition transfiniteg_def r (T: fterm) f := [/\ fgraph f, domain f = substrate r & forall x, inc x (substrate r) -> Vg f x = T (restr f (segment r x))].
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat)