Produkt- und Differenzmenge

Code:

1/* Produktmenge: A={1,2,3} und B={3,4}. Gib alle Zahlenpaare an, die in B x A liegen, aber nicht in A x B. */;
A:{1,2,3};
B:{3,4};
AxB:cartesian_product(A,B);
BxA:cartesian_product(B,A);
L:setdifference(BxA,AxB);

http://maxima-online.org/?inc=r85896395