tmac.srefs 2.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156
  1. .\" REFER macros .... citations
  2. .de []
  3. .][ \\$1
  4. ..
  5. .de ][
  6. .if \\$1>5 .tm Bad arg to []
  7. .[\\$1
  8. ..
  9. .if n .ds [. [
  10. .if t .ds [. \s-2\v'-.4m'\f1
  11. .if n .ds .] ]
  12. .if t .ds .] \v'.4m'\s+2\fP
  13. .if n .ds [o ""
  14. .if n .ds [c ""
  15. .if t .ds [o ``
  16. .if t .ds [c ''
  17. .\" the next lines deal with the problem of .[1] or [1].
  18. .\" refer will write "linexxx\*(<.[1]\*(>.
  19. .\" and either "<." or ">." should produce the .;
  20. .\" similarly for ,
  21. .if n .ds >. .
  22. .if t .ds <. .
  23. .if n .ds >, ,
  24. .if t .ds <, ,
  25. .de [5 \" tm style
  26. .FS
  27. .IP "\\*([F.\0"
  28. .nr %T 2
  29. \\*([A, \\f2\\*([T\\f1,
  30. .ie \\n(TN \\*([M.
  31. .el Bell Laboratories internal memorandum (\\*([D).
  32. .RT
  33. .FE
  34. ..
  35. .de [0 \" other
  36. .FS
  37. .nr [: 0
  38. .if !"\\*([F"" .IP "\\*([F.\0"
  39. .if !"\\*([A"" \{.nr [: 1
  40. \\*([A\c\}
  41. .if !"\\*([T"" \{.if \\n([:>0 ,
  42. .nr [: 1
  43. \\f2\\*([T\\f1\c\}
  44. .if !"\\*([O""\{.if \\n([:>0 ,
  45. .nr [: 1
  46. .if \\n([O>0 .nr [: 0
  47. \\*([O\c
  48. .if \\n([O>0 \& \c\}
  49. .if !"\\*([D"" \{.if \\n([:>0 ,
  50. .nr [: 1
  51. \\*([D\c\}
  52. .if \\n([:>0 \&.
  53. .if !"\\*([%"" Cited p. \\*([%.
  54. .RT
  55. .FE
  56. ..
  57. .de [1 \" journal article
  58. .nr %T 1 \" title font
  59. .FS
  60. .if !"\\*([R"" .rm [C
  61. .if !"\\*([F"" .IP "\\*([F.\0"
  62. .if !"\\*([A"" \\*([A,
  63. .if !"\\*([T"" \\*([o\\*([T,\\*([c
  64. \\f2\\*([J\\f1\c
  65. .if !"\\*([C"" , \\*([C\c
  66. .if !"\\*([V"" .if n ,\& Vol.\&\c
  67. .if !"\\*([V"" \& \\f3\\*([V\\f1\c
  68. .if !"\\*([N"" (\\*([N)\c
  69. .if !"\\*([P"" \{\
  70. .ie \\n([P>0 , pp.\ \&\c
  71. .el , p.\ \&\c
  72. \\*([P\c\}
  73. .if !"\\*([I"" .if "\\*([R"" , \\*([I\c
  74. .if !"\\*([O"" .if \\n([O=0 , \\*([O\c
  75. .if !"\\*([D"" \& (\\*([D)\c
  76. \&.
  77. .if !"\\*([O"" .if \\n([O>0 \\*([O
  78. .if !"\\*([%"" Cited p. \\*([%.
  79. .RT
  80. .FE
  81. ..
  82. .de [2 \" book
  83. .FS
  84. .nr %T 2
  85. .if !"\\*([F"" .IP "\\*([F.\0"
  86. .if !"\\*([A"" \\*([A,
  87. .if !"\\*([T"" \\f2\\*([T,\\f1
  88. \\*([I\c
  89. .if !"\\*([C"" , \\*([C\c
  90. .if !"\\*([D"" \& (\\*([D)\c
  91. \&.
  92. .if !"\\*([G"" Gov't. ordering no. \\*([G.
  93. .if !"\\*([O"" \\*([O
  94. .if !"\\*([%"" Cited p. \\*([%.
  95. .RT
  96. .FE
  97. ..
  98. .de [4 \" report
  99. .FS
  100. .if !"\\*([F"" .IP "\\*([F.\0"
  101. .nr %T 1
  102. \\*([A, \\*([o\\*([T,\\*([c
  103. \\*([R\c
  104. .if !"\\*([G"" \& (\\*([G)\c
  105. .if !"\\*([I"" , \\*([I\c
  106. .if !"\\*([C"" , \\*([C\c
  107. .if !"\\*([D"" \& (\\*([D)\c
  108. \&.
  109. .if !"\\*([O"" \\*([O
  110. .if !"\\*([%"" Cited p. \\*([%.
  111. .RT
  112. .FE
  113. ..
  114. .de [3 \" article in book
  115. .FS
  116. .nr %T 1
  117. .if !"\\*([F"" .IP "\\*([F.\0"
  118. .if !"\\*([A"" \\*([A,
  119. .if !"\\*([T"" \\*([o\\*([T,\\*([c
  120. .if !"\\*([P"" pp. \\*([P
  121. in \\f2\\*([B\\f1\c
  122. .if !"\\*([E"" , ed. \\*([E\c
  123. .if !"\\*([I"" , \\*([I\c
  124. .if !"\\*([C"" , \\*([C\c
  125. .if !"\\*([D"" \& (\\*([D)\c
  126. \&.
  127. .if !"\\*([O"" \\*([O
  128. .if !"\\*([%"" Cited p. \\*([%.
  129. .RT
  130. .FE
  131. ..
  132. .de ]<
  133. .[<
  134. ..
  135. .de [<
  136. .LP
  137. .rm FS FE
  138. ..
  139. .de [>
  140. .]>
  141. ..
  142. .de ]>
  143. .sp
  144. ..
  145. .de ]-
  146. .[-
  147. ..
  148. .de [-
  149. .rm [V [P [A [T
  150. .rm [N [C [B [O
  151. .rm [R [I [E [D
  152. .rm [G [%
  153. ..
  154. .de ]]
  155. .\"this is never executed and just uses up an end-of-file bug.
  156. ..