From 3d08d5d73aca1b65489c0d7e2a00271d00c9de59 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Wed, 5 Dec 2007 17:03:55 +0000 Subject: new package thinsp from ctan 07-12-04 git-svn-id: svn://tug.org/texlive/trunk@5715 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/thinsp/thinsp.sty | 106 ++++++++++++++++++++++++++ 1 file changed, 106 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/thinsp/thinsp.sty (limited to 'Master/texmf-dist/tex/latex/thinsp') diff --git a/Master/texmf-dist/tex/latex/thinsp/thinsp.sty b/Master/texmf-dist/tex/latex/thinsp/thinsp.sty new file mode 100644 index 00000000000..fa6891e2115 --- /dev/null +++ b/Master/texmf-dist/tex/latex/thinsp/thinsp.sty @@ -0,0 +1,106 @@ +% Copyright (C) 2007 Palle Jorgensen + +% This file is free software; you can redistribute it and/or modify it +% under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or +% (at your option) any later version. + +% This file is distributed in the hope that it will be useful, but +% WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +% General Public License for more details. + +% You should have received a copy of the GNU General Public License +% along with this file; if not, write to the Free Software Foundation, +% Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + +\ProvidesPackage{thinsp}[2007/30/11 v 0.1 Package providing stretchable thinspaces] + +\newif\if@thinsp@thinspace +\@thinsp@thinspacetrue +\DeclareOption{nothinspace}{\@thinsp@thinspacefalse} +\DeclareOption{thinspace}{\@thinsp@thinspacetrue} + +\newif\if@thinsp@thinthinspace +\@thinsp@thinthinspacetrue +\DeclareOption{nothinthinspace}{\@thinsp@thinthinspacefalse} +\DeclareOption{thinthinspace}{\@thinsp@thinthinspacetrue} + + +\newif\if@thinsp@negthinspace +\@thinsp@negthinspacefalse +\DeclareOption{nonegthinspace}{\@thinsp@negthinspacefalse} +\DeclareOption{negthinspace}{\@thinsp@negthinspacetrue} + +\def\thinsp@thinamount{.5} +\def\thinsp@thinthinamount{.25} + +\DeclareOption{onethird}{% + \def\thinsp@thinamount{.333}% + \def\thinsp@thinthinamount{.167}% +} + +\DeclareOption{onehalf}{% + \def\thinsp@thinamount{.5}% + \def\thinsp@thinthinamount{.25}% +} + +\DeclareOption{twothirds}{% + \def\thinsp@thinamount{.667}% + \def\thinsp@thinthinamount{.333}% +} + +\ProcessOptions* + +\def\stretchthinspace{% + \nobreak\hskip\thinsp@thinamount\fontdimen2\font% + \@plus\thinsp@thinamount\fontdimen2\font% + \@minus\thinsp@thinamount\fontdimen4\font% + \relax% +} + +\def\stretchnegthinspace{% + \nobreak\hskip-\thinsp@thinamount\fontdimen2\font% + \@plus\thinsp@thinamount\fontdimen4\font% + \@minus\thinsp@thinamount\fontdimen3\font% + \relax% +} + +\def\stretchthinthinspace{% + \nobreak\hskip\thinsp@thinthinamount\fontdimen2\font% + \@plus\thinsp@thinthinamount\fontdimen3\font% + \@minus\thinsp@thinthinamount\fontdimen4\font% + \relax% +} + +\AtBeginDocument{% + \if@thinsp@thinspace + \PackageInfo{thinsp}{Redefining \string\thinspace} + \let\thinspace\stretchthinspace + \@ifpackageloaded{amsmath}{% + \PackageInfo{thinsp}{And now redefining AMS-math's + \string\thinspace} + \def\,{\ifmmode\mskip\thinmuskip\else\stretchthinspace\fi}% + \let\thinspace\,% + } + \fi + % + \if@thinsp@negthinspace + \PackageInfo{thinsp}{Redefining \string\negthinspace} + \let\negthinspace\stretchnegthinspace + \@ifpackageloaded{amsmath}{% + \PackageInfo{thinsp}{And now redefining AMS-math's + \string\negthinspace} + \def\!{\ifmmode\mskip-\thinmuskip\else\stretchnegthinspace\fi}% + \let\negthinspace\!% + } + \fi + % + \if@thinsp@thinthinspace + \@ifundefined{thinthinspace}{}{% + \PackageInfo{thinsp}{Redefining \string\thinthinspace}} + \let\thinthinspace\stretchthinthinspace + \fi +} + +\endinput \ No newline at end of file -- cgit v1.2.3