primePairCounts :: Integer -> [Int]
primePairCounts n = map primePairCount (nums n)
primePairCounts :: Integer -> [Int]
primePairCounts n = map primePairCount (nums n)
primePairCounts n = map primePairCount (nums n)