PWG1/doc/comparison/amsbsy.sty

   1 %%
   2 %% This is file `amsbsy.sty',
   3 %% generated with the docstrip utility.
   4 %%
   5 %% The original source files were:
   6 %%
   7 %% amsbsy.dtx
   8 %%
   9 %%% ====================================================================
  10 %%% @LaTeX-file{
  11 %%%   filename  = "amsbsy.dtx",
  12 %%%   version   = "1.2d",
  13 %%%   date      = "1999/11/29",
  14 %%%   time      = "14:26:42 EST",
  15 %%%   author    = "American Mathematical Society",
  16 %%%   copyright = "Copyright 1995 American Mathematical Society,
  17 %%%                all rights reserved.  Copying of this file is
  18 %%%                authorized only if either:
  19 %%%                (1) you make absolutely no changes to your copy,
  20 %%%                including name; OR
  21 %%%                (2) if you do make changes, you first rename it
  22 %%%                to some other name.",
  23 %%%   address   = "American Mathematical Society,
  24 %%%                Technical Support,
  25 %%%                Electronic Products and Services,
  26 %%%                P. O. Box 6248,
  27 %%%                Providence, RI 02940,
  28 %%%                USA",
  29 %%%   telephone = "401-455-4080 or (in the USA and Canada)
  30 %%%                800-321-4AMS (321-4267)",
  31 %%%   FAX       = "401-331-3842",
  32 %%%   checksum  = "08988 251 1238 9625",
  33 %%%   email     = "tech-support@ams.org (Internet)",
  34 %%%   codetable = "ISO/ASCII",
  35 %%%   keywords  = "latex, bold symbol, pmb",
  36 %%%   supported = "yes",
  37 %%%   abstract  = "This is a \LaTeX{} package that provides a command
  38 %%%                for producing bold math symbols when appropriate
  39 %%%                fonts exist, and a `poor man's bold' command that
  40 %%%                can be applied when no appropriate bold font
  41 %%%                is available.",
  42 %%%   docstring = "The checksum field above contains a CRC-16
  43 %%%                checksum as the first value, followed by the
  44 %%%                equivalent of the standard UNIX wc (word
  45 %%%                count) utility output of lines, words, and
  46 %%%                characters.  This is produced by Robert
  47 %%%                Solovay's checksum utility.",
  48 %%% }
  49 %%% ====================================================================
  50 \NeedsTeXFormat{LaTeX2e}% LaTeX 2.09 can't be used (nor non-LaTeX)
  51 [1994/12/01]% LaTeX date must December 1994 or later
  52 \ProvidesPackage{amsbsy}[1999/11/29 v1.2d]
  53 \RequirePackage{amsgen}
  54 \DeclareRobustCommand{\boldsymbol}[1]{%
  55   \begingroup
  56   \let\@nomath\@gobble \mathversion{bold}%
  57   \math@atom{#1}{%
  58   \mathchoice%
  59     {\hbox{$\m@th\displaystyle#1$}}%
  60     {\hbox{$\m@th\textstyle#1$}}%
  61     {\hbox{$\m@th\scriptstyle#1$}}%
  62     {\hbox{$\m@th\scriptscriptstyle#1$}}}%
  63   \endgroup}
  64 \def\math@atom#1#2{%
  65    \binrel@{#1}\binrel@@{#2}}
  66 \DeclareRobustCommand{\pmb}{%
  67   \ifmmode\else \expandafter\pmb@@\fi\mathpalette\pmb@}
  68 \def\pmb@@#1#2#3{\leavevmode\setboxz@h{#3}%
  69    \dimen@-\wdz@
  70    \kern-.5\ex@\copy\z@
  71    \kern\dimen@\kern.25\ex@\raise.4\ex@\copy\z@
  72    \kern\dimen@\kern.25\ex@\box\z@
  73 }
  74 \newdimen\pmbraise@
  75 \def\pmb@#1#2{\setbox8\hbox{$\m@th#1{#2}$}%
  76   \setboxz@h{$\m@th#1\mkern.5mu$}\pmbraise@\wdz@
  77   \binrel@{#2}%
  78   \dimen@-\wd8 %
  79   \binrel@@{%
  80     \mkern-.8mu\copy8 %
  81     \kern\dimen@\mkern.4mu\raise\pmbraise@\copy8 %
  82     \kern\dimen@\mkern.4mu\box8 }%
  83 }
  84 \def\binrel@#1{\begingroup
  85   \setboxz@h{\thinmuskip0mu
  86     \medmuskip\m@ne mu\thickmuskip\@ne mu
  87     \setbox\tw@\hbox{$#1\m@th$}\kern-\wd\tw@
  88     ${}#1{}\m@th$}%
  89   \edef\@tempa{\endgroup\let\noexpand\binrel@@
  90     \ifdim\wdz@<\z@ \mathbin
  91     \else\ifdim\wdz@>\z@ \mathrel
  92     \else \relax\fi\fi}%
  93   \@tempa
  94 }
  95 \let\binrel@@\relax
  96 \endinput
  97 %%
  98 %% End of file `amsbsy.sty'.