aboutsummaryrefslogtreecommitdiff
path: root/examples/math.stem
blob: 1a6f931a482fa7854b3481cbb8f1b44d6e0e3486 (plain)
1
2
factorial [ dup 0 <= [ 1 + ] [ dup 1 - factorial * ] if ] func
PI 3.1415926 func