Default to 3 decimals

2024-10-05 17:41:13 +02:00
parent 84b189f722
commit 7801371534
1 changed files with 1 additions and 1 deletions
--- 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