echo '1..16'

lisp_eval_should_be '((lambda xs (car xs)) 1 2 3)' '1' 'lexpr'

                    # form is like ( (lambda (v1 v2...) body) arg1 arg2 )

                    # form is like ( (lambda something body) arg1 arg2 )

                    #
                    logg_dbg("_eval lambda", "body is " _caddr(car) " containing " _repr(_caddr(car)))
                    logg_dbg("_eval lambda", "variable list is " _cadr(car) " containing " _repr(_cadr(car)))
                    logg_dbg("_eval lambda", "argument list is " cdr " which is " _repr(cdr))
                    return _eval(_caddr(car), _bind(_cadr(car), cdr, env))

                    if(_atom(_cadr(car)) == _true()) {
                        # the something is an atom: this is a LEXPR
                        logg_dbg("_eval lambda lexpr", "body is " _caddr(car) " containing " _repr(_caddr(car)))
                        logg_dbg("_eval lambda lexpr", "all arguments " _repr(cdr) " are going into the list " _cadr(car))
                        return _eval(_caddr(car), _cons(_cons(_cadr(car), _cons(cdr, _nil())), env))
                    } else {
                        logg_dbg("_eval lambda args", "body is " _caddr(car) " containing " _repr(_caddr(car)))
                        logg_dbg("_eval lambda args", "variable list is " _cadr(car) " containing " _repr(_cadr(car)))
                        logg_dbg("_eval lambda args", "argument list is " cdr " which is " _repr(cdr))
                        return _eval(_caddr(car), _bind(_cadr(car), cdr, env))
                    }