F# Ignore Explicity

Ignores.fs

[<AutoOpen>]
module Ignore =

  [<RequiresExplicitTypeArguments>]
  let inline ignore<'a> (x: 'a) : unit = ignore<'a> x

  type Async =
    [<RequiresExplicitTypeArguments>]
    static member inline Ignore<'a>(x: Async<'a>) : Async<unit> = FSharp.Control.Async.Ignore<'a> x

  type Task =
    [<RequiresExplicitTypeArguments>]
    static member inline Ignore<'a>(x: Task<'a>) : Task<unit> =
      x.ContinueWith(Func<Task<'a>, unit>(fun _ -> ()), TaskContinuationOptions.ExecuteSynchronously)

    [<RequiresExplicitTypeArguments>]
    static member inline IgnoreArg<'a>(x: Task<'a>) : System.Threading.Tasks.Task = x