afl-material: progs/app51.scala@24531cfaa36a (annotated)

261 24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	1	def OPT(r: Rexp) = ALT(r, EMPTY)
7 73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	2
261 24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	3	def NTIMES(r: Rexp, n: Int) : Rexp = n match {
24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	4	case 0 => EMPTY
24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	5	case 1 => r
24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	6	case n => SEQ(r, NTIMES(r, n - 1))
24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	7	}
24531cfaa36a updated handouts Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	8

author	Christian Urban <christian dot urban at kcl dot ac dot uk>
	Sun, 28 Sep 2014 18:07:58 +0100
changeset 261	24531cfaa36a
parent 93	4794759139ea
child 399	5c1fbb39c93e
permissions	-rw-r--r--