diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-13 00:11:19 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-13 00:11:19 +0000 |
commit | a540dd6c17bdfb6f6ef087e7ef71c083516c8166 (patch) | |
tree | 8fbe88cfc4371a77b97d5e8637f52a02ae0fe1d6 /Master/texmf-dist/tex/latex/was/gensymb.sty | |
parent | 10601f0cc86aa4c232b235023ba7c35be0b54a8e (diff) |
was
git-svn-id: svn://tug.org/texlive/trunk@1449 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/was/gensymb.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/was/gensymb.sty | 143 |
1 files changed, 143 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/was/gensymb.sty b/Master/texmf-dist/tex/latex/was/gensymb.sty new file mode 100644 index 00000000000..f3fc2b93ec3 --- /dev/null +++ b/Master/texmf-dist/tex/latex/was/gensymb.sty @@ -0,0 +1,143 @@ +%% +%% This is file `gensymb.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% gensymb.dtx (with options: `package') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% Any modified versions of this file must be renamed +%% with new filenames distinct from gensymb.sty. +%% +%% For distribution of the original source see the terms +%% for copying and modification in the file gensymb.dtx. +%% +%% This generated file may be distributed as long as the +%% original source files, as listed above, are part of the +%% same distribution. (The sources need not necessarily be +%% in the same archive or directory.) +\ProvidesPackage{gensymb} + [2003/07/02 v1.0 (WaS)] +\newif\ifgns@Upomega +\newif\ifgns@Omega +\newif\ifgns@upmu +\DeclareOption{Upomega}{\gns@Upomegatrue} +\DeclareOption{Omega}{\gns@Omegatrue} +\DeclareOption{upmu}{\gns@upmutrue} +\ProcessOptions\relax +\newcommand\celsius{} +\newcommand\degree{} +\newcommand\ohm{} +\def\gns@usefakedsymbols{% +\renewcommand{\degree}{\ensuremath{^\circ}} +\DeclareRobustCommand{\celsius}{% + \ifmmode^\circ\mathrm{C}\else$^\circ$C\fi} +\PackageInfo{gensymb}{% + Faking symbols for \protect\degree\space and \protect\celsius} +\PackageWarningNoLine{gensymb}{% + Not defining \protect\perthousand} +} +\def\gns@setupmathcomp{% +\expandafter\ifx\csname tcmu\endcsname\relax + \DeclareSymbolFont{gns@font}{TS1}{\familydefault}{m}{n} + \ifx\mv@bold\@undefined\else + \SetSymbolFont{gns@font}{bold}{TS1}{\familydefault}{\bfdefault}{n} + \fi + \DeclareMathSymbol{\tccelsius}{\mathord}{gns@font}{137} % {'211} + \DeclareMathSymbol{\tcdegree}{\mathord}{gns@font}{176} % {'260} + \DeclareMathSymbol{\tcperthousand}{\mathord}{gns@font}{135} % {'207} + \DeclareMathSymbol{\tcmu}{\mathord}{gns@font}{181} % {'265} + \DeclareMathSymbol{\tcohm}{\mathord}{gns@font}{87} % {'127} + \PackageInfo{gensymb}{Math companion symbols declared} +\else + \PackageInfo{gensymb}{Math companion symbols found} +\fi +} +\def\gns@usetcsymbols{% +\DeclareRobustCommand{\degree}{% + \ifmmode\tcdegree\else\textdegree\fi} +\DeclareRobustCommand{\celsius}{% + \ifmmode\tccelsius\else\textcelsius\fi} +\DeclareRobustCommand{\perthousand}{% + \ifmmode\tcperthousand\else\textperthousand\fi} +\PackageInfo{gensymb}{Using text companion symbols for % + \protect\degree, \protect\celsius\space and \protect\perthousand} +} +\def\gns@useUpomega{% + \expandafter\ifx\csname Upomega\endcsname\relax + \PackageError{gensymb} + {You have requested the option Upomega,\MessageBreak + but the command \protect\Upomega\space is undefined} + {Load the upgreek package additionally and try again!} + \fi + \DeclareRobustCommand{\ohm}{\ifmmode\Upomega\else$\Upomega$\fi} + \PackageInfo{gensymb}{Using \protect\Upomega\space for \protect\ohm} +} +\def\gns@useOmega{% + \expandafter\ifx\csname upOmega\endcsname\relax + \DeclareRobustCommand{\ohm}{\ifmmode\Omega\else$\Omega$\fi} + \PackageInfo{gensymb}{Using \protect\Omega\space for \protect\ohm} + \else + \DeclareRobustCommand{\ohm}{\ifmmode\upOmega\else$\upOmega$\fi} + \PackageInfo{gensymb}{Using \protect\upOmega\space for \protect\ohm} + \fi +} +\def\gns@usetextohm{% + \DeclareRobustCommand{\ohm}{\ifmmode\tcohm\else\textohm\fi} + \PackageInfo{gensymb}{Using \protect\textohm\space for \protect\ohm} +} +\def\gns@useupmu{% + \expandafter\ifx\csname upmu\endcsname\relax + \PackageError{gensymb} + {You have requested the option upmu,\MessageBreak + but the command \protect\upmu\space is undefined} + {Load the upgreek package additionally and try again!} + \fi + \DeclareRobustCommand{\micro}{\ifmmode\upmu\else$\upmu$\fi} + \PackageInfo{gensymb}{Using \protect\upmu\space for \protect\micro} +} +\def\gns@usetextmu{% + \DeclareRobustCommand{\micro}{\ifmmode\tcmu\else\textmu\fi} + \PackageInfo{gensymb}{Using \protect\textmu\space for \protect\micro} +} +\def\gns@usenomu{% + \PackageWarningNoLine{gensymb}{% + Not defining \protect\micro} +} +\AtBeginDocument{% +\@ifpackageloaded{textcomp}{\gns@setupmathcomp\gns@usetcsymbols}% + {\gns@usefakedsymbols} +\ifgns@Upomega + \gns@useUpomega +\else +\ifgns@Omega + \gns@useOmega +\else +\@ifpackageloaded{textcomp}% + {\gns@usetextohm}% + {\gns@useOmega} +\fi\fi +\ifgns@upmu + \gns@useupmu +\else +\@ifpackageloaded{textcomp}% + {\gns@usetextmu}% + {\gns@usenomu} +\fi +\let\gns@usefakedsymbols\relax +\let\gns@setupmathcomp\relax +\let\gns@usetcsymbols\relax +\let\gns@useUpomega\relax +\let\gns@useOmega\relax +\let\gns@usetextohm\relax +\let\gns@useupmu\relax +\let\gns@usenomu\relax +\let\gns@usetextmu\relax +} +\endinput +%% +%% End of file `gensymb.sty'. |