Stair-climbing puzzle: Difference between revisions
Content added Content deleted
No edit summary |
(Add Factor example) |
||
Line 479: | Line 479: | ||
end if |
end if |
||
end procedure</lang> |
end procedure</lang> |
||
=={{header|Factor}}== |
|||
<lang factor>: step-up ( -- ) step [ step-up step-up ] unless ;</lang> |
|||
=={{header|Forth}}== |
=={{header|Forth}}== |