diff --git a/NightLight.Core.Tests/GenHelpers.fs b/NightLight.Core.Tests/GenHelpers.fs index 7570b7e..9d8bbf2 100644 --- a/NightLight.Core.Tests/GenHelpers.fs +++ b/NightLight.Core.Tests/GenHelpers.fs @@ -7,5 +7,3 @@ let concatGens (gens: Gen<'a list> list) : Gen<'a list> = match gens with | [] -> Gen.constant [] | first :: rest -> rest |> List.fold (fun accGen g -> Gen.map2 (@) accGen g) first - -let (=<<) m f = Gen.bind m f