faster check-repo-cycles

devops/misc/check-repo-cycles.jq

 .state |
-map_values(
-  map_values(
-    . as $m |
-    map_values(
-      select(                        # We keep only records with errors
-        .root and                    # We need .root
-        (
-          $m[.root].root != null or  # A root should have no root itself
-          .parent != .root and       # We need .parent different .root
-          $m[.parent].root != .root  # The parent's root should the same root.
-        )
-      )
-    ) | select(length > 0)           # we keep only records with errors
-  ) | select(length > 0)             # we keep only records with errors
-)
\ No newline at end of file
+to_entries[] | .key as $ty     | .value |
+to_entries[] | .key as $list   | .value as $m | .value |
+("\($list): \($m|length) size" | debug) as $_ |
+to_entries[] | .key as $ngram  | .value |
+select(.root) | debug |
+select(                        # We keep only records with errors
+  .root and                    # We need .root
+  (
+    $m[.root].root != null or  # A root should have no root itself
+    .parent != .root and       # We need .parent different .root
+    $m[.parent].root != .root  # The parent's root should the same root.
+  )
+) |
+{$ty, $list, $ngram, data: .}
\ No newline at end of file