home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Distributions / ucb / spencer_2bsd.tar.gz / 2bsd.tar / bin / lib / me / index.me < prev    next >
Text File  |  1980-02-17  |  612b  |  53 lines
  1. .nr _0 \n(c.
  2. .\" This version has had comments stripped; an unstripped version is available.
  3. .de (x
  4. .ds |X x
  5. .if \\n(.$ \
  6. .    ds |X \\$1
  7. .am %\\*(|X )x
  8. .sp \\n(xsu
  9. ..
  10. .de )x
  11. .ds |x \\n%
  12. .if \\n(.$ \
  13. .    ds |x \\$1
  14. .if "\\*(|x"_" \
  15. .    ig ..
  16. .am %\\*(|X ..
  17. .if \w'\\$2'>(\\n(.l-\\n(.i-\\n(.k) \
  18. .    ti +\\n(xuu
  19. \\\\a\\\\t\\$2\\*(|x
  20. ...
  21. .rm |x
  22. .rm |X
  23. ..
  24. .de xp
  25. .br
  26. .@C 2
  27. .ls 1
  28. .vs \\n(.su*\\n($Ru
  29. .fi
  30. .ds |X x
  31. .if \\n(.$ \
  32. .    ds |X \\$1
  33. .xl -(\\n(xuu+\w'...'u)
  34. .di |x
  35. .%\\*(|X
  36. .br
  37. .di
  38. .rm %\\*(|X
  39. .xl \\n($lu
  40. .rm |X
  41. .ev
  42. .nf
  43. .in 0
  44. .ta \\n(.lu-\\n(xuuR \\n(.luR
  45. .|x
  46. .fi
  47. .in
  48. .rm |x
  49. ..
  50. .if \n(xu<=0 \
  51. .    nr xu 0.5i
  52. .nr c. \n(_0
  53.