diff --git a/README.md b/README.md
index 62df6bc..69c8be4 100644
--- a/README.md
+++ b/README.md
@@ -88,4 +88,21 @@ why use async channels when u can
 #<procedure:+>
 ```
 
+- the top level is hopeless
+
+```scheme
+> (define (map) map)
+> (eq? (map) map)
+#f
+> (define (map) map)
+> (eq? (map) map)
+#t
+```
+
+```scheme
+> (define (map) (#%top . map))
+> (eq? (map) map)
+#t
+```
+
 - **TODO** more