public async static Task Test1()
{
var dsl = from t in FreeIO.ReadAllText("I:\\temp\\test.txt")
from _ in FreeIO.WriteAllText("I:\\temp\\test2.txt", t)
select unit;
var res1 = Interpret(dsl);
var res2 = await InterpretAsync(dsl);
}
public static Either <Error, A> Interpret <A>(FreeIO <A> ma) => ma switch
{
public static async Task <A> InterpretAsync <A>(FreeIO <A> ma) => ma switch
{
