hafta return the value

This commit is contained in:
Glen Whitney 2017-10-26 21:18:53 -04:00
parent decc92c4ab
commit 7f940ba87e
1 changed files with 1 additions and 0 deletions

View File

@ -529,6 +529,7 @@ RoughJoinOfFilters@ := function(list, first)
for item in list{[2..Length(list)]} do for item in list{[2..Length(list)]} do
IntersectSet(jof, FiltersOfObj@(item)); IntersectSet(jof, FiltersOfObj@(item));
od; od;
return jof;
end; end;
InstallOtherMethod(DirectProductOp, "for a list and non-quasigroup magma", InstallOtherMethod(DirectProductOp, "for a list and non-quasigroup magma",