patrick/dotnet-classical-ciphers
1
0
Fork 0
mirror of https://github.com/Smaug123/dotnet-classical-ciphers synced 2025-10-15 17:38:40 +00:00
Code Issues Packages Projects Releases Wiki Activity

Initial commit

Browse Source
This commit is contained in:
Smaug123
2023-02-04 19:55:38 +00:00
commit ef9c792e64
29 changed files with 71565 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
CipherSuite.Test/TestMonoalphabetic.fs Normal file
View File

@@ -0,0 +1,17 @@
namespace CipherSuite.Test
open CipherSuite
open NUnit.Framework
open FsUnitTyped
[<TestFixture>]
module TestMonoalphabetic =
[<Test>]
let ``Challenge 1A`` () =
let rand = System.Random 10
let key, _plain, _fitness =
Monoalphabetic.crack rand 20000 (String.stripNonAlpha Examples.challenge1A)
key |> shouldEqual [| yield! [| 19..25 |] ; yield! [| 0..18 |] |]