From e25ecd60fe0ac3f9c8c76a1851698279b7cc6ecb Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 11 Sep 2015 22:45:08 +0000 Subject: old-arrows (11sep15) git-svn-id: svn://tug.org/texlive/trunk@38349 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/latex/old-arrows/old-arrows.sty | 40 ++++++++++++++++++++-- 1 file changed, 38 insertions(+), 2 deletions(-) (limited to 'Master/texmf-dist/tex/latex/old-arrows') diff --git a/Master/texmf-dist/tex/latex/old-arrows/old-arrows.sty b/Master/texmf-dist/tex/latex/old-arrows/old-arrows.sty index 9682143e409..eedce346cdf 100644 --- a/Master/texmf-dist/tex/latex/old-arrows/old-arrows.sty +++ b/Master/texmf-dist/tex/latex/old-arrows/old-arrows.sty @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% old-arrows.sty. Version: 1.0 - August 15, 2015. +% old-arrows.sty. Version: 1.1 - September 10, 2015. % Author: Riccardo DOSSENA % % This package provides old-style cm arrows with smaller arrowheads, @@ -24,7 +24,7 @@ % % \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{old-arrows}[2015/08/15 v1.0 Old Arrows] +\ProvidesPackage{old-arrows}[2015/09/10 v1.1 Old Arrows] \@ifpackageloaded{lmodern}{% \DeclareFontFamily{OMS}{oasy}{\skewchar\font48 } @@ -71,6 +71,30 @@ \DeclareMathDelimiter{\downarrow} {\mathrel}{oasy}{"23}{largesymbols}{"79} \DeclareMathDelimiter{\updownarrow} {\mathrel}{oasy}{"6C}{largesymbols}{"3F} +%definitions of \meno and \relbarra +\DeclareMathSymbol{\meno} {\mathbin}{oasy}{"00} +\DeclareRobustCommand + \relbarra{\mathrel{\smash\meno}} % \smash, because - + % has the same height as + + +\DeclareRobustCommand\longrightarrow + {\relbarra\joinrel\rightarrow} +\DeclareRobustCommand\longleftarrow + {\leftarrow\joinrel\relbarra} + +\def\rightarrowfill{$\m@th\smash\meno\mkern-7mu% + \cleaders\hbox{$\mkern-2mu\smash\meno\mkern-2mu$}\hfill + \mkern-7mu\mathord\rightarrow$} +\def\leftarrowfill{$\m@th\mathord\leftarrow\mkern-7mu% + \cleaders\hbox{$\mkern-2mu\smash\meno\mkern-2mu$}\hfill + \mkern-7mu\smash\meno$} + +\@ifpackageloaded{amsmath}{% +\ams@def\relbarra{\mathrel{\mathpalette\mathsm@sh\meno}} +\def\leftarrowfill@{\arrowfill@\leftarrow\relbarra\relbarra} +\def\rightarrowfill@{\arrowfill@\relbarra\relbarra\rightarrow} +\def\leftrightarrowfill@{\arrowfill@\leftarrow\relbarra\rightarrow} +\relax}{} %new style arrows: \var before every command \DeclareOption{new}{ @@ -164,6 +188,18 @@ \mathpalette{\underarrow@\varleftrightarrowfill@}} \newcommand{\varxrightarrow}[2][]{\ext@arrow 0359\varrightarrowfill@{#1}{#2}} \newcommand{\varxleftarrow}[2][]{\ext@arrow 3095\varleftarrowfill@{#1}{#2}} +\def\varvarinjlim{% + \mathop{\mathpalette\varlim@{\varrightarrowfill@\textstyle}}\nmlimits@ +} +\def\varvarprojlim{% + \mathop{\mathpalette\varlim@{\varleftarrowfill@\textstyle}}\nmlimits@ +} +\relax}{} + +%new-style support for St Mary's Road fonts +\@ifpackageloaded{stmaryrd}{% +\stmry@if\def\varmapsfrom{\varleftarrow\mapsfromchar}\fi +\stmry@if\def\varlongmapsfrom{\varlongleftarrow\mapsfromchar}\fi \relax}{} } -- cgit v1.2.3