From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- macros/latex/contrib/aeguill/README | 8 ++ macros/latex/contrib/aeguill/aeguill.sty | 162 ++++++++++++++++++++++++++++ macros/latex/contrib/aeguill/guil-test1.pdf | Bin 0 -> 26068 bytes macros/latex/contrib/aeguill/guil-test1.tex | 57 ++++++++++ macros/latex/contrib/aeguill/guil-test2.pdf | Bin 0 -> 13577 bytes macros/latex/contrib/aeguill/guil-test2.tex | 74 +++++++++++++ macros/latex/contrib/aeguill/license.txt | 11 ++ 7 files changed, 312 insertions(+) create mode 100644 macros/latex/contrib/aeguill/README create mode 100644 macros/latex/contrib/aeguill/aeguill.sty create mode 100644 macros/latex/contrib/aeguill/guil-test1.pdf create mode 100644 macros/latex/contrib/aeguill/guil-test1.tex create mode 100644 macros/latex/contrib/aeguill/guil-test2.pdf create mode 100644 macros/latex/contrib/aeguill/guil-test2.tex create mode 100644 macros/latex/contrib/aeguill/license.txt (limited to 'macros/latex/contrib/aeguill') 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 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 Binary files /dev/null and b/macros/latex/contrib/aeguill/guil-test1.pdf 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 Binary files /dev/null and b/macros/latex/contrib/aeguill/guil-test2.pdf 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. + + + + -- cgit v1.2.3