lambda!(zero = {x}f x);
lambda!(one = {f,x}f x);
lambda!(add1 = {f, (n , f , x) }n f x );
lambda!(two = add1 , one);
lambda!(add = {a , add1 , b} add1 a b , add1);
#[cfg(test)]
mod tests {
use crate::*;
#[test]
fn it_works() {
assert_eq!(lambda!(to_str,zero),"lambda! [{ x } f x] ;");
assert_eq!(lambda!(to_str,one) ,"lambda! [{ f, x } f x] ;");
}
}