let F be finite set ; :: thesis: for A being FinSequence of bool F
for i being Element of NAT
for x being set st i in dom A holds
Cut A,i,x is Reduction of A,i

let A be FinSequence of bool F; :: thesis: for i being Element of NAT
for x being set st i in dom A holds
Cut A,i,x is Reduction of A,i

let i be Element of NAT ; :: thesis: for x being set st i in dom A holds
Cut A,i,x is Reduction of A,i

let x be set ; :: thesis: ( i in dom A implies Cut A,i,x is Reduction of A,i )
set f = Cut A,i,x;
A1: dom (Cut A,i,x) = dom A by Def2;
then A2: for j being Element of NAT st j in dom A & j <> i holds
A . j = (Cut A,i,x) . j by Def2;
assume i in dom A ; :: thesis: Cut A,i,x is Reduction of A,i
then (Cut A,i,x) . i = (A . i) \ {x} by A1, Def2;
hence Cut A,i,x is Reduction of A,i by A1, A2, Def5; :: thesis: verum