diff --git a/byg/src/Types/Dependency.hs b/byg/src/Types/Dependency.hs index 112485c..b563182 100644 --- a/byg/src/Types/Dependency.hs +++ b/byg/src/Types/Dependency.hs @@ -63,7 +63,7 @@ formatDependencyTrees = T.concat . (formatDependencyTrees' "") formatUToken = \case UToken i -> - [ T.pack (printf "%02d" i) ] + [ T.pack (printf "%03d" i) ] UTupleToken (a, b) -> concat [ [ "tup(" ] , formatUToken a