diff --git a/examples/fact.rkt b/examples/fact.rkt
new file mode 100644
index 0000000..fe8ef50
--- /dev/null
+++ b/examples/fact.rkt
@@ -0,0 +1,8 @@
+#lang planet dyoo/whalesong
+(provide fact)
+(define (fact x)
+  (cond
+   [(= x 0)
+    1]
+   [else
+    (* x (fact (sub1 x)))]))
diff --git a/scribblings/manual.scrbl b/scribblings/manual.scrbl
index a0ee4f3..f90ba9f 100644
--- a/scribblings/manual.scrbl
+++ b/scribblings/manual.scrbl
@@ -297,12 +297,12 @@ function and define it in a module called @filepath{fact.rkt}:
 
 @margin-note{
 The files can also be downloaded here: 
-@itemlist[@item{@link["http://hashcollision.org/whalesong/fact-example/fact.rkt"]{fact.rkt}} 
-@item{@link["http://hashcollision.org/whalesong/fact-example/index.html"]{index.html}}]
+@itemlist[@item{@link["http://hashcollision.org/whalesong/examples/fact/fact.rkt"]{fact.rkt}} 
+@item{@link["http://hashcollision.org/whalesong/examples/fact/index.html"]{index.html}}]
 with generated JavaScript binaries here:
 @itemlist[
-@item{@link["http://hashcollision.org/whalesong/fact-example/fact.js"]{fact.js}}
-@item{@link["http://hashcollision.org/whalesong/fact-example/runtime.js"]{runtime.js}}
+@item{@link["http://hashcollision.org/whalesong/examples/fact/fact.js"]{fact.js}}
+@item{@link["http://hashcollision.org/whalesong/examples/fact/runtime.js"]{runtime.js}}
 ]
 }
 
@@ -381,6 +381,7 @@ The factorial of 10000 is <span id="answer">being computed</span>.
 }|
 }
 
+@margin-note{See: @link["http://hashcollision.org/whalesong/examples/fact/bad-index.html"]{bad-index.html}.}
 Replacing the @racket[10000] with @racket["one-billion-dollars"] should
 reliably produce a proper error message.