blob: 02dbf5eafb0ee0417d27a1f6e1c0f4f827efb0f5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
%%
%% This is file `esvect.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% esvect.dtx (with options: `package')
%%
%% esvect package to typeset vectors.
%%
%% See also http://perso.wanadoo.fr/eddie.saudrais (in french)
%%
%% Run LaTeX on escevt.ins to generate files.
%%
%% Install the files:
%%
%% -- esvect.sty and uesvect.fd on TEXINPUT;
%% -- vect5.mf, vect6.mf, vect7.mf, vect8.mf, vect9.mf, vect10.mf on
%% MFINPUT;
%% -- generate tfm files running METAFONT on *.mf files, and put
%% *.tfm files on the right location.
%%
%% Run LaTeX on esvect.dtx to generate
%% documentation.
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{esvect}
\DeclareSymbolFont{esvector} {U}{esvect}{m}{n}
\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'024} %default
\DeclareOption{a}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'021}}
\DeclareOption{b}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'022}}
\DeclareOption{c}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'023}}
\DeclareOption{d}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'024}}
\DeclareOption{e}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'025}}
\DeclareOption{f}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'026}}
\DeclareOption{g}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'027}}
\DeclareOption{h}{\DeclareMathSymbol{\fldr}{\mathrel}{esvector}{'030}}
\ProcessOptions\relax
\DeclareMathSymbol{\montraita}{\mathrel}{esvector}{'040}
\DeclareMathSymbol{\montraitd}{\mathrel}{esvector}{'043}
\def\relbareda{\mathrel{\mathpalette\mathsm@sh\montraita}}
\def\relbaredd{\mathrel{\mathpalette\mathsm@sh\montraitd}}
\def\vv{\@ifstar{\vvstar}{\ESV@vecteur}}
\def\vvstar#1#2{\ESV@vecteur{#1}_{\mkern-1mu\relax#2}}
\newcommand{\ESV@vecteur}{%
\mathpalette{\overvect@\vectfill@}}
\def\vectfill@{\traitfill@\relbaredd\relbareda\fldr}
\def\traitfill@#1#2#3#4{%
$\m@th\mkern2mu\relax#4#1\mkern-1.5mu%on met \relbaredd au d\'ebut
\cleaders\hbox{$#4\mkern0mu#2\mkern0mu$}\hfill%remplit avec relbareda
\mkern-1.5mu#3$%
}
\def\overvect@#1#2#3{\vbox{\ialign{##\crcr%
\noalign{\kern-.7pt\nointerlineskip}#1#2\crcr%
\noalign{\kern-.3pt\nointerlineskip}$\m@th\hfil#2#3\hfil$\crcr}}}
\endinput
%%
%% End of file `esvect.sty'.
|
