-- | List of solutions for all solved problems.
solutions :: [(ProblemID,Solution)]
solutions = [(n,fromJust s)| n<-[minProblemID..maxProblemID], let s=solveProblem n, isJust s]
solutions :: [(ProblemID,Solution)]
solutions = [(n,fromJust s)| n<-[minProblemID..maxProblemID], let s=solveProblem n, isJust s]
solutions = [(n,fromJust s)| n<-[minProblemID..maxProblemID], let s=solveProblem n, isJust s]