private static ErlangValue OperationWithBooleans(ErlangValue a, ErlangValue b, Func <bool, bool, bool> operation)
{
if (!(ErlangAtom.IsTrue(a) || ErlangAtom.IsFalse(a)) || !(ErlangAtom.IsTrue(b) || ErlangAtom.IsFalse(b)))
{
return(new ErlangError("not numbers"));
}
return(operation(ErlangAtom.IsTrue(a), ErlangAtom.IsTrue(b)) ? ErlangAtom.True : ErlangAtom.False);
}
public static ErlangValue Not(ErlangValue value)
{
if (ErlangAtom.IsTrue(value))
{
return(ErlangAtom.False);
}
else if (ErlangAtom.IsFalse(value))
{
return(ErlangAtom.True);
}
else
{
return(new ErlangError("not a boolean"));
}
}