engpron

git-svn-id: svn://tug.org/texlive/trunk@862 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 166 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/engpron/engpron.sty b/Master/texmf-dist/tex/latex/engpron/engpron.sty
new file mode 100644
index 00000000000..b26d117ce96
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/engpron/engpron.sty
@@ -0,0 +1,166 @@
+%%
+%% This is file `engpron.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% engpron.dtx  (with options: `package')
+%% 
+%% This is a generated file.
+%% 
+%% Copyright (C) 2003 Y. Henel, le TeXnicien de surface
+%% <Yvon.Henel@wanadoo.fr>
+%% 
+%% This file may be distributed and/or modified under the conditions of
+%% the LaTeX Project Public License, either version 1.2 of this license
+%% or (at your option) any later version.  The latest version of this
+%% license is in:
+%% 
+%%    http://www.latex-project.org/lppl.txt
+%% 
+%% and version 1.2 or later is part of all distributions of LaTeX version
+%% 1999/12/01 or later.
+%% 
+%%% Copyright (C) 2003, 2004  by Yvon Henel <Yvon.Henel@wanadoo.fr>
+%%% ---------------------------------------------------------------
+\NeedsTeXFormat{LaTeX2e}[1999/12/01]
+\def\fileversion{v1}
+\def\filedate{2004/04/17}
+\def\fileinfo{fichier engpron.dtx par Le \TeX nicien de surface}
+\ProvidesPackage{engpron}
+   [\filedate\space\fileversion\space\fileinfo]
+\RequirePackage{tipa}[1996/06/10] \RequirePackage{ifthen}
+\newboolean{tip@style} \newboolean{b@wild} \newboolean{b@jones}
+\newboolean{b@harraps}
+\DeclareOption{defaut}{%
+  \setboolean{tip@style}{false}\setboolean{b@wild}{true}%
+  \setboolean{b@jones}{true}\setboolean{b@harraps}{false}%
+}
+\DeclareOption{tipastress}{\setboolean{tip@style}{true}}
+\DeclareOption{monstress}{\setboolean{tip@style}{false}}
+\DeclareOption{wild}{\setboolean{b@wild}{true}}
+\DeclareOption{tame}{\setboolean{b@wild}{false}}
+\DeclareOption{jones}{\setboolean{b@jones}{true}%
+  \setboolean{b@harraps}{false}}
+\DeclareOption{harraps}{\setboolean{b@jones}{false}%
+  \setboolean{b@harraps}{true}}
+\DeclareOption*{\PackageError{engpron}{%
+    L'option \CurrentOption\space n'est pas connue !\MessageBreak
+    C'est << monstress >> qui est l'option par d^^e9faut}%
+  {Choisissez entre << monstress >> (pour un accent tonique gras)
+    \MessageBreak et << tipastress >> (pour l'accent tonique fourni
+    par tipa.sty).}}
+\ExecuteOptions{defaut}
+\ProcessOptions\relax
+\let\l@viellelivre=\pounds
+\newcommand{\EP@ActiveL@Livre}{\catcode `\^^a3=\active}
+\newcommand{\ActiveLaLivre}{\EP@ActiveL@Livre\def^^a3##1{\csname
+    \string^^a3##1\endcsname}}
+\newcommand{\makepoundletter}{\catcode`\^^a311\relax}
+\newcommand{\makepoundother}{\catcode`\^^a312\relax}
+\newcommand{\EPtextestyle}{\rmfamily\upshape}
+\newcommand{\EPouvrante}{[}
+\def\EP@ouvr@nte{\bgroup\EPouvrante}
+\newcommand{\EPfermante}{]}
+\def\EP@ferm@nte{\EPfermante\egroup}
+\newcommand{\pron}[1]{{\EPouvrante\EPtextestyle #1\EPfermante}}
+\def\Pron#{\bgroup\ActiveLaLivre\let\next=}
+\def\PRON#{\EP@ouvr@nte\EPtextestyle%
+  \bgroup\ActiveLaLivre\afterassignment\PRON@UX\let\next=}
+\def\PRON@UX{\aftergroup\EP@ferm@nte\relax}
+\newcommand{\EPaccentprincipal}{\,\rule[-0.5ex]{0.5pt}{0.8ex}\,}
+\newcommand{\EPaccentsecondaire}{\,\rule[0.5ex]{0.5pt}{0.8ex}\,}
+\newenvironment{LivreActive}{\ActiveLaLivre}{}
+\def\^^a3{\pounds}
+\newcommand{\EP@bas}{\EPaccentprincipal}
+\newcommand{\EP@haut}{\EPaccentsecondaire}
+\newcommand{\EP@djeu}{d\textyogh}
+\newcommand{\EP@icourt}{\i}
+\newcommand{\EP@ahyi}{a\EP@icourt}
+\newcommand{\EP@ehyi}{e\EP@icourt}
+\newcommand{\EP@ohyi}{\textopeno\EP@icourt}
+\newcommand{\EP@tcheu}{t\textesh}
+\newcommand{\EP@euou}{\textschwa\textupsilon}
+\newcommand{\EP@eheu}{e\textschwa}
+\newcommand{\EP@iyeu}{\EP@icourt\textschwa}
+\newcommand{\EP@oueu}{\textupsilon\textschwa}
+\newcommand{\EP@ahou}{a\textupsilon}
+\newcommand{\EP@ng@g}{\ng g}
+\newcommand{\EP@il@ng}{i\textlengthmark}
+\newcommand{\EP@al@ng}{\textscripta\textlengthmark}
+\newcommand{\EP@ol@ng}{\textopeno\textlengthmark}
+\newcommand{\EP@ul@ng}{u\textlengthmark}
+\newcommand{\EP@eul@ng}{\textrevepsilon\textlengthmark}
+\newcommand{\EP@syll@bicl}{\textsyllabic{l}}
+\newcommand{\EP@usfl@ppedt}{\textsubwedge{t}}
+\newcommand{\EP@usoou}{o\textupsilon}
+\newcommand{\EP@silent@r}{\textsuperscript{r}}
+\def\EP@fr@nn@s@liser{\afterassignment\EP@fr@nn@s@laux\let\tr@@c=}
+\def\EP@fr@nn@s@laux{%
+  \if\tr@@c i{\~\textepsilon}%
+     \else
+     \if \tr@@c a{\~\textscripta}%
+         \else
+         \if \tr@@c o{\~\textopeno}%
+             \else
+             \if \tr@@c u{\~{\oe}}%
+                 \else \relax
+                 \fi \fi \fi \fi}
+\def\EP@ngln@s@liser{\afterassignment\EP@ngln@s@laux\let\tr@@c=}
+\def\EP@ngln@s@laux{%
+  \if\tr@@c i{\~{\ae}}%
+     \else
+     \if \tr@@c a{\~\textscripta\textlengthmark}%
+         \else
+         \if \tr@@c o{\~\textopeno\textlengthmark}%
+             \else
+             \if \tr@@c u{\~\textrevepsilon\textlengthmark}%
+                 \else \relax
+                 \fi \fi \fi \fi}
+\def\EP@option@lsound{\afterassignment\EP@option@lsoundaux\let\tr@@c=}
+\def\EP@option@lsoundaux{%
+    \if\tr@@c e\textsuperscript{\,\textschwa}%
+    \else {\textsl{\tr@@c}}\fi}
+\ifthenelse{\boolean{b@harraps}}{%
+  \renewcommand{\EP@euou}{\emph{o}}
+  \def\EP@option@lsoundaux{(\tr@@c)}
+  \renewcommand{\EP@silent@r}{\emph{r}}}{}
+\ifthenelse{\boolean{tip@style}}{%
+  \renewcommand{\EP@bas}{\textsecstress}
+  \renewcommand{\EP@haut}{\textprimstress}}{}
+\makepoundletter
+\let\^^a3a \ae                     \let\^^a3A \EP@al@ng
+\let\^^a3b \EP@bas                 \let\^^a3B \EP@bas
+\let\^^a3c \textopeno              \let\^^a3C \textscripta
+\let\^^a3d \EP@djeu               %\let\^^a3D
+\let\^^a3e \textschwa              \let\^^a3E \EP@eul@ng
+\let\^^a3f \texttheta             %\let\^^a3F
+\let\^^a3h \EP@haut                \let\^^a3H \EP@haut
+\let\^^a3i \EP@icourt              \let\^^a3I \EP@il@ng
+\let\^^a3j \textyogh              %\let\^^a3J
+\let\^^a3l \EP@syll@bicl           \let\^^a3L \textbeltl
+\let\^^a3m \EP@ngln@s@liser        \let\^^a3M \EP@fr@nn@s@liser
+\let\^^a3n \ng                     \let\^^a3N \EP@ng@g
+\let\^^a3o \textturnscripta        \let\^^a3O \EP@ol@ng
+\let\^^a3p \EP@ahyi                \let\^^a3P \EP@eheu
+\let\^^a3q \EP@ehyi                \let\^^a3Q \EP@iyeu
+\let\^^a3r \EP@ohyi                \let\^^a3R \EP@oueu
+\let\^^a3s \textesh               %\let\^^a3S
+\let\^^a3t \EP@tcheu               \let\^^a3T \EP@usfl@ppedt
+\let\^^a3u \textupsilon            \let\^^a3U \EP@ul@ng
+\let\^^a3v \textturnv              \let\^^a3V \EP@usoou
+\let\^^a3w \EP@euou                \let\^^a3W \EP@ahou
+\let\^^a3x \textrevepsilon         \let\^^a3X \EP@option@lsound
+\let\^^a3y \textrhookschwa        %\let\^^a3Y
+\let\^^a3z \dh                     \let\^^a3Z \EP@silent@r
+%%% some other free slots *** quelques cases libres
+%%% \let\^^a3g                    %\let\^^a3G
+%%% \let\^^a3k                    %\let\^^a3K
+\catcode `\^^a3=\active
+\def^^a3#1{\csname \string^^a3#1\endcsname}
+\ifthenelse{\boolean{b@wild}}{}{%
+\EP@ActiveL@Livre \global\let^^a3=\l@viellelivre\relax
+}
+\endinput
+%%
+%% End of file `engpron.sty'.