rng p c= X ;
hence for b1 being FinSequence holds
( b1 = (x,y) -SymbolSubstIn p iff b1 = ((id X) +* (x,y)) * p ) by FUNCT_7:116; :: thesis: verum