RosettaCodeData/Task/Multifactorial/FunL/multifactorial.funl

5 lines
119 B
Plaintext

def multifactorial( n, d ) = product( n..1 by -d )
for d <- 1..5
println( d, [multifactorial(i, d) | i <- 1..10] ))