let P be pcs-Str ; for D being set
for p, q being Element of st p (--) q holds
for p', q' being Element of st p' in p & q' in q holds
p' (--) q'
let D be set ; for p, q being Element of st p (--) q holds
for p', q' being Element of st p' in p & q' in q holds
p' (--) q'
set R = pcs-general-power P,D;
let p, q be Element of ; ( p (--) q implies for p', q' being Element of st p' in p & q' in q holds
p' (--) q' )
assume A1:
[p,q] in the ToleranceRel of (pcs-general-power P,D)
; PCS_0:def 7 for p', q' being Element of st p' in p & q' in q holds
p' (--) q'
let p', q' be Element of ; ( p' in p & q' in q implies p' (--) q' )
assume that
A2:
p' in p
and
A3:
q' in q
; p' (--) q'
thus
[p',q'] in the ToleranceRel of P
by A1, A2, A3, Def46; PCS_0:def 7 verum