Sha256: 6d67db0133285f03f715e60c130ea0d2b48f3e0a00f94d71b9614a18b33df1a8
Contents?: true
Size: 1.92 KB
Versions: 12
Compression:
Stored size: 1.92 KB
Contents
// This file was auto-generated based on version 1.2.0 of the canonical data.
module LuhnTest
open FsUnit.Xunit
open Xunit
open Luhn
[<Fact>]
let ``Single digit strings can not be valid`` () =
valid "1" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``A single zero is invalid`` () =
valid "0" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``A simple valid SIN that remains valid if reversed`` () =
valid "059" |> should equal true
[<Fact(Skip = "Remove to run test")>]
let ``A simple valid SIN that becomes invalid if reversed`` () =
valid "59" |> should equal true
[<Fact(Skip = "Remove to run test")>]
let ``A valid Canadian SIN`` () =
valid "055 444 285" |> should equal true
[<Fact(Skip = "Remove to run test")>]
let ``Invalid Canadian SIN`` () =
valid "055 444 286" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``Invalid credit card`` () =
valid "8273 1232 7352 0569" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``Valid strings with a non-digit included become invalid`` () =
valid "055a 444 285" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``Valid strings with punctuation included become invalid`` () =
valid "055-444-285" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``Valid strings with symbols included become invalid`` () =
valid "055£ 444$ 285" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``Single zero with space is invalid`` () =
valid " 0" |> should equal false
[<Fact(Skip = "Remove to run test")>]
let ``More than a single zero is valid`` () =
valid "0000 0" |> should equal true
[<Fact(Skip = "Remove to run test")>]
let ``Input digit 9 is correctly converted to output digit 9`` () =
valid "091" |> should equal true
[<Fact(Skip = "Remove to run test")>]
let ``Strings with non-digits is invalid`` () =
valid ":9" |> should equal false
Version data entries
12 entries across 12 versions & 1 rubygems