--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/marking4/re1e_test.scala	Fri Nov 30 14:13:11 2018 +0000
@@ -0,0 +1,10 @@
+
+import CW8a._
+
+val EVIL_urban = SEQ(STAR(STAR(CHAR('a'))), CHAR('b'))
+
+assert(size(der('a', der('a', EVIL_urban))) == 28)
+assert(size(der('a', der('a', der('a', EVIL_urban)))) == 58)
+
+assert(size(ders("aaaaaa".toList, EVIL_urban)) == 8)
+assert(size(ders(("a" * 50).toList, EVIL_urban)) == 8)