PeCO-EO/amsbsy.sty

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