diff options
Diffstat (limited to 'Master/texmf-dist/tex/plain/gustlib/map/tsp.tex')
-rw-r--r-- | Master/texmf-dist/tex/plain/gustlib/map/tsp.tex | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/plain/gustlib/map/tsp.tex b/Master/texmf-dist/tex/plain/gustlib/map/tsp.tex new file mode 100644 index 00000000000..e140ed624de --- /dev/null +++ b/Master/texmf-dist/tex/plain/gustlib/map/tsp.tex @@ -0,0 +1,49 @@ +% TSP.TEX + +% Marek Ry\'cko + +% Macro \tsp +% Text SPace + +% uses SPLIT.TEX + +% version 0.0 24.07.1993 +% version 0.2, 8.10.1993 +% -- no \input map +% version 0.3 1.5.1996 +% -- english description + + +% uses SPLIT +% uses MAP + + +\def\tsp + %#1% + {\map + {\ifx\mapcur\space + \hskip\tspsp\relax + \else + \mapcur + % if it is not the last element -- join using kern: + \ifx\mappost\empty \else + % ``future'' is nonempty; + % we put interletter spacing only if + % next character is not space: + \split\mappost\tsptest\fool + \ifx\tsptest\space + % will be space, don't put glue: + \else + % not kern to make it streachable: + \nobreak\hskip\tsplet\relax + \fi + \fi + \fi + }% the end of first parameter + %{#1}% + } +% default parameters: +% the amount of space in place of the space character: + \def\tspsp {0.9em plus.3em minus.2em} +% distance between letters: + \def\tsplet {.1666667em}% |