progs/app60.scala
author Christian Urban <urbanc@in.tum.de>
Mon, 19 Jun 2017 10:44:28 +0100
changeset 496 b656bb9c14ca
parent 435 e08431a78f66
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
412
1cef3924f7a2 updated
Christian Urban <urbanc@in.tum.de>
parents: 399
diff changeset
     1
def ders(s: List[Char], r: Rexp) : Rexp = s match {
117
25999de692b2 added slides
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents: 93
diff changeset
     2
  case Nil => r
435
e08431a78f66 updated
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents: 422
diff changeset
     3
  case c::s => ders(s, simp(der(c, r)))          
117
25999de692b2 added slides
Christian Urban <christian dot urban at kcl dot ac dot uk>
parents: 93
diff changeset
     4
}