tests/bc/scripts/parse_14.bc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

#! /usr/bin/bc -q

b = 14

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