diff --git a/bracket/examples/equation-solving.rkt b/bracket/examples/equation-solving.rkt
new file mode 100644
index 000000000..58031c6a8
--- /dev/null
+++ b/bracket/examples/equation-solving.rkt
@@ -0,0 +1,8 @@
+#lang bracket
+DeclareVars(x,a,b,c);
+
+Solve(2*x=1,x);   % x = 1/2
+
+Solve(2*x+3=1,x); % x = -1
+
+Solve(a*x+b=c,x); % x = (c-b)/a