]> diplodocus.org Git - nmh/blob - docs/historical/mh-6.8.5/papers/doclib/trademark.tex
Cleaned up a bit, mostly in comments for each function.
[nmh] / docs / historical / mh-6.8.5 / papers / doclib / trademark.tex
1 % Trademarks...
2
3 \def\gobble#1{}
4
5 \def\tradeORGfont{\sc} % used for organizations (e.g., ACM)
6 \def\tradeNAMfont{\sf} % used for names (e.g., Ada)
7
8 \def\tradeorg#1{\tradeaux{#1}{\expandafter\gobble\string#1}\empty\tradeORGfont}
9 \def\tradename#1#2#3{\tradeaux{#1}{#2}{#3}\tradeNAMfont}
10 \def\trademark#1#2{%
11 \tradeaux{#1}{\expandafter\gobble\string#1}{#2}\tradeNAMfont
12 }
13
14 \def\tradeaux#1#2#3#4{%
15 \def#1/{\relax}% % in case #3 references #1
16 \setbox0=\hbox{#3}% % when we make the \hbox
17 \ifdim\wd0>0pt
18 \gdef#1/{%
19 \tradeaux{#1}{#2}\empty{#4}%
20 #1/\nfootnote{#1/ is a trademark of #3.}%
21 }%
22 \else
23 \gdef#1/{{#4#2}}%
24 \fi
25 }
26
27 \tradeorg\acm
28 \tradeorg\ansi
29 \tradename\Ada{Ada}
30 {the Department of Defense (\Ada/ Joint Program Office)}
31 \tradeorg\bsd
32 \tradeorg\ccitt
33 \tradename\cms{CMS} {International Business Machines, Incorporated}
34 \tradename\cpm{CP/M} {Digital Research Corporation}
35 \tradename\decnet{DECnet} {Digital Equipment Corporation}
36 \tradeorg\dod
37 \tradename\ethernet{Ethernet} {the Xerox Corporation}
38 \tradename\eunice{Eunice} \empty
39 \tradeorg\ieee
40 \tradename\lattice{Lattice} {Lattice, Incorporated}
41 \tradename\locus{Locus} {Locus Computing Corporation}
42 \tradename\msdos{MS-DOS} {Microsoft Corporation}
43 \tradeorg\milstd
44 \tradename\pcinterface{PC-Interface}%
45 {Locus Computing Corporation}
46 \tradename{\tops20}{Tops20} {Digital Equipment Corporation}
47 \tradename\trustedmail{Trusted\ Mail}%
48 {Trusted Technologies, Incorporated}
49 \tradename\unix{UNIX} {AT\&T Bell Laboratories}
50 \tradename\vax{VAX} {Digital Equipment Corporation}
51 \tradename\vm{VM} {International Business Machines, Incorporated}
52 \tradename\vms{VMS} {Digital Equipment Corporation}
53 \tradename\xenix{Xenix} {Microsoft Corporation}