. \"KS keep - for keep release features. As in IFM | |
.de KS | |
.nr KN \\n(.u | |
.if \\n(IK=0 .if \\n(IF=0 .KQ | |
.nr IK +1 | |
.. | |
. \"KQ - real keep processor | |
.de KQ | |
.br | |
.nr KI \\n(.i | |
.ev 2 | |
.br | |
.in \\n(KIu | |
.ps \\n(PS | |
.if \\n(VS>40 .vs \\n(VSu | |
.if \\n(VS<=39 .vs \\n(VSp | |
.ll \\n(LLu | |
.lt \\n(LTu | |
.if \\n(NX>1 .ll \\n(CWu | |
.if \\n(NX>1 .lt \\n(CWu | |
.di KK | |
.nr TB 0 | |
.nr KV 0 | |
.. | |
. \"KF - floating keep | |
.de KF | |
.nr KN \\n(.u | |
.if !\\n(IK .FQ | |
.nr IK +1 | |
.. | |
. \"FQ real floating keep processor | |
.de FQ | |
.nr KI \\n(.i | |
.ev 2 | |
.br | |
.in \\n(KIu | |
.ps \\n(PS | |
.if \\n(VS>40 .vs \\n(VSu | |
.if \\n(VS<=39 .vs \\n(VSp | |
.ll \\n(LLu | |
.lt \\n(LTu | |
.if \\n(NX>1 .ll \\n(CWu | |
.if \\n(NX>1 .lt \\n(CWu | |
.di KK | |
.nr TB 1 | |
.nr KV 0 | |
.. | |
. \"KP - keep full page | |
.de KP | |
.nr KV 1 | |
.. | |
. \"KE release - everything between keep and release is together | |
.de KE | |
.if \\n(IK .if !\\n(IK-1 .if \\n(IF=0 .RQ | |
.if \\n(IK .nr IK -1 | |
.. | |
. \"RQ real release | |
.de RQ | |
.br | |
.nr KI \\n(.i | |
.di | |
.nr NF 0 | |
.if \\n(dn-\\n(.t .nr NF 1 | |
.if \\n(TC .nr NF 1 | |
.if \\n(KV .nr NF 1 \" if KV on full page needed, doesn't fit | |
.if \\n(NF .if !\\n(TB .sp 11i | |
.if !\\n(NF .if \\n(TB .nr TB 0 | |
.nf | |
.rs | |
.nr TC 5 | |
.in 0 | |
.ls 1 | |
.if \\n(TB=0 .ev | |
.if \\n(TB=0 .KX | |
.if \\n(TB=0 .br | |
.if \\n(TB=0 .ev 2 | |
.if \\n(TB=0 .KK | |
.ls | |
.ce 0 | |
.if \\n(TB=0 .rm KK | |
.if \\n(TB=0 .KY | |
.if \\n(TB .da KJ | |
.if \\n(TB \!.KD \\n(dn \\n(KV | |
.if \\n(TB .KK | |
.if \\n(TB .di | |
.nr TC \\n(TB | |
.if \\n(KN .fi | |
.in | |
.ev | |
.in \\n(KIu | |
.. |