id	summary	reporter	owner	description	type	status	priority	milestone	component	version	severity	resolution	keywords	cc
441	Group function doesn't work upper 2^15=32768 elements	Víctor de Buen Remiro	Víctor de Buen Remiro	"Running this code only d1 and d2 are built.

//////////////////////////////////////////////////////////////////////////////
Date SetMaxDate(Set setDate) { If(EQ(Card(setDate),1), setDate[1], Group(""Max"",setDate)) };
Set  s1 = Dates(C, y2000, Succ(y2000,C,2^15-3));
Set  s2 = Dates(C, y2000, Succ(y2000,C,2^15-2));
Set  s3 = Dates(C, y2000, Succ(y2000,C,2^15-1));
Set  s4 = Dates(C, y2000, Succ(y2000,C,2^15  ));
Date d1 = SetMaxDate(s1);
Date d2 = SetMaxDate(s2);
Date d3 = SetMaxDate(s3);
//////////////////////////////////////////////////////////////////////////////


TOL displays next messages:

Warning:  La función Group ha fallado en : 
Group("""", setDate)
ERROR:  Fallo en la función ""SetMinDate""
ERROR:  d3 no se pudo crear.
Warning:  La función Group ha fallado en : 
Group("""", setDate)
ERROR:  Fallo en la función ""SetMinDate""
ERROR:  d4 no se pudo crear.
Date d4 = SetMaxDate(s4);"	defect	closed	highest		SetAlgebra	head	blocker	fixed