diff --git a/collects/teachpack/2htdp/scribblings/PlanetCuteShadow1.png b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow1.png
new file mode 100644
index 0000000000..0276985820
Binary files /dev/null and b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow1.png differ
diff --git a/collects/teachpack/2htdp/scribblings/PlanetCuteShadow2.png b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow2.png
new file mode 100644
index 0000000000..79db65c5b1
Binary files /dev/null and b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow2.png differ
diff --git a/collects/teachpack/2htdp/scribblings/PlanetCuteShadow2b.png b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow2b.png
new file mode 100644
index 0000000000..eb5f14757c
Binary files /dev/null and b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow2b.png differ
diff --git a/collects/teachpack/2htdp/scribblings/PlanetCuteShadow3.png b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow3.png
new file mode 100644
index 0000000000..147f0c0443
Binary files /dev/null and b/collects/teachpack/2htdp/scribblings/PlanetCuteShadow3.png differ
diff --git a/collects/teachpack/2htdp/scribblings/PlanetCuteShadowTest.png b/collects/teachpack/2htdp/scribblings/PlanetCuteShadowTest.png
deleted file mode 100644
index f498293df1..0000000000
Binary files a/collects/teachpack/2htdp/scribblings/PlanetCuteShadowTest.png and /dev/null differ
diff --git a/collects/teachpack/2htdp/scribblings/planetcute.scrbl b/collects/teachpack/2htdp/scribblings/planetcute.scrbl
index 9c7fafa7a8..e20e16701e 100644
--- a/collects/teachpack/2htdp/scribblings/planetcute.scrbl
+++ b/collects/teachpack/2htdp/scribblings/planetcute.scrbl
@@ -72,11 +72,23 @@ of how to use them.
                  (define req (string->symbol (format "2htdp/planetcute/~a" (name->filename img))))
                  #`@defthing[#,img image?]{  @(bitmap #,req) })))]))
 
-@(define-runtime-path PlanetCuteShadowTest.png "PlanetCuteShadowTest.png")
+@(begin
+   (define-runtime-path PlanetCuteShadow1.png "PlanetCuteShadow1.png")
+   (define-runtime-path PlanetCuteShadow2.png "PlanetCuteShadow2.png")
+   (define-runtime-path PlanetCuteShadow2b.png "PlanetCuteShadow2b.png")
+   (define-runtime-path PlanetCuteShadow3.png "PlanetCuteShadow3.png"))
 
 @defthings[Characters]{}
 @defthings[Blocks]{}
 @defthings[Items]{}
 @defthings[Ramps]{}
 @defthings[Buildings]{}
-@defthings[Shadows]{@(make-object bitmap% PlanetCuteShadowTest.png)}
+@defthings[Shadows]{The shadow images are intended to be
+                    overlaid on the other blocks when they
+                    appear in certain configurations, as
+                    detailed here.
+                    
+                    @(read-bitmap PlanetCuteShadow1.png) 
+                    @(read-bitmap PlanetCuteShadow2.png)
+                    @(read-bitmap PlanetCuteShadow2b.png)
+                    @(read-bitmap PlanetCuteShadow3.png) }