akhansari

module NinetyNineBottles.SongTests

open Xunit

[<Fact>]
let ``Verse 99`` () =
    let expected = "99 bottles of beer on the wall, 99 bottles of beer.
Take one down and pass it around, 98 bottles of beer on the wall."
    let verse = Song.One 99 |> Song.verses
    Assert.Equal(expected, verse)

akhansari

using System;
using System.Globalization;
using System.Linq;
using System.Text;

EqualsIgnoreCaseAndDiacritics("héLloṩ", "hellos"); // true

static string RemoveDiacritics(string str) => 
	str is null ? null :
		string.Concat(str

akhansari

import * as assert from "assert";

/** Decider Pattern **/

type Transaction = {
    amount: number
    date: Date
}

type Deposited = Transaction & {