22 lines
457 B
Text
22 lines
457 B
Text
|
/======\
|
||
|
|
F==!/=!\?\+# | />-<-\
|
||
|
|
| \@\-@/@\===?/<#
|
||
|
|
| | |
|
||
|
|
$+++/======|====/
|
||
|
|
! /=/ /+<<-\
|
||
|
|
| \!/======?\>>=?/<# dup
|
||
|
|
| \<<+>+>-/
|
||
|
|
! !
|
||
|
|
\======|====\
|
||
|
|
| | |
|
||
|
|
| /===|==\ |
|
||
|
|
M==!\=!\?\#| | |
|
||
|
|
\@/-@/@/===?\<#
|
||
|
|
^ \>-<-/
|
||
|
|
| ^ ^ ^ ^
|
||
|
|
| | | | subtract from n
|
||
|
|
| | | mutual recursion
|
||
|
|
| | recursion
|
||
|
|
| n-1
|
||
|
|
check for zero
|