progs/factT.scala
author Christian Urban <christian.urban@kcl.ac.uk>
Sun, 15 Jan 2023 10:58:13 +0000
changeset 459 7acbef680bef
parent 446 30b8f14b2655
permissions -rw-r--r--
updated
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
446
30b8f14b2655 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     1
object FactT {
30b8f14b2655 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     2
30b8f14b2655 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     3
def factT(n: Int, acc: Int): Int =
30b8f14b2655 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     4
  if (n == 0) acc else factT(n - 1, n * acc)
30b8f14b2655 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     5
30b8f14b2655 updated
Christian Urban <christian.urban@kcl.ac.uk>
parents:
diff changeset
     6
}