Sha256: 91cfca550ada83a27f6cc236ff33aace5ee011ceaf6720fbc1a7c990880c9a42

Contents?: true

Size: 1.79 KB

Versions: 130

Compression:

Stored size: 1.79 KB

Contents

module Test.Main where

import Prelude

import Control.Monad.Aff.AVar (AVAR)
import Control.Monad.Eff (Eff)
import Control.Monad.Eff.Console (CONSOLE)
import SumOfMultiples (sumOfMultiples)
import Test.Unit (TestSuite, suite, test)
import Test.Unit.Assert as Assert
import Test.Unit.Console (TESTOUTPUT)
import Test.Unit.Main (runTest)

main :: forall eff
  . Eff ( avar :: AVAR
        , console :: CONSOLE
        , testOutput :: TESTOUTPUT
        | eff
        )
        Unit
main = runTest suites

suites :: forall e. TestSuite e
suites = do
  suite "SumOfMultiples.sumOfMultiples" do
    test "multiples of 3 or 5 up to 1" do
      Assert.equal 0 (sumOfMultiples [3, 5] 1)

    test "multiples of 3 or 5 up to 4" do
      Assert.equal 3 (sumOfMultiples [3, 5] 4)

    test "multiples of 3 up to 7" do
      Assert.equal 9 (sumOfMultiples [3] 7)

    test "multiples of 3 or 5 up to 10" do
      Assert.equal 23 (sumOfMultiples [3, 5] 10)

    test "multiples of 3 or 5 up to 100" do
      Assert.equal 2318 (sumOfMultiples [3, 5] 100)

    test "multiples of 3 or 5 up to 1000" do
      Assert.equal 233168 (sumOfMultiples [3, 5] 1000)

    test "multiples of 7, 13 or 17 up to 20" do
      Assert.equal 51 (sumOfMultiples [7, 13, 17] 20)

    test "multiples of 4 or 6 up to 15" do
      Assert.equal 30 (sumOfMultiples [4, 6] 15)

    test "multiples of 5, 6 or 8 up to 150" do
      Assert.equal 4419 (sumOfMultiples [5, 6, 8] 150)

    test "multiples of 5 or 25 up to 51" do
      Assert.equal 275 (sumOfMultiples [5, 25] 51)

    test "multiples of 43 or 47 up to 10000" do
      Assert.equal 2203160 (sumOfMultiples [43, 47] 10000)

    test "multiples of 1 up to 100" do
      Assert.equal 4950 (sumOfMultiples [1] 100)

    test "multiples of an empty list up to 10000" do
      Assert.equal 0 (sumOfMultiples [] 10000)

Version data entries

130 entries across 130 versions & 1 rubygems

Version Path
trackler-2.2.1.119 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.118 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.117 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.116 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.115 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.114 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.113 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.111 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.110 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.109 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.108 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.107 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.106 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.105 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.104 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.103 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.102 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.101 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.100 tracks/purescript/exercises/sum-of-multiples/test/Main.purs
trackler-2.2.1.99 tracks/purescript/exercises/sum-of-multiples/test/Main.purs