all (all (conj ([-1, -i; -1+i, -1-i]) == [-1, i; -1-i, -1+i]))
