diff --git a/cs019/cs019.rkt b/cs019/cs019.rkt
new file mode 100644
index 0000000..938a8eb
--- /dev/null
+++ b/cs019/cs019.rkt
@@ -0,0 +1,6 @@
+#lang s-exp "../lang/whalesong.rkt"
+
+;; Like the big whalesong language, but with additional ASL restrictions.
+
+
+(provide (all-from-out "../lang/whalesong.rkt"))
\ No newline at end of file
diff --git a/cs019/lang/reader.rkt b/cs019/lang/reader.rkt
new file mode 100644
index 0000000..84535e0
--- /dev/null
+++ b/cs019/lang/reader.rkt
@@ -0,0 +1,9 @@
+#lang s-exp syntax/module-reader
+
+;; http://docs.racket-lang.org/planet/hash-lang-planet.html
+
+#:language (lambda (ip)
+	    `(file ,(path->string cs019.rkt)))
+
+(require racket/runtime-path)
+(define-runtime-path cs019.rkt "../cs019.rkt")