1 files changed, 9 insertions, 0 deletions
diff --git a/sourcecodes/bnt-master/KPMtools/factorial.m b/sourcecodes/bnt-master/KPMtools/factorial.m
new file mode 100644
index 00000000..7eab9a5f
--- /dev/null
+++ b/sourcecodes/bnt-master/KPMtools/factorial.m
@@ -0,0 +1,9 @@
+function x = factorial(n)
+% FACTORIAL Compute n!
+% x = factorial(n)
+
+if n == 0
+  x = 1;
+else
+  x = n*factorial(n-1);
+end