diff --git a/src/lattice.f90 b/src/lattice.f90
index 350860ecb..c44e775db 100644
--- a/src/lattice.f90
+++ b/src/lattice.f90
@@ -40,19 +40,19 @@ module lattice
 
   real(pREAL), dimension(3+3,CF_NSLIP), parameter :: &
     CF_SYSTEMSLIP = reshape(real([&
-    ! <110>{111} systems
-       0, 1,-1,     1, 1, 1, & ! B2
-      -1, 0, 1,     1, 1, 1, & ! B4
-       1,-1, 0,     1, 1, 1, & ! B5
-       0,-1,-1,    -1,-1, 1, & ! C1
-       1, 0, 1,    -1,-1, 1, & ! C3
-      -1, 1, 0,    -1,-1, 1, & ! C5
-       0,-1, 1,     1,-1,-1, & ! A2
-      -1, 0,-1,     1,-1,-1, & ! A3
-       1, 1, 0,     1,-1,-1, & ! A6
-       0, 1, 1,    -1, 1,-1, & ! D1
-       1, 0,-1,    -1, 1,-1, & ! D4
-      -1,-1, 0,    -1, 1,-1, & ! D6
+    ! <110>{111} systems (Thompson tetrahedron labeling according to Fig. 3 of 10.1016/S1572-4859(05)80003-8)
+       0, 1,-1,     1, 1, 1, & ! AC(d)
+      -1, 0, 1,     1, 1, 1, & ! CB(d)
+       1,-1, 0,     1, 1, 1, & ! BA(d)
+       0,-1,-1,    -1,-1, 1, & ! BD(c)
+       1, 0, 1,    -1,-1, 1, & ! DA(c)
+      -1, 1, 0,    -1,-1, 1, & ! AB(c)
+       0,-1, 1,     1,-1,-1, & ! CA(b)
+      -1, 0,-1,     1,-1,-1, & ! AD(b)
+       1, 1, 0,     1,-1,-1, & ! DC(b)
+       0, 1, 1,    -1, 1,-1, & ! DB(a)
+       1, 0,-1,    -1, 1,-1, & ! BC(a)
+      -1,-1, 0,    -1, 1,-1, & ! CD(a)
      ! <110>{110}/non-octahedral systems
        1, 1, 0,     1,-1, 0, &
        1,-1, 0,     1, 1, 0, &
@@ -123,31 +123,31 @@ module lattice
   real(pREAL), dimension(3+3,CI_NSLIP), parameter :: &
     CI_SYSTEMSLIP = reshape(real([&
     ! <111>{110} systems
-       1,-1, 1,     0, 1, 1, & ! D1
-      -1,-1, 1,     0, 1, 1, & ! C1
-       1, 1, 1,     0,-1, 1, & ! B2
-      -1, 1, 1,     0,-1, 1, & ! A2
-      -1, 1, 1,     1, 0, 1, & ! A3
-      -1,-1, 1,     1, 0, 1, & ! C3
-       1, 1, 1,    -1, 0, 1, & ! B4
-       1,-1, 1,    -1, 0, 1, & ! D4
-      -1, 1, 1,     1, 1, 0, & ! A6
-      -1, 1,-1,     1, 1, 0, & ! D6
-       1, 1, 1,    -1, 1, 0, & ! B5
-       1, 1,-1,    -1, 1, 0, & ! C5
+       1,-1, 1,     0, 1, 1, &
+      -1,-1, 1,     0, 1, 1, &
+       1, 1, 1,     0,-1, 1, &
+      -1, 1, 1,     0,-1, 1, &
+      -1, 1, 1,     1, 0, 1, &
+      -1,-1, 1,     1, 0, 1, &
+       1, 1, 1,    -1, 0, 1, &
+       1,-1, 1,    -1, 0, 1, &
+      -1, 1, 1,     1, 1, 0, &
+      -1, 1,-1,     1, 1, 0, &
+       1, 1, 1,    -1, 1, 0, &
+       1, 1,-1,    -1, 1, 0, &
      ! <111>{112} systems
-      -1, 1, 1,     2, 1, 1, & ! A-4
-       1, 1, 1,    -2, 1, 1, & ! B-3
-       1, 1,-1,     2,-1, 1, & ! C-10
-       1,-1, 1,     2, 1,-1, & ! D-9
-       1,-1, 1,     1, 2, 1, & ! D-6
-       1, 1,-1,    -1, 2, 1, & ! C-5
-       1, 1, 1,     1,-2, 1, & ! B-12
-      -1, 1, 1,     1, 2,-1, & ! A-11
-       1, 1,-1,     1, 1, 2, & ! C-2
-       1,-1, 1,    -1, 1, 2, & ! D-1
-      -1, 1, 1,     1,-1, 2, & ! A-8
-       1, 1, 1,     1, 1,-2, & ! B-7
+      -1, 1, 1,     2, 1, 1, &
+       1, 1, 1,    -2, 1, 1, &
+       1, 1,-1,     2,-1, 1, &
+       1,-1, 1,     2, 1,-1, &
+       1,-1, 1,     1, 2, 1, &
+       1, 1,-1,    -1, 2, 1, &
+       1, 1, 1,     1,-2, 1, &
+      -1, 1, 1,     1, 2,-1, &
+       1, 1,-1,     1, 1, 2, &
+       1,-1, 1,    -1, 1, 2, &
+      -1, 1, 1,     1,-1, 2, &
+       1, 1, 1,     1, 1,-2, &
      ! Slip system <111>{123}
        1, 1,-1,     1, 2, 3, &
        1,-1, 1,    -1, 2, 3, &