1. \"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.. 90