Grains

Challenge Overview

Calculate the number of grains of wheat on a chessboard given that the number on each square doubles.

Visit the grains exercise on Exercism to read the full instructions and download the exercise files.

Community Solutions

View Community Solutions

The following are the top 3 community solutions by stars:

Solution 1 by @rustam (⭐ 0) — View on Exercism
Solution 2 by @LiquidLemon (⭐ 4) — View on Exercism
Solution 3 by @jeroen-rooijmans (⭐ 0) — View on Exercism

Source: Exercism haskell/grains

💡 View Solution

module Grains (square, total) where

square :: Integer -> Maybe Integer
square n
  | n < 1 || n > 64 = Nothing
  | otherwise       = Just (2^(n-1))

total :: Integer
total = 2^64 - 1