diff --git a/examples/sicp.hs b/examples/sicp.hs
new file mode 100644
index 0000000..957c450
--- /dev/null
+++ b/examples/sicp.hs
@@ -0,0 +1,2 @@
+square = \x -> x * x
+it = square 6 + square 10