summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/aeguill
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex/contrib/aeguill
Initial commit
Diffstat (limited to 'macros/latex/contrib/aeguill')
-rw-r--r--macros/latex/contrib/aeguill/README8
-rw-r--r--macros/latex/contrib/aeguill/aeguill.sty162
-rw-r--r--macros/latex/contrib/aeguill/guil-test1.pdfbin0 -> 26068 bytes
-rw-r--r--macros/latex/contrib/aeguill/guil-test1.tex57
-rw-r--r--macros/latex/contrib/aeguill/guil-test2.pdfbin0 -> 13577 bytes
-rw-r--r--macros/latex/contrib/aeguill/guil-test2.tex74
-rw-r--r--macros/latex/contrib/aeguill/license.txt11
7 files changed, 312 insertions, 0 deletions
diff --git a/macros/latex/contrib/aeguill/README b/macros/latex/contrib/aeguill/README
new file mode 100644
index 0000000000..5d3d57d991
--- /dev/null
+++ b/macros/latex/contrib/aeguill/README
@@ -0,0 +1,8 @@
+aeguill.sty
+
+This package adds French guillemets to the ae package.
+
+It is released under the LPPL.
+
+Denis Roegel, 25 April 2001.
+
diff --git a/macros/latex/contrib/aeguill/aeguill.sty b/macros/latex/contrib/aeguill/aeguill.sty
new file mode 100644
index 0000000000..51748e40f2
--- /dev/null
+++ b/macros/latex/contrib/aeguill/aeguill.sty
@@ -0,0 +1,162 @@
+%% This is file `aeguill.sty'
+% This file gives french guillemets (and not guillemots!)
+% built with the LatinModern fonts (default),
+% the Polish CMR fonts, WNCYR fonts, the LASY fonts
+% or with the EC fonts.
+% This is useful in conjunction with the ae package
+% (this package loads the ae package in case it has not been loaded)
+% and with or without the french(le) package.
+%
+% In order to get the guillemets, it is necessary to either type
+% \guillemotleft and \guillemotright, or to use an 8 bit encoding
+% (such as ISO-Latin1) which selects these two commands,
+% or, if you use the french package (but not the frenchle package),
+% to type << or >>.
+%
+% By default, you get the LatinModern guillemets; if this package is loaded
+% with the `pl' option, you get the Polish guillemets;
+% with the `cm' option, you get the LASY guillemets; with `ec' you
+% get the EC guillemets, and with `cyr' you get the cyrillic guillemets.
+%
+% In verbatim mode, you always get the EC/TT guillemets.
+%
+% The default option is interesting in conjunction with PDF,
+% because LatinModern is a Type 1 font close to CMR
+% and whose guillemets are very close in shape to the EC guillemets.
+%
+%
+% Support for Polish CMR guillemets was kindly provided by
+% Rolf Niepraschk <niepraschk@ptb.de> in version 0.99 (2000/05/22).
+% Bernd Raichle provided extensive simplifications to the code
+% for version 1.00.
+%
+% This package is released under the LPPL.
+%
+% Changes:
+% Date version
+% 2001/04/12 1.01 the frenchle and french package are now distinguished.
+% 2003/08/02 1.02 support for the new LatinModern fonts (suggested by Daniel Flipo)
+% the default has been changed to LatinModern guillemets
+% (this is an unfortunate, but in my view necessary, incompatibility)
+% (I do not plan to change this default ever, as LatinModern is
+% supposed to become standard, and eventually make ae/ec obsolete)
+%
+\def\fileversion{1.02}
+\def\filedate{2003/08/02}
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{aeguill}[2003/08/02 1.02 %
+AE fonts with french guillemets (D. Roegel)]
+\RequirePackage{ae}
+
+\newcommand{\@ae@switch}[5]{#5}
+\DeclareOption{ec}{\renewcommand\@ae@switch[5]{#1}}
+\DeclareOption{cm}{\renewcommand\@ae@switch[5]{#2}}
+\DeclareOption{cyr}{\renewcommand\@ae@switch[5]{#3}}
+\DeclareOption{pl}{\renewcommand\@ae@switch[5]{#4}}
+\DeclareOption{lm}{\renewcommand\@ae@switch[5]{#5}}
+\ExecuteOptions{lm}
+\ProcessOptions
+
+%
+% Load necessary packages
+%
+\@ae@switch{% ec
+ % do nothing
+}{% cm
+ \RequirePackage{latexsym}%
+}{% cyr
+ \RequirePackage[OT2,T1]{fontenc}%
+}{% pl
+ \RequirePackage[OT4,T1]{fontenc}%
+}{% lm
+ % do nothing
+}
+
+% The following command will be compared to \frenchname,
+% as defined in french.sty and frenchle.sty.
+\def\aeguillfrenchdefault{french}%
+
+\let\guill@verbatim@font\verbatim@font
+\def\verbatim@font{\guill@verbatim@font\ecguills{cmtt}%
+ \let\guillemotleft\@oguills\let\guillemotright\@fguills}
+
+\begingroup \catcode`\<=13 \catcode`\>=13
+\def\x{\endgroup
+ \def\ae@lfguill{<<}%
+ \def\ae@rfguill{>>}%
+}\x
+
+\newcommand{\ecguills}[1]{%
+ \def\selectguillfont{\fontencoding{T1}\fontfamily{#1}\selectfont}%
+ \def\@oguills{{\selectguillfont\symbol{19}}}%
+ \def\@fguills{{\selectguillfont\symbol{20}}}%
+ }
+
+\newcommand{\aeguills}{%
+ \ae@guills
+ % We redefine \guillemotleft and \guillemotright
+ % in order to catch them when they are used
+ % with \DeclareInputText (in latin1.def for instance)
+ % We use \auxWARNINGi as a safe indicator that french.sty is used.
+ \gdef\guillemotleft{\ifx\auxWARNINGi\undefined
+ \@oguills % neither french.sty nor frenchle.sty
+ \else
+ \ifx\aeguillfrenchdefault\frenchname
+ \ae@lfguill % french.sty
+ \else
+ \@oguills % frenchle.sty
+ \fi
+ \fi}%
+ \gdef\guillemotright{\ifx\auxWARNINGi\undefined
+ \@fguills % neither french.sty nor frenchle.sty
+ \else
+ \ifx\aeguillfrenchdefault\frenchname
+ \ae@rfguill % french.sty
+ \else
+ \@fguills % frenchle.sty
+ \fi
+ \fi}%
+ }
+
+%
+% Depending on the class option
+% define the internal command \ae@guills
+\@ae@switch{% ec
+ \newcommand{\ae@guills}{%
+ \ecguills{cmr}}%
+}{% cm
+ \newcommand{\ae@guills}{%
+ \def\selectguillfont{\fontencoding{U}\fontfamily{lasy}%
+ \fontseries{m}\fontshape{n}\selectfont}%
+ \def\@oguills{\leavevmode\nobreak
+ \hbox{\selectguillfont (\kern-.20em(\kern.20em}\nobreak}%
+ \def\@fguills{\leavevmode\nobreak
+ \hbox{\selectguillfont \kern.20em)\kern-.2em)}%
+ \ifdim\fontdimen\@ne\font>\z@\/\fi}}%
+}{% cyr
+ \newcommand{\ae@guills}{%
+ \def\selectguillfont{\fontencoding{OT2}\fontfamily{wncyr}\selectfont}%
+ \def\@oguills{{\selectguillfont\symbol{60}}}%
+ \def\@fguills{{\selectguillfont\symbol{62}}}}
+}{% pl
+ \newcommand{\ae@guills}{%
+ \def\selectguillfont{\fontencoding{OT4}\fontfamily{cmr}\selectfont}%
+ \def\@oguills{{\selectguillfont\symbol{174}}}%
+ \def\@fguills{{\selectguillfont\symbol{175}}}}
+}{% lm
+ \newcommand{\ae@guills}{%
+ \ecguills{lmr}}%
+}
+
+
+\AtBeginDocument{%
+ \ifx\GOfrench\undefined
+ \aeguills
+ \else
+ \let\aeguill@GOfrench\GOfrench
+ \gdef\GOfrench{\aeguill@GOfrench \aeguills}%
+ \fi
+ }
+
+\endinput
+
diff --git a/macros/latex/contrib/aeguill/guil-test1.pdf b/macros/latex/contrib/aeguill/guil-test1.pdf
new file mode 100644
index 0000000000..ad6f6c614a
--- /dev/null
+++ b/macros/latex/contrib/aeguill/guil-test1.pdf
Binary files differ
diff --git a/macros/latex/contrib/aeguill/guil-test1.tex b/macros/latex/contrib/aeguill/guil-test1.tex
new file mode 100644
index 0000000000..a1c80dbb4a
--- /dev/null
+++ b/macros/latex/contrib/aeguill/guil-test1.tex
@@ -0,0 +1,57 @@
+\documentclass[a4paper]{article}
+\usepackage[T1]{fontenc}
+\usepackage[latin1]{inputenc}
+\usepackage[pl]{aeguill}
+%\usepackage{french}
+%\usepackage[frenchb]{babel}
+
+\begin{document}
+\title{The \texttt{aeguill} package}
+\author{Denis Roegel\\
+ \texttt{roegel@loria.fr}}
+\date{2 August 2003}
+\maketitle
+
+When using the T1 encoding and the \texttt{ae} fonts, one is
+faced with the problem that the \texttt{ae} fonts do not contain
+the guillemets, which are necessary for the French.
+
+This package proposes a solution to this problem.
+
+Example of french guillemets: «~test~».
+ % the input << test >> works only with \usepackage{french}
+
+The guillemets in the previous example
+are taken from the \texttt{plr} fonts (Polish CMR),
+which are similar to EC guillemets and
+of which there is a Type~1 version. Hence, you will get
+a nice output with \texttt{pdflatex}.
+
+There are five options to the \texttt{aeguill} package:
+
+\begin{itemize}
+\item `\texttt{lm}' (default): with this, the guillemets
+are taken from the \texttt{lmr} fonts.
+\item `\texttt{pl}': with this, the guillemets
+are taken from the \texttt{plr} fonts.
+\item `\texttt{cyr}': with this, the guillemets
+are taken from the \texttt{wncyr} fonts.
+\item `\texttt{cm}': with this, the guillemets are built with the
+\texttt{lasy} fonts.
+\item `\texttt{ec}': with this, the guillemets are those in the
+\texttt{ec} fonts.
+\end{itemize}
+
+
+\textbf{Caution:}
+
+\begin{itemize}
+\item If the \texttt{babel} package is used with the \texttt{french} option,
+ do not use \verb|\CyrillicGuillemets|.
+\item If the \texttt{french} package is used,
+ you may write ``\verb|<<|'' and ``\verb|>>|''
+ instead of ``\verb|«|'' and ``\verb|»|'' (i.e., use 7-bit encoding
+ instead of 8-bit encoding).
+\end{itemize}
+
+\end{document} \ No newline at end of file
diff --git a/macros/latex/contrib/aeguill/guil-test2.pdf b/macros/latex/contrib/aeguill/guil-test2.pdf
new file mode 100644
index 0000000000..213939e604
--- /dev/null
+++ b/macros/latex/contrib/aeguill/guil-test2.pdf
Binary files differ
diff --git a/macros/latex/contrib/aeguill/guil-test2.tex b/macros/latex/contrib/aeguill/guil-test2.tex
new file mode 100644
index 0000000000..6d8b2b6f82
--- /dev/null
+++ b/macros/latex/contrib/aeguill/guil-test2.tex
@@ -0,0 +1,74 @@
+% This file was kindly provided by Rolf Niepraschk and shows the
+% differences between the various guillemets, without using the aeguill
+% package. D. Roegel, 2000/05/22.
+%
+% guil-test2.tex
+
+% Rolf Niepraschk, 2000/05/20, email: niepraschk@ptb.de
+% Denis Roegel, 2003/08/02: updated for LM fonts
+
+% dvips -Pwww -Ppl guil-test.dvi -o guil-test.ps
+
+\documentclass[a4paper,11pt]{article}
+\usepackage[T1,OT2,OT4]{fontenc}
+
+\listfiles
+
+\setlength{\parindent}{0pt}
+
+\newcommand\CyrGuillemot{%
+ \def\selectguillfont{\fontencoding{OT2}\fontfamily{wncyr}\selectfont}
+ \def\guillemotleft{\selectguillfont\symbol{60}}
+ \def\guillemotright{\selectguillfont\symbol{62}}
+}
+
+\newcommand\PlGuillemot{%
+ \def\selectguillfont{\fontencoding{OT4}\fontfamily{cmr}\selectfont}
+ \def\guillemotleft{\selectguillfont\symbol{174}}
+ \def\guillemotright{\selectguillfont\symbol{175}}
+}
+
+\newcommand\LaGuillemot{%
+ \def\selectguillfont{\fontencoding{U}\fontfamily{lasy}%
+ \fontseries{m}\fontshape{n}\selectfont}
+ \def\guillemotleft{\selectguillfont\hbox{\symbol{40}%
+ \kern-0.20em\symbol{40}}}
+ \def\guillemotright{\selectguillfont\hbox{\symbol{41}%
+ \kern-0.20em\symbol{41}}}
+}
+
+\newcommand\ECGuillemot{%
+ \def\selectguillfont{\fontencoding{T1}\fontfamily{cmr}\selectfont}
+ \def\guillemotleft{\selectguillfont\symbol{19}}
+ \def\guillemotright{\selectguillfont\symbol{20}}
+}
+
+\newcommand\LMGuillemot{%
+ \def\selectguillfont{\fontencoding{T1}\fontfamily{lmr}\selectfont}
+ \def\guillemotleft{\selectguillfont\symbol{19}}
+ \def\guillemotright{\selectguillfont\symbol{20}}
+}
+
+\newcommand\CyrGLeft{\CyrGuillemot\guillemotleft}
+\newcommand\CyrGRight{\CyrGuillemot\guillemotright}
+\newcommand\PlGLeft{\PlGuillemot\guillemotleft}
+\newcommand\PlGRight{\PlGuillemot\guillemotright}
+\newcommand\LaGLeft{\LaGuillemot\guillemotleft}
+\newcommand\LaGRight{\LaGuillemot\guillemotright}
+\newcommand\ECGLeft{\ECGuillemot\guillemotleft}
+\newcommand\ECGRight{\ECGuillemot\guillemotright}
+\newcommand\LMGLeft{\LMGuillemot\guillemotleft}
+\newcommand\LMGRight{\LMGuillemot\guillemotright}
+
+\begin{document}
+
+\begin{tabular}{l|ccccc}
+ & \textbf{wncyr} & \textbf{polish cmr}
+ & \textbf{lasy} & \textbf{ec} & \textbf{lmr} \\ \hline
+ \verb|\guillemotleft| & \CyrGLeft & \PlGLeft
+ & \LaGLeft & \ECGLeft & \LMGLeft \\
+ \verb|\guillemotright| & \CyrGRight & \PlGRight
+ & \LaGRight & \ECGRight & \LMGRight
+\end{tabular}
+
+\end{document}
diff --git a/macros/latex/contrib/aeguill/license.txt b/macros/latex/contrib/aeguill/license.txt
new file mode 100644
index 0000000000..ea0ebbc0e5
--- /dev/null
+++ b/macros/latex/contrib/aeguill/license.txt
@@ -0,0 +1,11 @@
+aeguill.sty
+
+This package adds French guillemets to the ae package.
+
+It is released under the LPPL.
+
+Denis Roegel, 2 August 2003.
+
+
+
+