RosettaCodeData/Task/Factorial/YAMLScript/factorial.ys

8 lines
102 B
Plaintext

#!/usr/bin/env ys-0
defn main(n):
say: "$n! = $factorial(n)"
defn factorial(x):
apply *: 2 .. x