Left factorials: Difference between revisions
Content added Content deleted
mNo edit summary |
|||
| Line 1,159: | Line 1,159: | ||
=={{header|Oforth}}== |
=={{header|Oforth}}== |
||
<lang Oforth>: leftFact |
<lang Oforth>: leftFact | i | 0 1 rot loop: i [ tuck + swap i * ] drop ;</lang> |
||
{{out}} |
{{out}} |
||