EqSet(L:LIST, M:LIST):BOOL
L := [1,2,2]; M := [2,1]; EqSet(L, M); TRUE -------------------------------