refactored NumberTheory/Restaurant/Haskell