let F be Element of QC-WFF ; :: thesis:
thus rng (list_of_immediate_constituents F) c= { G where G is Element of QC-WFF : G is_immediate_constituent_of F } :: according to XBOOLE_0:def 10 :: thesis:

let y be set ; :: according to TARSKI:def 3 :: thesis:
assume A1: y in rng (list_of_immediate_constituents F) ; :: thesis:
rng (list_of_immediate_constituents F) c= QC-WFF by FINSEQ_1:def 4;
then reconsider G = y as Element of QC-WFF by A1;
ex x being set st
( x in dom (list_of_immediate_constituents F) & y = (list_of_immediate_constituents F) . x ) by A1, FUNCT_1:def 5;
then G is_immediate_constituent_of F by Th30;
hence y in { G where G is Element of QC-WFF : G is_immediate_constituent_of F } ; :: thesis:

end;

thus { G where G is Element of QC-WFF : G is_immediate_constituent_of F } c= rng (list_of_immediate_constituents F) :: thesis:

let x be set ; :: according to TARSKI:def 3 :: thesis:
assume x in { G where G is Element of QC-WFF : G is_immediate_constituent_of F } ; :: thesis:
then consider G being Element of QC-WFF such that
A2: x = G and
A3: G is_immediate_constituent_of F ;
ex n being Element of NAT st
( n in dom (list_of_immediate_constituents F) & G = (list_of_immediate_constituents F) . n )

A4: F <> VERUM by A3, QC_LANG2:58;

per cases by A3, A4, QC_LANG1:33, QC_LANG2:64;

suppose F is negative ; :: thesis:

then A5: ( list_of_immediate_constituents F = <*(the_argument_of F)*> & G = the_argument_of F ) by A3, Def1, QC_LANG2:65;
consider n being Element of NAT such that
A6: n = 1 ;
( dom <*(the_argument_of F)*> = Seg 1 & <*(the_argument_of F)*> . n = the_argument_of F ) by A6, FINSEQ_1:def 8;
hence ex n being Element of NAT st
( n in dom (list_of_immediate_constituents F) & G = (list_of_immediate_constituents F) . n ) by A6, A5, FINSEQ_1:5; :: thesis:

end;

suppose A7: F is conjunctive ; :: thesis:

A8: <*(the_left_argument_of F),(the_right_argument_of F)*> . 2 = the_right_argument_of F by FINSEQ_1:61;
len <*(the_left_argument_of F),(the_right_argument_of F)*> = 2 by FINSEQ_1:61;
then A9: dom <*(the_left_argument_of F),(the_right_argument_of F)*> = Seg 2 by FINSEQ_1:def 3;
A10: list_of_immediate_constituents F = <*(the_left_argument_of F),(the_right_argument_of F)*> by A7, Def1;
A11: <*(the_left_argument_of F),(the_right_argument_of F)*> . 1 = the_left_argument_of F by FINSEQ_1:61;

per cases by A3, A7, QC_LANG2:66;

suppose A12: G = the_left_argument_of F ; :: thesis:

1 in {1,2} by TARSKI:def 2;
hence ex n being Element of NAT st
( n in dom (list_of_immediate_constituents F) & G = (list_of_immediate_constituents F) . n ) by A10, A11, A9, A12, FINSEQ_1:4; :: thesis:

end;

suppose G = the_right_argument_of F ; :: thesis:

hence ex n being Element of NAT st
( n in dom (list_of_immediate_constituents F) & G = (list_of_immediate_constituents F) . n ) by A10, A8, A9, FINSEQ_1:5; :: thesis:
consider n being Element of NAT ;

end;

end;

end;

hence ex n being Element of NAT st
( n in dom (list_of_immediate_constituents F) & G = (list_of_immediate_constituents F) . n ) ; :: thesis:

end;

suppose A13: F is universal ; :: thesis:

then A14: not F is conjunctive by QC_LANG1:51;
( not F is atomic & not F is negative ) by A13, QC_LANG1:51;
then A15: list_of_immediate_constituents F = <*(the_scope_of F)*> by A13, A14, Def1, QC_LANG1:51;
consider n being Element of NAT such that
A16: n = 1 ;
A17: G = the_scope_of F by A3, A13, QC_LANG2:67;
( dom <*(the_scope_of F)*> = Seg 1 & <*(the_scope_of F)*> . n = the_scope_of F ) by A16, FINSEQ_1:def 8;
hence ex n being Element of NAT st
( n in dom (list_of_immediate_constituents F) & G = (list_of_immediate_constituents F) . n ) by A15, A16, A17, FINSEQ_1:5; :: thesis:

end;

end;

end;

hence x in rng (list_of_immediate_constituents F) by A2, FUNCT_1:def 5; :: thesis:

end;