let T, T1 be DecoratedTree; :: thesis: for P being AntiChain_of_Prefixes of dom T st P <> {} holds
for q being FinSequence of NAT st q in dom (tree T,P,T1) & q in { t1 where t1 is Element of dom T : for p being FinSequence of NAT st p in P holds
not p is_a_prefix_of t1 } holds
(tree T,P,T1) . q = T . q
let P be AntiChain_of_Prefixes of dom T; :: thesis: ( P <> {} implies for q being FinSequence of NAT st q in dom (tree T,P,T1) & q in { t1 where t1 is Element of dom T : for p being FinSequence of NAT st p in P holds
not p is_a_prefix_of t1 } holds
(tree T,P,T1) . q = T . q )
assume A1:
P <> {}
; :: thesis: for q being FinSequence of NAT st q in dom (tree T,P,T1) & q in { t1 where t1 is Element of dom T : for p being FinSequence of NAT st p in P holds
not p is_a_prefix_of t1 } holds
(tree T,P,T1) . q = T . q
let q be FinSequence of NAT ; :: thesis: ( q in dom (tree T,P,T1) & q in { t1 where t1 is Element of dom T : for p being FinSequence of NAT st p in P holds
not p is_a_prefix_of t1 } implies (tree T,P,T1) . q = T . q )
assume A2:
( q in dom (tree T,P,T1) & q in { t1 where t1 is Element of dom T : for p being FinSequence of NAT st p in P holds
not p is_a_prefix_of t1 } )
; :: thesis: (tree T,P,T1) . q = T . q
then consider t' being Element of dom T such that
A3:
( t' = q & ( for p being FinSequence of NAT st p in P holds
not p is_a_prefix_of t' ) )
;