greedyIndSetFirstN :: Int -> ArrayGraph -> [[Int]]
greedyIndSetFirstN n g = map fst . filter ((0 ==) . snd) $ map (flip greedyIndSetN g) [0..n-1]
greedyIndSetFirstN :: Int -> ArrayGraph -> [[Int]]
greedyIndSetFirstN n g = map fst . filter ((0 ==) . snd) $ map (flip greedyIndSetN g) [0..n-1]
greedyIndSetFirstN n g = map fst . filter ((0 ==) . snd) $ map (flip greedyIndSetN g) [0..n-1]