blob: 40c712dca865398d66d5fa452eb358e254ee30dd [file] [log] [blame]
rsc13f73912004-05-15 23:45:13 +00001. \"KS keep - for keep release features. As in IFM
2.de KS
3.nr KN \\n(.u
4.if \\n(IK=0 .if \\n(IF=0 .KQ
5.nr IK +1
6..
7. \"KQ - real keep processor
8.de KQ
9.br
10.nr KI \\n(.i
11.ev 2
12.br
13.in \\n(KIu
14.ps \\n(PS
15.if \\n(VS>40 .vs \\n(VSu
16.if \\n(VS<=39 .vs \\n(VSp
17.ll \\n(LLu
18.lt \\n(LTu
19.if \\n(NX>1 .ll \\n(CWu
20.if \\n(NX>1 .lt \\n(CWu
21.di KK
22.nr TB 0
23.nr KV 0
24..
25. \"KF - floating keep
26.de KF
27.nr KN \\n(.u
28.if !\\n(IK .FQ
29.nr IK +1
30..
31. \"FQ real floating keep processor
32.de FQ
33.nr KI \\n(.i
34.ev 2
35.br
36.in \\n(KIu
37.ps \\n(PS
38.if \\n(VS>40 .vs \\n(VSu
39.if \\n(VS<=39 .vs \\n(VSp
40.ll \\n(LLu
41.lt \\n(LTu
42.if \\n(NX>1 .ll \\n(CWu
43.if \\n(NX>1 .lt \\n(CWu
44.di KK
45.nr TB 1
46.nr KV 0
47..
48. \"KP - keep full page
49.de KP
50.nr KV 1
51..
52. \"KE release - everything between keep and release is together
53.de KE
54.if \\n(IK .if !\\n(IK-1 .if \\n(IF=0 .RQ
55.if \\n(IK .nr IK -1
56..
57. \"RQ real release
58.de RQ
59.br
60.nr KI \\n(.i
61.di
62.nr NF 0
63.if \\n(dn-\\n(.t .nr NF 1
64.if \\n(TC .nr NF 1
65.if \\n(KV .nr NF 1 \" if KV on full page needed, doesn't fit
66.if \\n(NF .if !\\n(TB .sp 11i
67.if !\\n(NF .if \\n(TB .nr TB 0
68.nf
69.rs
70.nr TC 5
71.in 0
72.ls 1
73.if \\n(TB=0 .ev
74.if \\n(TB=0 .br
75.if \\n(TB=0 .ev 2
76.if \\n(TB=0 .KK
77.ls
78.ce 0
79.if \\n(TB=0 .rm KK
80.if \\n(TB .da KJ
81.if \\n(TB \!.KD \\n(dn \\n(KV
82.if \\n(TB .KK
83.if \\n(TB .di
84.nr TC \\n(TB
85.if \\n(KN .fi
86.in
87.ev
88.in \\n(KIu
89..