| Current Path : /usr/tests/usr.bin/gh-bc/tests/bc/scripts/ |
| Current File : //usr/tests/usr.bin/gh-bc/tests/bc/scripts/parse.bc |
#! /usr/bin/bc -q
for (b = 2; b <= 16; ++b) {
if (b == 10) continue
obase = 10
print "ibase = A; ibase = ", b, "\n"
print "\qibase = \q\n"
b
obase = b
for (i = 0; i <= 4096; ++i) {
i
print "0.", i, "\n"
print ".", i, "\n"
print "1.", i, "\n"
print i, ".", "\n"
print i, ".", i, "\n"
}
}
halt