msyds/gyehoek-hs
1
0
Fork 0
Code Issues Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fac 20 lol

Browse Source
This commit is contained in:
msyds
2026-08-24 02:41:09 -06:00
parent 030b36cd98
commit c9eb8f6f85
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
golden/exec/factorial/source.scm
+2 -1
View File
@@ -2,4 +2,5 @@
(if (zero? n) (if (zero? n)
1 1
(* n (fac (- n 1))))))) (* n (fac (- n 1)))))))
(fac 6)) ;; 20 is the greatest `n` for which n! ≤ maxBount @Int
(fac 20))