Fix LatticePoint subtraction

Author: lkdvos

src/lattices/latticepoints.jl

@@ -52,9 +52,9 @@ Base.:+(i::NTuple{N,Int}, j::LatticePoint{N}) where {N} = j + i
 Base.:+(i::Int, j::LatticePoint{1}) = j + i
 
 function Base.:-(i::LatticePoint{N}, j::NTuple{N,Int}) where {N}
-    return LatticePoint(i.coordinates .+ j, i.lattice)
+    return LatticePoint(i.coordinates .- j, i.lattice)
 end
-Base.:-(i::LatticePoint{1}, j::Int) = LatticePoint(i.coordinates .+ j, i.lattice)
+Base.:-(i::LatticePoint{1}, j::Int) = LatticePoint(i.coordinates .- j, i.lattice)
 function Base.:-(i::NTuple{N,Int}, j::LatticePoint{N}) where {N}
     return LatticePoint(i .- j.coordinates, j.lattice)
 end