rng p c= Union the Sorts of (Free (C,(MSVars C))) ;
hence for b1 being FinSequence of QuasiTerms C holds
( b1 = p at f iff b1 = (f #) * p ) by Def62; :: thesis: verum