fact: Definition parse_arg_sub : binary arg_type := fun p1 p2 => let '(r1,s1,k1) := p1 in let '(r2,s2,k2) := p2 in parse_sub (r1,s1) (r2,s2).
imports: TLC(LibTactics LibLogic LibReflect LibFun LibEpsilon LibList LibInt LibNat LibProd LibSum LibRelation LibWf LibFix LibStream) ZifyNat TLC.LibNat