mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Multifactorial/Picat/multifactorial-6.picat

3 lines
77 B
Plaintext
Raw Permalink Blame History

multifactorial5(N,D) = M =>
N <= 0 -> M = 1 ; M = N*multifactorial4(N-D,D).
Reference in New Issue View Git Blame Copy Permalink