fact: Definition IR' : relation term := fun t u => let n := 1 + max (maxvar t) (maxvar u) in forall v : vector I n, let xint := val_of_vec I v in R (term_int xint t) (term_int xint u).
imports: CoLoR(ATerm RelUtil ASubstitution NaryFunction AContext VecUtil SN ARelation LogicUtil) Coq(Lia PeanoNat)