diff --git a/scheme/httpd/surflets/web-server/root/surflets/add-simple.scm b/scheme/httpd/surflets/web-server/root/surflets/add-simple.scm
new file mode 100644
index 0000000..faade52
--- /dev/null
+++ b/scheme/httpd/surflets/web-server/root/surflets/add-simple.scm
@@ -0,0 +1,17 @@
+(define-structure servlet servlet-interface
+  (open scheme-with-scsh
+	servlets
+	simple-servlet-api
+	)
+  (begin
+
+    (define (main req)
+      (let* ((number-1 (single-query (make-number "First number:")))
+	     (number-2 (single-query (make-number "Second number:"))))
+	(inform (format #f "~a + ~a = ~a"
+			number-1
+			number-2
+			(+ number-1 number-2))))
+      (final-page "Session finished."))
+
+))
\ No newline at end of file