RosettaCodeData/Task/Permutations-by-swapping/Mathematica/permutations-by-swapping-2....

2 lines
57 B
Plaintext

Print["Perm: ", #[[1]], " Sign: ", #[[2]]] & /@ perms@4;