diff --git a/src/Groups/Groups.jl b/src/Groups/Groups.jl
index a0d9525..62353af 100644
--- a/src/Groups/Groups.jl
+++ b/src/Groups/Groups.jl
@@ -42,6 +42,7 @@ include("GroupSU3.jl")
 include("M3x3.jl")
 include("AlgebraSU3.jl")
 include("FundamentalSU3.jl")
+export imm, mimm
 ## END SU(3)
 
 include("GroupU1.jl")
diff --git a/src/LatticeGPU.jl b/src/LatticeGPU.jl
index 7ea3e60..d143424 100644
--- a/src/LatticeGPU.jl
+++ b/src/LatticeGPU.jl
@@ -51,7 +51,7 @@ include("Spinors/Spinors.jl")
 
 using .Spinors    
 export Spinor, Pgamma
-export norm, norm2, dot, imm, mimm
+export imm, mimm
 export pmul, gpmul, gdagpmul
 
 end # module
diff --git a/src/Spinors/Spinors.jl b/src/Spinors/Spinors.jl
index c60e956..d1e8528 100644
--- a/src/Spinors/Spinors.jl
+++ b/src/Spinors/Spinors.jl
@@ -12,6 +12,7 @@
 module Spinors
 
 using ..Groups
+import ..Groups.imm, ..Groups.mimm, ..Groups.norm, ..Groups.norm2
 
 struct Spinor{NS,G}
     s::NTuple{NS,G}
@@ -122,7 +123,7 @@ function pmul(::Type{Pgamma{1,-1}}, a::Spinor{4,G}) where {NS,G}
 
     r1 = a.s[1]-imm(a.s[4])
     r2 = a.s[2]-imm(a.s[3])
-    return Spinor{4,G}((imm(r2),imm(r1)))
+    return Spinor{4,G}((r1,r2,imm(r2),imm(r1)))
 end
 
 function pmul(::Type{Pgamma{2,1}},  a::Spinor{4,G}) where {NS,G}
@@ -180,7 +181,7 @@ function gpmul(::Type{Pgamma{1,-1}}, g, a::Spinor{4,G}) where {NS,G}
 
     r1 = g*(a.s[1]-imm(a.s[4]))
     r2 = g*(a.s[2]-imm(a.s[3]))
-    return Spinor{4,G}((imm(r2),imm(r1)))
+    return Spinor{4,G}((r1,r2,imm(r2),imm(r1)))
 end
 
 function gpmul(::Type{Pgamma{2,1}},  g, a::Spinor{4,G}) where {NS,G}
@@ -237,7 +238,7 @@ function gdagpmul(::Type{Pgamma{1,-1}}, g, a::Spinor{4,G}) where {NS,G}
 
     r1 = g\(a.s[1]-imm(a.s[4]))
     r2 = g\(a.s[2]-imm(a.s[3]))
-    return Spinor{4,G}((imm(r2),imm(r1)))
+    return Spinor{4,G}((r1,r2,imm(r2),imm(r1)))
 end
 
 function gdagpmul(::Type{Pgamma{2,1}},  g, a::Spinor{4,G}) where {NS,G}