data Hidden
  -- | Module to be hidden
  = Module {moduleName :: String}
  -- | Symbol from a module to be hidden
  | FromModule {moduleName :: String, symbolName :: String}

solutionShouldHide :: Hidden -> Expectation

solutionShouldHide $ FromModule "Prelude" "head"

solutionShouldHideAll :: [Hidden] -> Expectation

solutionShouldHideAll [FromModule "Prelude" "head", Module "Data.Set"]

shouldBeApprox :: (Fractional a, Ord a, Show a) => a -> a -> Expectation

sqrt 2.0 `shouldBeApprox` (1.4142135 :: Double)

shouldBeApproxPrec :: (Fractional a, Ord a, Show a) => a -> a -> a -> Expectation

shouldBeApprox' = shouldBeApproxPrec 1e-9