Verites/verigraph

View on GitHub
src/library/Data/TypedGraph/Partition/FromVerigraph.hs

Summary

Maintainability
Test Coverage

Avoid restricted qualification
Open

import           Data.Graphs                     as G

Found

import Data.Graphs as G

Perhaps

import Data.Graphs as Graph

Applying this change:

  • may break the code

Redundant bracket
Open

    injEdges = filter (\x -> (all (\e' -> TGM.applyEdgeIdUnsafe n e' /= x) (TG.edgeIds $ TGM.domainGraph n))) (TG.edgeIds $ TGM.codomainGraph n)

Found

\ x ->
  (all (\ e' -> TGM.applyEdgeIdUnsafe n e' /= x)
     (TG.edgeIds $ TGM.domainGraph n))

Perhaps

\ x ->
  all (\ e' -> TGM.applyEdgeIdUnsafe n e' /= x)
    (TG.edgeIds $ TGM.domainGraph n)

Redundant bracket
Open

    injNodes = filter (\x -> (all (\n' -> TGM.applyNodeIdUnsafe n n' /= x) (TG.nodeIds $ TGM.domainGraph n))) (TG.nodeIds $ TGM.codomainGraph n)

Found

\ x ->
  (all (\ n' -> TGM.applyNodeIdUnsafe n n' /= x)
     (TG.nodeIds $ TGM.domainGraph n))

Perhaps

\ x ->
  all (\ n' -> TGM.applyNodeIdUnsafe n n' /= x)
    (TG.nodeIds $ TGM.domainGraph n)

There are no issues that match your filters.

Category
Status