fact: Variable (X Y : Set) (icomp : (nat -> nat) -> nat -> X -> list Y) (ilen : X -> nat) (Hilen : forall lnk n x, length (icomp lnk n x) = ilen x) .
imports: List Arith Lia Undecidability.Shared.Libs.DLW.Utils(utils) Undecidability.Shared.Libs.DLW.Code(subcode sss compiler)