testSCC = flattenSCCs . stronglyConnCompFromEdgedVerticesOrd . map toNode
  where
    toNode (a, b, c) = DigraphNode a b c
testSCC = flattenSCCs . stronglyConnCompFromEdgedVerticesOrd . map toNode
  where
    toNode (a, b, c) = DigraphNode a b c
testSCC = flattenSCCs . stronglyConnCompFromEdgedVerticesOrd . map toNode
  where
    toNode (a, b, c) = DigraphNode a b c