thus ex d being Element of F1() ex F being Function of CQC-WFF ,F1() st
( d = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) :: thesis: for d1, d2 being Element of F1() st ex F being Function of CQC-WFF ,F1() st
( d1 = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) & ex F being Function of CQC-WFF ,F1() st
( d2 = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) holds
d1 = d2
proof
consider F being Function of CQC-WFF ,F1() such that
A1: ( F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) from CQC_LANG:sch 2();
take F . F2() ; :: thesis: ex F being Function of CQC-WFF ,F1() st
( F . F2() = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) )

take F ; :: thesis: ( F . F2() = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) )

thus ( F . F2() = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) by A1; :: thesis: verum
end;
let d1, d2 be Element of F1(); :: thesis: ( ex F being Function of CQC-WFF ,F1() st
( d1 = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) & ex F being Function of CQC-WFF ,F1() st
( d2 = F . F2() & F . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) & F . (All x,r) = F7(x,(F . r)) ) ) ) implies d1 = d2 )

given F1 being Function of CQC-WFF ,F1() such that A2: d1 = F1 . F2() and
A3: ( F1 . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F1 . (P ! l) = F4(k,P,l) & F1 . ('not' r) = F5((F1 . r)) & F1 . (r '&' s) = F6((F1 . r),(F1 . s)) & F1 . (All x,r) = F7(x,(F1 . r)) ) ) ) ; :: thesis: ( for F being Function of CQC-WFF ,F1() holds
( not d2 = F . F2() or not F . VERUM = F3() or ex r, s being Element of CQC-WFF ex x being bound_QC-variable ex k being Element of NAT ex l being CQC-variable_list of ex P being QC-pred_symbol of k st
( F . (P ! l) = F4(k,P,l) & F . ('not' r) = F5((F . r)) & F . (r '&' s) = F6((F . r),(F . s)) implies not F . (All x,r) = F7(x,(F . r)) ) ) or d1 = d2 )

given F2 being Function of CQC-WFF ,F1() such that A4: d2 = F2 . F2() and
A5: ( F2 . VERUM = F3() & ( for r, s being Element of CQC-WFF
for x being bound_QC-variable
for k being Element of NAT
for l being CQC-variable_list of
for P being QC-pred_symbol of k holds
( F2 . (P ! l) = F4(k,P,l) & F2 . ('not' r) = F5((F2 . r)) & F2 . (r '&' s) = F6((F2 . r),(F2 . s)) & F2 . (All x,r) = F7(x,(F2 . r)) ) ) ) ; :: thesis: d1 = d2
F1 = F2 from CQC_LANG:sch 3(A3, A5);
hence d1 = d2 by A2, A4; :: thesis: verum