set C = MaxConstrSign ;
let n be Nat; ABCMIZ_A:def 12 for s being SortSymbol of MaxConstrSign holds not { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) } is finite
let s be SortSymbol of MaxConstrSign; not { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) } is finite
B1:
the carrier of MaxConstrSign = {0,1,2}
by ABCMIZ_1:def 9;
set X = { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) } ;
consider l being quasi-loci such that
A0:
len l = n
by Th24;
deffunc H1( set ) -> set = [s,[l,c1]];
consider f being Function such that
A1:
( dom f = NAT & ( for i being set st i in NAT holds
f . i = H1(i) ) )
from FUNCT_1:sch 3();
f is one-to-one
then A2:
not rng f is finite
by A1, CARD_1:97;
rng f c= { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) }
proof
let y be
set ;
TARSKI:def 3 ( not y in rng f or y in { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) } )
assume
y in rng f
;
y in { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) }
then consider x being
set such that A3:
(
x in dom f &
y = f . x )
by FUNCT_1:def 5;
reconsider x =
x as
Element of
NAT by A1, A3;
A4:
(
[l,x] in [:QuasiLoci,NAT:] &
y = H1(
x) )
by A1, A3;
then
y in Constructors
by B1, ThCs, ZFMISC_1:def 2;
then
y in {*,non_op} \/ Constructors
by XBOOLE_0:def 3;
then reconsider y =
y as
OperSymbol of
MaxConstrSign by ABCMIZ_1:def 24;
A5:
y is
constructor
by A4, ABCMIZ_1:def 11;
then A6:
the_result_sort_of y =
y `1
by ABCMIZ_1:def 24
.=
s
by A4, MCART_1:7
;
len (the_arity_of y) =
card ((y `2) `1)
by A5, ABCMIZ_1:def 24
.=
card ([l,x] `1)
by A4, MCART_1:7
.=
len l
by MCART_1:7
;
hence
y in { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) }
by A0, A6;
verum
end;
hence
not { o where o is OperSymbol of MaxConstrSign : ( the_result_sort_of o = s & len (the_arity_of o) = n ) } is finite
by A2; verum