From 780137153467954e5b7b44d7f788ffa7d02c6318 Mon Sep 17 00:00:00 2001
From: "Niels G. W. Serup" <ngws@metanohi.name>
Date: Sat, 5 Oct 2024 17:41:13 +0200
Subject: [PATCH] Default to 3 decimals

---
 byg/src/Types/Dependency.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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