Contents

module Squares (squareOfSums, sumOfSquares, difference) where

square :: Integral a => a -> a
square n = n * n

squareOfSums :: Integral a => a -> a
squareOfSums n = square $ n * succ n `div` 2

sumOfSquares :: Integral a => a -> a
sumOfSquares n = (2 * n3 + 3 * n2 + n) `div` 6
  where n2 = square n
        n3 = n * n2

difference :: Integral a => a -> a
difference n = squareOfSums n - sumOfSquares n

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.58	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.57	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.56	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.55	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.54	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.53	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.52	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.51	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.50	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.49	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.48	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.47	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.46	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.45	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.44	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.43	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.42	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.41	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.40	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs
trackler-2.2.1.39	tracks/haskell/exercises/difference-of-squares/examples/success-standard/src/Squares.hs