fact: Definition nodeRenAlphaAux {G : CFGV} {vc : VarSym G} {mp : MixtureParam} (lln : list (list nat)) (rmix : Mixture mp) (lvAvoid : list (vType vc)) : Mixture mp := if (decDisjointV vc (mBndngVars vc rmix) lvAvoid) then rmix else let llbvOld := lBoundVars vc lln rmix in let rmixPR := mRenBinders (lvAvoid ++ (mAllVars rmix)) rmix in let llbvNew := lBoundVars vc lln rmixPR in mLSwapTermEmbed rmixPR llbvOld llbvNew.
imports: AlphaEqProps Omega