diff options
Diffstat (limited to 'testsuite/tests/misc/taku.ml')
| -rw-r--r-- | testsuite/tests/misc/taku.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testsuite/tests/misc/taku.ml b/testsuite/tests/misc/taku.ml index c3eae9f9ef..555fb01c86 100644 --- a/testsuite/tests/misc/taku.ml +++ b/testsuite/tests/misc/taku.ml @@ -10,7 +10,7 @@ (* *) (***********************************************************************) -(* $Id: taku.ml 7017 2005-08-12 09:22:04Z xleroy $ *) +(* $Id$ *) let rec tak (x, y, z) = if x > y then tak(tak (x-1, y, z), tak (y-1, z, x), tak (z-1, x, y)) |