Sha256: 8f7e0fac679de08816bcdcdd690480957f9ec6dcb9374c6cf3dfd83b096aadee

Contents?: true

Size: 1.98 KB

Versions: 240

Compression:

Stored size: 1.98 KB

Contents

module DominoesTest

open NUnit.Framework

open Dominoes

[<Test>]
let ``Empty input = empty output`` () =
    let actual = []
    Assert.That(canChain actual, Is.True)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Singleton input = singleton output`` () =
    let actual = [(1, 1)]
    Assert.That(canChain actual, Is.True)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Singleton that can't be chained`` () =
    let actual = [(1, 2)]
    Assert.That(canChain actual, Is.False)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Three elements`` () =
    let actual = [(1, 2); (3, 1); (2, 3)]
    Assert.That(canChain actual, Is.True)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Can reverse dominoes`` () =
    let actual = [(1, 2); (1, 3); (2, 3)]
    Assert.That(canChain actual, Is.True)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Can't be chained`` () =
    let actual = [(1, 2); (4, 1); (2, 3)]
    Assert.That(canChain actual, Is.False)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Disconnected - simple`` () =
    let actual = [(1, 1); (2, 2)]
    Assert.That(canChain actual, Is.False)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Disconnected - double loop`` () =
    let actual = [(1, 2); (2, 1); (3, 4); (4, 3)]
    Assert.That(canChain actual, Is.False)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Disconnected - single isolated`` () =
    let actual = [(1, 2); (2, 3); (3, 1); (4, 4)]
    Assert.That(canChain actual, Is.False)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Need backtrack`` () =
    let actual = [(1, 2); (2, 3); (3, 1); (2, 4); (2, 4)]
    Assert.That(canChain actual, Is.True)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Separate loops`` () =
    let actual = [(1, 2); (2, 3); (3, 1); (1, 1); (2, 2); (3, 3)]
    Assert.That(canChain actual, Is.True)

[<Test>]
[<Ignore("Remove to run test")>]
let ``Ten elements`` () =
    let actual = [(1, 2); (5, 3); (3, 1); (1, 2); (2, 4); (1, 6); (2, 3); (3, 4); (5, 6)]
    Assert.That(canChain actual, Is.True)

Version data entries

240 entries across 240 versions & 1 rubygems

Version Path
trackler-2.2.1.22 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.21 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.20 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.19 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.18 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.17 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.16 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.15 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.14 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.13 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.12 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.11 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.10 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.9 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.8 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.7 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.6 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.5 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.4 tracks/fsharp/exercises/dominoes/DominoesTest.fs
trackler-2.2.1.3 tracks/fsharp/exercises/dominoes/DominoesTest.fs