Re: Apparent Bug In "Permutations" Function In Maxima 5.9.3

Off topic to the apparent bug - but I ran a different program and found
the solution (warning - this took over 2 hours to run on my PC):

(solns: set(),
test: integer_partitions(100,7),
for lists in test do
if member(15, lists) then
(perms: permutations(lists),
for sector in perms do
if part(sector, 5) = 15 then
(soc: part(sector,1) + part(sector,2) + part(sector,4) + 15,
bas: part(sector,2) + part(sector,3) + part(sector,6) + 15,
vol: part(sector,4) + part(sector,6) + part(sector,7) + 15,
if soc = 50 and bas = 50 and vol = 45 then
solns: adjoin(sector, solns))))$

After running this, the cardinality of the "solns" solution set was 136
- so I ran another program:

for soln in solns do
print("Soc",soln[1],", Bas",soln[3],", Vol",soln[7],",
soc+Bas",soln[2],", soc+Vol",
soln[4],", Bas+Vol",soln[6],", Total two-sports", soln[2] + soln[4] +
soln[6])$

The output confirmed that there was always a total of 15 people doing 2
sports.

.