theorem Th9: :: PRE_CIRC:10
for T, T1 being finite Tree
for p being Element of T holds T with-replacement (p,T1) = { t where t is Element of T : not p is_a_prefix_of t } \/ { (p ^ t1) where t1 is Element of T1 : verum }