Comment out DeriveAnyClass extensions
This commit is contained in:
@@ -41,3 +41,5 @@ graphToIncidence :: forall a b . F.Gr a b -> [(a,Int)]
|
||||
graphToIncidence g = map f $ F.labNodes g
|
||||
where
|
||||
f (n,p) = (p,length $ F.neighbors g n)
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user