--- /dev/null
+#!/usr/bin/env newlisp
+
+; function addition
+(define (f x y) (+ x y))
+(println (f 1 2))
+
+(define f (lambda (x y) (+ x y)))
+(setq f (lambda (x y) (+ x y)))
+;(set 'f (lambda (x y) (+ x y)))
+(println (f 1 2))
+(println ((lambda (x y) (+ x y)) 1 2))
+
+(exit)