1 6cc703dc 2004-05-16 devnull .nr _0 \n(c.
 2 6cc703dc 2004-05-16 devnull .\"	@(#)float.me	2.1	8/18/80
 3 6cc703dc 2004-05-16 devnull .\" This version has had comments stripped; an unstripped version is available.
 4 6cc703dc 2004-05-16 devnull .de (z
 5 6cc703dc 2004-05-16 devnull .@D 4 \\$1 \\$2
 6 6cc703dc 2004-05-16 devnull .@(
 7 6cc703dc 2004-05-16 devnull .nr ?T 0
 8 6cc703dc 2004-05-16 devnull ..
 9 6cc703dc 2004-05-16 devnull .de )z
10 6cc703dc 2004-05-16 devnull .sp \\n(zsu
11 6cc703dc 2004-05-16 devnull .@)
12 6cc703dc 2004-05-16 devnull .rr _0
13 6cc703dc 2004-05-16 devnull .if !\\n(?b \
14 6cc703dc 2004-05-16 devnull .	nr dn +(\\n(ppu*\\n($ru)/2u+\\n(zsu
15 6cc703dc 2004-05-16 devnull .nr dl -\n(.H
16 6cc703dc 2004-05-16 devnull .ie ((\\n(dn+\n(.V)>=\\n(.t):(\\n(?a):((\\n(dl>\\n($l)&(\\n($c>1)) \
17 6cc703dc 2004-05-16 devnull \{\
18 6cc703dc 2004-05-16 devnull .	nr ?a 1
19 6cc703dc 2004-05-16 devnull .	if (\\n(dl>\\n($l)&(\\n($m>1) \
20 6cc703dc 2004-05-16 devnull .		nr ?w 1
21 6cc703dc 2004-05-16 devnull .	ds |x |t
22 6cc703dc 2004-05-16 devnull .\}
23 6cc703dc 2004-05-16 devnull .el \
24 6cc703dc 2004-05-16 devnull \{\
25 6cc703dc 2004-05-16 devnull .	nr ?b 1
26 6cc703dc 2004-05-16 devnull .	if (\\n(dl>\\n($l)&(\\n($m>1) \
27 6cc703dc 2004-05-16 devnull .		nr ?W 1
28 6cc703dc 2004-05-16 devnull .	nr _b +\\n(dnu
29 6cc703dc 2004-05-16 devnull .	ch @f -\\n(_bu
30 6cc703dc 2004-05-16 devnull .	ds |x |b
31 6cc703dc 2004-05-16 devnull .\}
32 6cc703dc 2004-05-16 devnull .da \\*(|x
33 6cc703dc 2004-05-16 devnull .nf
34 6cc703dc 2004-05-16 devnull .ls 1
35 6cc703dc 2004-05-16 devnull .nr ?k 1
36 6cc703dc 2004-05-16 devnull \!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
37 6cc703dc 2004-05-16 devnull .eo
38 6cc703dc 2004-05-16 devnull .cc @
39 6cc703dc 2004-05-16 devnull @|k
40 6cc703dc 2004-05-16 devnull @cc
41 6cc703dc 2004-05-16 devnull .ec
42 6cc703dc 2004-05-16 devnull .nr ?k 0
43 6cc703dc 2004-05-16 devnull .rm |k
44 6cc703dc 2004-05-16 devnull .da
45 6cc703dc 2004-05-16 devnull .in 0
46 6cc703dc 2004-05-16 devnull .ls 1
47 6cc703dc 2004-05-16 devnull .xl \\n($lu
48 6cc703dc 2004-05-16 devnull .ev
49 6cc703dc 2004-05-16 devnull ..
50 6cc703dc 2004-05-16 devnull .de @k
51 6cc703dc 2004-05-16 devnull .ev 1
52 6cc703dc 2004-05-16 devnull .nf
53 6cc703dc 2004-05-16 devnull .ls 1
54 6cc703dc 2004-05-16 devnull .in 0
55 6cc703dc 2004-05-16 devnull .sp \\n(zsu
56 6cc703dc 2004-05-16 devnull .\\$1
57 6cc703dc 2004-05-16 devnull .ec
58 6cc703dc 2004-05-16 devnull .br
59 6cc703dc 2004-05-16 devnull .rm \\$1
60 6cc703dc 2004-05-16 devnull .ev
61 6cc703dc 2004-05-16 devnull .nr ?T 0
62 6cc703dc 2004-05-16 devnull ..
63 6cc703dc 2004-05-16 devnull .nr c. \n(_0