RosettaCodeData/Task/Factorial/Bracmat/factorial-2.bracmat
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

4 lines
101 B
Text

( (=(r.!arg:?r&'(.!arg:0&1|!arg*(($r)$($r))$(!arg+-1)))):?g
& (!g$!g):?f
& !f$10
)