Option<ISeq<T>>をクエリ式で扱えるようにする？

[bleis-tift]

SeqExt.QueryExpr.SeqOption名前空間に下のような関数を追加する。

public static Option<ISeq<V>> SelectMany<T, U, V>(
    this ISeq<Option<T>> self, Func<T, Option<U>> f, Func<T, U, V> g)
{
    var res = new System.Collections.Generic.List<V>();
    foreach (var opt in self)
    {
        if (opt.IsNone)
            return Option.None;
        var t = LangExt.Unsafe.Option.GetValue(opt);
        var v = f(t).Bind(u => Option.Some(g(t, u)));
        if (v.IsNone)
            return Option.None;
        res.Add(LangExt.Unsafe.Option.GetValue(v));
    }
    return Option.Some(res.ToSeq());
}

public static Option<ISeq<V>> SelectMany<T, U, V>(
    this Option<ISeq<T>> self, Func<T, Option<U>> f, Func<T, U, V> g)
{
    if (self.IsNone)
        return Option.None;
    var xs = LangExt.Unsafe.Option.GetValue(self);
    var res = new System.Collections.Generic.List<V>();
    foreach (var x in xs)
    {
        var t = x;
        var v = f(t).Bind(u => Option.Some(g(t, u)));
        if (v.IsNone)
            return Option.None;
        res.Add(LangExt.Unsafe.Option.GetValue(v));
    }
    return Option.Some(res.ToSeq());
}

ネストするたびにSystem.Collections.Generic.List[T]を作るのは微妙。
→専用のシーケンス、もしくはIE[T]を実装するのもアリ。意図しない呼び出し(上の例では、上のバージョンのSelectManyを呼び出していないのに、下のバージョンのSelectManyが呼び出されてしまう恐れがある)も防げそうだし。

Resultや、逆バージョンも用意する？