tmac.q6 1.1 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465
  1. .\" MACROES FOR TABLES (file tmac.q6)
  2. .\"
  3. .\" Th.A. Zoethout
  4. .\"
  5. .de TS \" TABLE START
  6. .\" .TS [$1] [H]
  7. . \" $1 = preceeding vertical spacing
  8. . \" tbl checks against nested tables
  9. .nr TS 1
  10. .if \\n(.$>0 .if '\\$\\n(.$'H' .TQ
  11. .if \\n(.$>0 .ie !'\\$1'H' .sp \\$1v
  12. .el .sp \\n(VSu
  13. .rs
  14. .nr TE \\n(.i
  15. .ll -\\n(TEu
  16. .ti \\n(.iu
  17. ..
  18. .de TE \" TABLE END
  19. .\" .TE [$1]
  20. . \" $1 = succeeding vertical spacing { \n(VS }
  21. .ie \\n(TS=0 .Er W ".TE: no matching .TS
  22. .el \{\
  23. .if \\n(TH=1 \{\
  24. .di \" End defining header
  25. .nr TH 0 \" No header present during TT evaluation
  26. .nr EF \\n(.u
  27. .nf
  28. .TT
  29. .if \\n(EF>0 .fi \}
  30. .ll +\\n(TEu
  31. .rr TE
  32. .nr TH 0
  33. .nr TS 0
  34. .ie \\n(.$>0 .sp \\$1v
  35. .el .sp \\n(VSu
  36. .rm a+ b+ c+ d+ e+ f+ g+ h+ i+ j+ k+ l+ n+ m+
  37. .rr 32 33 34 35 36 37 38 40 79 80 81 82
  38. .rr a| b| c| d| e| f| g| h| i| j| k| l| m|
  39. .rr a- b- c- d- e- f- g- h- i- j- k- l- m-
  40. .rm TT\}
  41. ..
  42. .de TQ
  43. .di TT
  44. .nr TH 1
  45. ..
  46. .de TH
  47. .if \\n(.d>0.5v .nr T. 0
  48. .if \\n(.d>0.5v .T# 0
  49. .di
  50. .nr TQ \\n(.i
  51. .nr TH 0 \" No header present during TT evaluation
  52. .in 0
  53. .mk #a
  54. .mk #b
  55. .mk #c
  56. .mk #d
  57. .mk #e
  58. .mk #f
  59. .TT
  60. .in \\n(TQu
  61. .nr TH 2
  62. .mk #T
  63. ..
  64. .\*($0
  65. .rm $0