fact: Definition ex6_gij ij := inductive_map (ex6_systemi (P ij)) (Lg (Vg Jf (P ij)) (inl_can_fun (ex6_systemi (Q ij)))) (inductive_limit (ex6_systemi (Q ij))).
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat)