xref: /freebsd/contrib/bc/tests/dc/scripts/factorial.dc (revision 53b70c86)

#! /usr/bin/dc
[lb1+dsb*plb50>x]sx
0sb1
lxx