1 files changed, 1 insertions, 0 deletions
diff --git a/README.md b/README.md
index f68fc3f..6eefa12 100644
--- a/README.md
+++ b/README.md
@@ -109,6 +109,7 @@ example apears at the end of the document, following the tutorial.
 ``` lisp
 
 (defun all-subsets (list)
+  "Generate the set of all subsets of a given set."
   (if (null list) (seq (list nil))
       (concat! (all-subsets (cdr list))
                (map! (lambda (sub) (cons (car list) sub))