fsharp-learning/exercism/fsharp/reverse-string/ReverseStringTests.fs

// This file was auto-generated based on version 1.2.0 of the canonical data.

module ReverseStringTests

open FsUnit.Xunit
open Xunit

open ReverseString

[<Fact>]
let ``An empty string`` () =
    reverse "" |> should equal ""

[<Fact>]
let ``A word`` () =
    reverse "robot" |> should equal "tobor"

[<Fact>]
let ``A capitalized word`` () =
    reverse "Ramen" |> should equal "nemaR"

[<Fact>]
let ``A sentence with punctuation`` () =
    reverse "I'm hungry!" |> should equal "!yrgnuh m'I"

[<Fact>]
let ``A palindrome`` () =
    reverse "racecar" |> should equal "racecar"

[<Fact>]
let ``An even-sized word`` () =
    reverse "drawer" |> should equal "reward"