diff options
| author | David Robillard <d@drobilla.net> | 2010-04-08 20:09:16 +0000 |
|---|---|---|
| committer | David Robillard <d@drobilla.net> | 2010-04-08 20:09:16 +0000 |
| commit | 55b6a3f313670d2cb13847d1f1b04fe3e4b21d63 (patch) | |
| tree | 200b7dbe00107507e8111b07747bef2cd3f6a958 /test/ack.resp | |
| parent | 9d9fa6162295f3813d20f7a3ad4e07ccd6087c3c (diff) | |
| download | resp-55b6a3f313670d2cb13847d1f1b04fe3e4b21d63.tar.gz resp-55b6a3f313670d2cb13847d1f1b04fe3e4b21d63.tar.bz2 resp-55b6a3f313670d2cb13847d1f1b04fe3e4b21d63.zip | |
Tuplr -> Resp (RESource Processing).
git-svn-id: http://svn.drobilla.net/resp/resp@252 ad02d1e2-f140-0410-9f75-f8b11f17cedd
Diffstat (limited to 'test/ack.resp')
| -rw-r--r-- | test/ack.resp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/ack.resp b/test/ack.resp new file mode 100644 index 0000000..76fb397 --- /dev/null +++ b/test/ack.resp @@ -0,0 +1,7 @@ +(def (ack m n) + (if (= 0 m) (+ n 1) + (= 0 n) (ack (- m 1) 1) + (ack (- m 1) (ack m (- n 1))))) + +(ack 3 10) + |