Re-define 'interior'

Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>

Lattice/Builder.agda

@@ -47,6 +47,11 @@ record Graph : Set where
     done ++ p = p
     (step e p₁) ++ p₂ = step e (p₁ ++ p₂)
 
+    interior : ∀ {n₁ n₂} → Path n₁ n₂ → List Node
+    interior done = []
+    interior (step _ done) = []
+    interior (step {n₂ = n₂} _ p) = n₂ ∷ interior p
+
     Adjacency : Set
     Adjacency = ∀ (n₁ n₂ : Node) → List (Path n₁ n₂)