Initial Commit

This commit is contained in:
2018-10-15 12:47:14 -06:00
commit 0c531ffff9
55 changed files with 7285 additions and 0 deletions
+21
View File
@@ -0,0 +1,21 @@
/* main function
for computing
factorial of
input value
*/
Keys -> n
Fact n -> f
f -> Prt NL
Halt
Def Fact n .
Less n 2 -> Jmp small:
Sub n 1 -> temp
Fact temp -> f
Mult n f -> Ret
small:
1 -> Ret