1254721Semaste#! /usr/bin/bc -q
2254721Semaste
3254721Semastel = line_length()
4254721Semaste
5254721Semastemax = 128
6254721Semastescale = 0
7254721Semaste
8254721Semasteobase=2
9254721Semaste2^99
10254721Semaste2^100
11254721Semaste2^105
12254721Semaste
13254721Semastefor (i = 2; i < max; ++i)
14254721Semaste{
15254721Semaste	obase=i
16254721Semaste	if (obase < 17)
17254721Semaste	{
18254721Semaste		1 * i^(l - 1)
19254721Semaste		1 * i^l
20254721Semaste		1 * i^(l + 1)
21254721Semaste	}
22254721Semaste	else if (obase >= 17 && obase <= 100)
23254721Semaste	{
24254721Semaste		l2 = l/3
25254721Semaste		1 * i^(l2 - 1)
26254721Semaste		1 * i^l2
27254721Semaste		1 * i^(l2 + 1)
28254721Semaste	}
29254721Semaste	else
30254721Semaste	{
31254721Semaste		l2 = l/4
32254721Semaste		1 * i^(l2 - 1)
33254721Semaste		1 * i^l2
34254721Semaste		1 * i^(l2 + 1)
35254721Semaste	}
36254721Semaste}
37254721Semaste
38254721Semasteif (maxobase() > 2^18)
39254721Semaste{
40254721Semaste	obase=2^18
41254721Semaste	1 * i^(100)
42254721Semaste	1 * i^(101)
43254721Semaste	1 * i^(103)
44254721Semaste}
45254721Semasteelse
46254721Semaste{
47254721Semaste	print " 065536 000000 000000 000000 000000 000000 000000 000000 000000 0000\\\n"
48254721Semaste	print "00 000000 000000 000000 000000 000000 000000 000000 000000 000000 00\\\n"
49254721Semaste	print "0000 000000 000000 000000 000000 000000 000000 000000 000000 000000 \\\n"
50254721Semaste	print "000000 000000 000000 000000 000000 000000 000000 000000 000000 000000\n"
51254721Semaste	print " 000032 000000 000000 000000 000000 000000 000000 000000 000000 0000\\\n"
52254721Semaste	print "00 000000 000000 000000 000000 000000 000000 000000 000000 000000 00\\\n"
53254721Semaste	print "0000 000000 000000 000000 000000 000000 000000 000000 000000 000000 \\\n"
54254721Semaste	print "000000 000000 000000 000000 000000 000000 000000 000000 000000 00000\\\n"
55254721Semaste	print "0 000000\n"
56254721Semaste	print " 000002 000000 000000 000000 000000 000000 000000 000000 000000 0000\\\n"
57254721Semaste	print "00 000000 000000 000000 000000 000000 000000 000000 000000 000000 00\\\n"
58254721Semaste	print "0000 000000 000000 000000 000000 000000 000000 000000 000000 000000 \\\n"
59254721Semaste	print "000000 000000 000000 000000 000000 000000 000000 000000 000000 00000\\\n"
60254721Semaste	print "0 000000 000000\n"
61254721Semaste}
62254721Semaste
63254721Semastehalt
64254721Semaste