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.
5 6cc703dc 2004-05-16 devnull .@D 4 \\$1 \\$2
10 6cc703dc 2004-05-16 devnull .sp \\n(zsu
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)) \
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
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
32 6cc703dc 2004-05-16 devnull .da \\*(|x
36 6cc703dc 2004-05-16 devnull \!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
47 6cc703dc 2004-05-16 devnull .xl \\n($lu
55 6cc703dc 2004-05-16 devnull .sp \\n(zsu
63 6cc703dc 2004-05-16 devnull .nr c. \n(_0