pageRank' :: (Ord a) => RealNum -> Natural -> Map a [a] -> Vector
pageRank' damp its m =
  (!! fromIntegral its)
  . flip iterate (uniform . length $ m) . (.) (dampen damp) . (!#>)
  . pageRankMatrix $ m
pageRank' :: (Ord a) => RealNum -> Natural -> Map a [a] -> Vector
pageRank' damp its m =
  (!! fromIntegral its)
  . flip iterate (uniform . length $ m) . (.) (dampen damp) . (!#>)
  . pageRankMatrix $ m
pageRank' damp its m =
  (!! fromIntegral its)
  . flip iterate (uniform . length $ m) . (.) (dampen damp) . (!#>)
  . pageRankMatrix $ m