repo.or.cz
/
shapes.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Merge branch 'ht/blank' into ht/namespaces
[shapes.git]
/
examples
/
doc
/
structure-text.shape
blob
9264ce25a9262f00fadff8e680ea38d30a3ceb4e
1
##lookin Shapes
2
3
factorial: \ n → [if ( n = '0 ) '1 ( n * [factorial n-'1] )]
4
•stdout << [factorial '5] << "{n}
5
6
@spot /** Avoid empty-output error in graphics mode. **/