freebsd-dev/contrib/bc/Test/ln.b

scale = 60
for (a=1; a<100000000000000000000000000000000000000; a = a*2) x=l(a)
x
quit
Initial import of bc 1.0.6 2001-02-26 07:13:00 +00:00			`scale = 60`
			`for (a=1; a<100000000000000000000000000000000000000; a = a*2) x=l(a)`
Import GNU bc 1.04 PR: 4183 1998-04-29 21:53:01 +00:00			`x`
			`quit`