(setq only2* (lambda (a b) (only2* a b))) \
(setq * (lambda xs (foldl only2* 1 xs))) \

                            return ("# " a+b)

                            return _number(a+b)

                    logg_err("_eval3 +", "non-numeric operand", d)

                    logg_err("_eval3 only2+", "non-numeric operand", d)
                    return _nil()
                } else if(car == _symbol("only2*")) {
                    a = _eval3(_cadr(form), env, env, d+1)
                    b = _eval3(_caddr(form), env, env, d+1)
                    logg_dbg("_eval3 only2*", "multiplying " a " and " b, d)
                    split(a, tv)
                    if(tv[1] == "#") {
                        a = tv[2]
                        split(b, tv)
                        if(tv[1] == "#") {
                            b = tv[2]
                            return _number(a*b)
                        }
                    }
                    # if either a or b was not a number, we're here
                    logg_err("_eval3 only2*", "non-numeric operand", d)