From 99ea21fd2f0b9b4de585316431bf979e59ac35c4 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 8 Oct 2020 21:20:56 +0000 Subject: paresse (8oct20) git-svn-id: svn://tug.org/texlive/trunk@56598 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/latex/paresse/paresse-old.sty | 279 ++++++++++++++++++ .../texmf-dist/tex/latex/paresse/paresse-utf8.sty | 323 ++++++++++++++++++++ Master/texmf-dist/tex/latex/paresse/paresse.sty | 324 +++++++++++++++------ Master/texmf-dist/tex/latex/paresse/paresseold.sto | 97 ------ .../texmf-dist/tex/latex/paresse/paresseutf8.sto | 140 --------- 5 files changed, 834 insertions(+), 329 deletions(-) create mode 100644 Master/texmf-dist/tex/latex/paresse/paresse-old.sty create mode 100644 Master/texmf-dist/tex/latex/paresse/paresse-utf8.sty delete mode 100644 Master/texmf-dist/tex/latex/paresse/paresseold.sto delete mode 100644 Master/texmf-dist/tex/latex/paresse/paresseutf8.sto (limited to 'Master/texmf-dist/tex/latex') diff --git a/Master/texmf-dist/tex/latex/paresse/paresse-old.sty b/Master/texmf-dist/tex/latex/paresse/paresse-old.sty new file mode 100644 index 00000000000..4b7fb031461 --- /dev/null +++ b/Master/texmf-dist/tex/latex/paresse/paresse-old.sty @@ -0,0 +1,279 @@ +%% +%% This is file `paresse-old.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% paresse.dtx (with options: `package,OLD') +%% +%% Do not distribute this file without also distributing the +%% source files specified above. +%% +%% Do not distribute a modified version of this file. +%% +%% File: paresse.dtx +%% Copyright (C) 2020 Yvon Henel aka Le TeXnicien de surface +%% +%% It may be distributed and/or modified under the conditions of the +%% LaTeX Project Public License (LPPL), either version 1.3c of this +%% license or (at your option) any later version. The latest version +%% of this license is in the file +%% +%% http://www.latex-project.org/lppl.txt +%% +\RequirePackage{expl3}[2020/09/24] +\GetIdInfo$Id: paresse.dtx 5.0 2020-10-06 TdS $ + {} +\ProvidesExplPackage + {\ExplFileName-old}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription} +\RequirePackage{xparse} +\RequirePackage{l3keys2e} +\cs_if_exist:NF \__paresse_main_package_loaded: +{ +\keys_define:nn {paresse} +{ + encoding_is_legacy .bool_set:N = \g__paresse_encoding_is_legacy_bool, + encoding_is_levi .bool_set_inverse:N = + \g__paresse_encoding_is_legacy_bool, + legacy .meta:n = { + encoding_is_legacy = #1 + }, + legacy .default:n = {true}, + legacy .initial:n = {true}, + levi .meta:n = { + encoding_is_levi = #1 + }, + levi .default:n = {true}, + levi .initial:n = {false}, + + mood_is_wild .bool_set:N = \g__paresse_mood_is_wild_bool, + mood_is_tame .bool_set_inverse:N = + \g__paresse_mood_is_wild_bool, + wild .meta:n = { + mood_is_wild = #1 + }, + wild .default:n = {true}, + wild .initial:n = {true}, + tame .meta:n = { + mood_is_tame = #1 + }, + tame .default:n = {true}, + tame .initial:n = {false}, + + letter_t_is_theta .bool_set:N = \g__paresse_letter_t_is_theta_bool, + letter_t_is_tau .bool_set_inverse:N = + \g__paresse_letter_t_is_theta_bool, + theta .meta:n = { + letter_t_is_theta = #1 + }, + theta .default:n = {true}, + theta .initial:n = {true}, + tau .meta:n = { + letter_t_is_tau = #1 + }, + tau .default:n = {true}, + tau .initial:n = {false}, + + letter_theta_is_theta .bool_set:N = \g__paresse_letter_theta_is_theta_bool, + letter_theta_is_vartheta .bool_set_inverse:N = + \g__paresse_letter_theta_is_theta_bool, + theta .meta:n = { + letter_theta_is_theta = #1 + }, + theta .default:n = {true}, + theta .initial:n = {true}, + vartheta .meta:n = { + letter_theta_is_vartheta = #1 + }, + vartheta .default:n = {true}, + vartheta .initial:n = {false}, + + letter_pi_is_pi .bool_set:N = \g__paresse_letter_pi_is_pi_bool, + letter_pi_is_varpi .bool_set_inverse:N = + \g__paresse_letter_pi_is_pi_bool, + pi .meta:n = { + letter_pi_is_pi = #1 + }, + pi .default:n = {true}, + pi .initial:n = {true}, + varpi .meta:n = { + letter_pi_is_varpi = #1 + }, + varpi .default:n = {true}, + varpi .initial:n = {false}, + + letter_rho_is_rho .bool_set:N = \g__paresse_letter_rho_is_rho_bool, + letter_rho_is_varrho .bool_set_inverse:N = + \g__paresse_letter_rho_is_rho_bool, + rho .meta:n = { + letter_rho_is_rho = #1 + }, + rho .default:n = {true}, + rho .initial:n = {true}, + varrho .meta:n = { + letter_rho_is_varrho = #1 + }, + varrho .default:n = {true}, + varrho .initial:n = {false}, + + letter_sigma_is_sigma .bool_set:N = \g__paresse_letter_sigma_is_sigma_bool, + letter_sigma_is_varsigma .bool_set_inverse:N = + \g__paresse_letter_sigma_is_sigma_bool, + sigma .meta:n = { + letter_sigma_is_sigma = #1 + }, + sigma .default:n = {true}, + sigma .initial:n = {true}, + varsigma .meta:n = { + letter_sigma_is_varsigma = #1 + }, + varsigma .default:n = {true}, + varsigma .initial:n = {false}, + + letter_epsilon_is_epsilon .bool_set:N = + \g__paresse_letter_epsilon_is_epsilon_bool, + letter_epsilon_is_varepsilon .bool_set_inverse:N = + \g__paresse_letter_epsilon_is_epsilon_bool, + epsilon .meta:n = { + letter_epsilon_is_epsilon = #1 + }, + epsilon .default:n = {true}, + epsilon .initial:n = {false}, + varepsilon .meta:n = { + letter_epsilon_is_varepsilon = #1 + }, + varepsilon .default:n = {true}, + varepsilon .initial:n = {true}, + + letter_phi_is_phi .bool_set:N = \g__paresse_letter_phi_is_phi_bool, + letter_phi_is_varphi .bool_set_inverse:N = + \g__paresse_letter_phi_is_phi_bool, + phi .meta:n = { + letter_phi_is_phi = #1 + }, + phi .default:n = {true}, + phi .initial:n = {false}, + varphi .meta:n = { + letter_phi_is_varphi = #1 + }, + varphi .default:n = {true}, + varphi .initial:n = {true}, +} +\ProcessKeysOptions {paresse} +\bool_if:nTF {\g__paresse_letter_epsilon_is_epsilon_bool} +{\cs_new:Npn \__paresse_epsilon {\epsilon}} +{\cs_new:Npn \__paresse_epsilon {\varepsilon}} + +\bool_if:nTF {\g__paresse_letter_theta_is_theta_bool} +{\cs_new:Npn \__paresse_theta {\theta}} +{\cs_new:Npn \__paresse_theta {\vartheta}} + +\bool_if:nTF {\g__paresse_letter_pi_is_pi_bool} +{\cs_new:Npn \__paresse_pi {\pi}} +{\cs_new:Npn \__paresse_pi {\varpi}} + +\bool_if:nTF {\g__paresse_letter_rho_is_rho_bool} +{\cs_new:Npn \__paresse_rho {\rho}} +{\cs_new:Npn \__paresse_rho {\varrho}} + +\bool_if:nTF {\g__paresse_letter_sigma_is_sigma_bool} +{\cs_new:Npn \__paresse_sigma {\sigma}} +{\cs_new:Npn \__paresse_sigma {\varsigma}} + +\bool_if:nTF {\g__paresse_letter_phi_is_phi_bool} +{\cs_new:Npn \__paresse_phi {\phi}} +{\cs_new:Npn \__paresse_phi {\varphi}} + +\bool_new:c {g__paresse_file_encoding_is_utf8_bool} +} +\count@=\catcode`\^^a7 +\let\GA@LaVieilleParesse= ^^a7 +\def\^^a7{\S} +\newcommand{\makeparesseletter}{\catcode `\^^a7=11\relax} +\newcommand{\makeparesseother}{\catcode `\^^a7=12\relax} +\newcommand{\GA@MakeParesseActive}{\catcode `\^^a7=\active} +\def\GA@ActiveLaParessexii{\catcode `\^^a7=\active} +\def\GA@ActiveLaParessexiii{\catcode `\^^a7=\active + \def^^a7##1{\ensuremath{\csname \string^^a7##1\endcsname}}} +\ifnum\count@=12 + \let\GA@ActiveLaParesse \GA@ActiveLaParessexii +\else + \let\GA@ActiveLaParesse \GA@ActiveLaParessexiii +\fi +\newcommand{\ActiveLaParesse}{\GA@ActiveLaParesse} +\newenvironment{ParesseActive}{\GA@ActiveLaParesse}{} + +\makeparesseletter +\def\^^a7a {\alpha} +\def\^^a7b {\beta} +\def\^^a7g {\gamma} +\def\^^a7d {\delta} +\def\^^a7e {\__paresse_epsilon} +\def\^^a7z {\zeta} +\def\^^a7h {\eta} +\def\^^a7i {\iota} +\def\^^a7k {\kappa} +\def\^^a7l {\lambda} +\def\^^a7m {\mu} +\def\^^a7n {\nu} +\def\^^a7x {\xi} +\def\^^a7p {\__paresse_pi} +\def\^^a7r {\__paresse_rho} +\def\^^a7s {\__paresse_sigma} +\def\^^a7u {\upsilon} +\def\^^a7f {\__paresse_phi} +\def\^^a7w {\omega} + +\bool_if:nTF {\g__paresse_encoding_is_legacy_bool} +{ + \def\^^a7j {\varsigma} + \def\^^a7v {\__paresse_theta} + \def\^^a7y {\tau} + \def\^^a7c {\chi} + \def\^^a7q {\psi} + \bool_if:nTF {\g__paresse_letter_t_is_theta_bool} + { + \def\^^a7t {\__paresse_theta} + } + { + \def\^^a7t {\tau} + } +} +{ + \def\^^a7j {\__paresse_theta} + \def\^^a7t {\tau} + \def\^^a7q {\chi} + \def\^^a7y {\psi} + \def\^^a7c {\varsigma} +} +\def\^^a7G {\Gamma} +\def\^^a7D {\Delta} +\def\^^a7L {\Lambda} +\def\^^a7P {\Pi} +\def\^^a7S {\Sigma} +\def\^^a7U {\Upsilon} +\def\^^a7F {\Phi} +\def\^^a7X {\Xi} +\def\^^a7W {\Omega} +\bool_if:nTF {\g__paresse_encoding_is_legacy_bool} +{ + \def\^^a7V {\Theta} + \def\^^a7T {\Theta} + \def\^^a7Q {\Psi} +} +{ + \def\^^a7J {\Theta} + \def\^^a7Y {\Psi} +} +\def\^^a7Z {\S} +\catcode `\^^a7=\active +\def^^a7#1{\ensuremath{\csname \string^^a7#1\endcsname}} + +\bool_if:nF {\g__paresse_mood_is_wild_bool} +{ + \catcode`\^^a7=\count@ + \ifnum\count@=13 \let ^^a7=\GA@LaVieilleParesse \fi +} +\endinput +%% +%% End of file `paresse-old.sty'. diff --git a/Master/texmf-dist/tex/latex/paresse/paresse-utf8.sty b/Master/texmf-dist/tex/latex/paresse/paresse-utf8.sty new file mode 100644 index 00000000000..19239fd8edb --- /dev/null +++ b/Master/texmf-dist/tex/latex/paresse/paresse-utf8.sty @@ -0,0 +1,323 @@ +%% +%% This is file `paresse-utf8.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% paresse.dtx (with options: `package,UTF') +%% +%% Do not distribute this file without also distributing the +%% source files specified above. +%% +%% Do not distribute a modified version of this file. +%% +%% File: paresse.dtx +%% Copyright (C) 2020 Yvon Henel aka Le TeXnicien de surface +%% +%% It may be distributed and/or modified under the conditions of the +%% LaTeX Project Public License (LPPL), either version 1.3c of this +%% license or (at your option) any later version. The latest version +%% of this license is in the file +%% +%% http://www.latex-project.org/lppl.txt +%% +\RequirePackage{expl3}[2020/09/24] +\GetIdInfo$Id: paresse.dtx 5.0 2020-10-06 TdS $ + {} +\ProvidesExplPackage + {\ExplFileName-utf8}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription} +\RequirePackage{xparse} +\RequirePackage{l3keys2e} +\cs_if_exist:NF \__paresse_main_package_loaded: +{ +\keys_define:nn {paresse} +{ + encoding_is_legacy .bool_set:N = \g__paresse_encoding_is_legacy_bool, + encoding_is_levi .bool_set_inverse:N = + \g__paresse_encoding_is_legacy_bool, + legacy .meta:n = { + encoding_is_legacy = #1 + }, + legacy .default:n = {true}, + legacy .initial:n = {true}, + levi .meta:n = { + encoding_is_levi = #1 + }, + levi .default:n = {true}, + levi .initial:n = {false}, + + mood_is_wild .bool_set:N = \g__paresse_mood_is_wild_bool, + mood_is_tame .bool_set_inverse:N = + \g__paresse_mood_is_wild_bool, + wild .meta:n = { + mood_is_wild = #1 + }, + wild .default:n = {true}, + wild .initial:n = {true}, + tame .meta:n = { + mood_is_tame = #1 + }, + tame .default:n = {true}, + tame .initial:n = {false}, + + letter_t_is_theta .bool_set:N = \g__paresse_letter_t_is_theta_bool, + letter_t_is_tau .bool_set_inverse:N = + \g__paresse_letter_t_is_theta_bool, + theta .meta:n = { + letter_t_is_theta = #1 + }, + theta .default:n = {true}, + theta .initial:n = {true}, + tau .meta:n = { + letter_t_is_tau = #1 + }, + tau .default:n = {true}, + tau .initial:n = {false}, + + letter_theta_is_theta .bool_set:N = \g__paresse_letter_theta_is_theta_bool, + letter_theta_is_vartheta .bool_set_inverse:N = + \g__paresse_letter_theta_is_theta_bool, + theta .meta:n = { + letter_theta_is_theta = #1 + }, + theta .default:n = {true}, + theta .initial:n = {true}, + vartheta .meta:n = { + letter_theta_is_vartheta = #1 + }, + vartheta .default:n = {true}, + vartheta .initial:n = {false}, + + letter_pi_is_pi .bool_set:N = \g__paresse_letter_pi_is_pi_bool, + letter_pi_is_varpi .bool_set_inverse:N = + \g__paresse_letter_pi_is_pi_bool, + pi .meta:n = { + letter_pi_is_pi = #1 + }, + pi .default:n = {true}, + pi .initial:n = {true}, + varpi .meta:n = { + letter_pi_is_varpi = #1 + }, + varpi .default:n = {true}, + varpi .initial:n = {false}, + + letter_rho_is_rho .bool_set:N = \g__paresse_letter_rho_is_rho_bool, + letter_rho_is_varrho .bool_set_inverse:N = + \g__paresse_letter_rho_is_rho_bool, + rho .meta:n = { + letter_rho_is_rho = #1 + }, + rho .default:n = {true}, + rho .initial:n = {true}, + varrho .meta:n = { + letter_rho_is_varrho = #1 + }, + varrho .default:n = {true}, + varrho .initial:n = {false}, + + letter_sigma_is_sigma .bool_set:N = \g__paresse_letter_sigma_is_sigma_bool, + letter_sigma_is_varsigma .bool_set_inverse:N = + \g__paresse_letter_sigma_is_sigma_bool, + sigma .meta:n = { + letter_sigma_is_sigma = #1 + }, + sigma .default:n = {true}, + sigma .initial:n = {true}, + varsigma .meta:n = { + letter_sigma_is_varsigma = #1 + }, + varsigma .default:n = {true}, + varsigma .initial:n = {false}, + + letter_epsilon_is_epsilon .bool_set:N = + \g__paresse_letter_epsilon_is_epsilon_bool, + letter_epsilon_is_varepsilon .bool_set_inverse:N = + \g__paresse_letter_epsilon_is_epsilon_bool, + epsilon .meta:n = { + letter_epsilon_is_epsilon = #1 + }, + epsilon .default:n = {true}, + epsilon .initial:n = {false}, + varepsilon .meta:n = { + letter_epsilon_is_varepsilon = #1 + }, + varepsilon .default:n = {true}, + varepsilon .initial:n = {true}, + + letter_phi_is_phi .bool_set:N = \g__paresse_letter_phi_is_phi_bool, + letter_phi_is_varphi .bool_set_inverse:N = + \g__paresse_letter_phi_is_phi_bool, + phi .meta:n = { + letter_phi_is_phi = #1 + }, + phi .default:n = {true}, + phi .initial:n = {false}, + varphi .meta:n = { + letter_phi_is_varphi = #1 + }, + varphi .default:n = {true}, + varphi .initial:n = {true}, +} +\ProcessKeysOptions {paresse} +\bool_if:nTF {\g__paresse_letter_epsilon_is_epsilon_bool} +{\cs_new:Npn \__paresse_epsilon {\epsilon}} +{\cs_new:Npn \__paresse_epsilon {\varepsilon}} + +\bool_if:nTF {\g__paresse_letter_theta_is_theta_bool} +{\cs_new:Npn \__paresse_theta {\theta}} +{\cs_new:Npn \__paresse_theta {\vartheta}} + +\bool_if:nTF {\g__paresse_letter_pi_is_pi_bool} +{\cs_new:Npn \__paresse_pi {\pi}} +{\cs_new:Npn \__paresse_pi {\varpi}} + +\bool_if:nTF {\g__paresse_letter_rho_is_rho_bool} +{\cs_new:Npn \__paresse_rho {\rho}} +{\cs_new:Npn \__paresse_rho {\varrho}} + +\bool_if:nTF {\g__paresse_letter_sigma_is_sigma_bool} +{\cs_new:Npn \__paresse_sigma {\sigma}} +{\cs_new:Npn \__paresse_sigma {\varsigma}} + +\bool_if:nTF {\g__paresse_letter_phi_is_phi_bool} +{\cs_new:Npn \__paresse_phi {\phi}} +{\cs_new:Npn \__paresse_phi {\varphi}} + +\bool_new:c {g__paresse_file_encoding_is_utf8_bool} +} +\begingroup +\catcode`\"=12 +\catcode`\<=12 +\catcode`\.=12 +\catcode`\,=12 +\catcode`\;=12 +\catcode`\!=12 +\catcode`\~=13 +\global\let\GA@parse@UTFviii@a=\parse@UTFviii@a +\global\let\GA@parse@UTFviii@b=\parse@UTFviii@b +\gdef\declareunicodecharacter#1#2{ + \count@"#1\relax + \wlog{\space\space Redefining~Unicode~char~U+#1~(decimal~\the\count@)} + \begingroup + \GA@parse@XML@charref + \def\UTFviii@two@octets##1##2{\csname u8:##1\string##2\endcsname} + \def\UTFviii@three@octets##1##2##3{\csname u8:##1 + \string##2\string##3\endcsname} + \def\UTFviii@four@octets##1##2##3##4{\csname u8:##1 + \string##2\string##3\string##4\endcsname} + \expandafter\expandafter\expandafter + \expandafter\expandafter\expandafter + \expandafter + \gdef\UTFviii@tmp{\IeC{#2}} + \endgroup} +\gdef\GA@parse@XML@charref{ + \ifnum\count@<"A0\relax + \PackageError{inputenc}{Cannot\space define\space Unicode\space + char\space value\space <\space 00A0}\@eha + \else\ifnum\count@<"800\relax + \GA@parse@UTFviii@a, + \GA@parse@UTFviii@b C\UTFviii@two@octets., + \else\ifnum\count@<"10000\relax + \GA@parse@UTFviii@a; + \GA@parse@UTFviii@a, + \GA@parse@UTFviii@b E\UTFviii@three@octets.{,;} + \else + \GA@parse@UTFviii@a; + \GA@parse@UTFviii@a, + \GA@parse@UTFviii@a! + \GA@parse@UTFviii@b F\UTFviii@four@octets.{!,;} + \fi + \fi +\fi} +\endgroup +\newcommand{\makeparesseletter}{\DeclareUnicodeCharacter{00A7}\S} +\newcommand{\makeparesseother}{ + \PackageWarning{paresse}{ + Command \string\makeparesseother disabled}{ + The command \string\makeparesseother would have been meaningless + in the current context}} +\newcommand{\ActiveLaParesse}{\declareunicodecharacter{00A7}\@paresse} +\newenvironment{ParesseActive}{\ActiveLaParesse}{} +\ActiveLaParesse +\def\@paresse{\futurelet\@toks\@i@paresse} +\def\@i@paresse{ + \csname\ifcat a\@toks @ii@paresse\else S\fi\endcsname} +\def\@ii@paresse#1{ + \ifcsname @paresse@#1\endcsname + \csname @paresse@#1\endcsname\expandafter\@gobble + \else + \expandafter\@firstofone + \fi{\S#1}} +\def\define@paresse@car#1#2{ + \expandafter\def\csname @paresse@#1\endcsname{\ensuremath{#2}}} + +\define@paresse@car Z\S +\define@paresse@car a\alpha +\define@paresse@car b\beta +\define@paresse@car g\gamma +\define@paresse@car d\delta +\define@paresse@car e\__paresse_epsilon +\define@paresse@car z\zeta +\define@paresse@car h\eta +\define@paresse@car i\iota +\define@paresse@car k\kappa +\define@paresse@car l\lambda +\define@paresse@car m\mu +\define@paresse@car n\nu +\define@paresse@car x\xi +\define@paresse@car p\__paresse_pi +\define@paresse@car r\__paresse_rho +\define@paresse@car s\__paresse_sigma +\define@paresse@car u\upsilon +\define@paresse@car f\__paresse_phi +\define@paresse@car w\omega + +\bool_if:nTF {\g__paresse_encoding_is_legacy_bool} +{ + \define@paresse@car j\varsigma + \define@paresse@car v\__paresse_theta + \define@paresse@car y\tau + \define@paresse@car c\chi + \define@paresse@car q\psi + + \bool_if:nTF {\g__paresse_letter_t_is_theta_bool} + { + \define@paresse@car t\__paresse_theta + } + { + \define@paresse@car t\tau + } +} +{ + \define@paresse@car j\__paresse_theta + \define@paresse@car t\tau + \define@paresse@car q\chi + \define@paresse@car y\psi + \define@paresse@car c\varsigma +} +\define@paresse@car G\Gamma +\define@paresse@car D\Delta +\define@paresse@car L\Lambda +\define@paresse@car P\Pi +\define@paresse@car S\Sigma +\define@paresse@car U\Upsilon +\define@paresse@car F\Phi +\define@paresse@car X\Xi +\define@paresse@car W\Omega + +\bool_if:nTF {\g__paresse_encoding_is_legacy_bool} +{ + \define@paresse@car V\Theta + \define@paresse@car T\Theta + \define@paresse@car Q\Psi +} +{ + \define@paresse@car J\Theta + \define@paresse@car Y\Psi +} + +\bool_if:nF {\g__paresse_mood_is_wild_bool}{\makeparesseletter} +\endinput +%% +%% End of file `paresse-utf8.sty'. diff --git a/Master/texmf-dist/tex/latex/paresse/paresse.sty b/Master/texmf-dist/tex/latex/paresse/paresse.sty index 82e02574f6d..82be60deaa7 100644 --- a/Master/texmf-dist/tex/latex/paresse/paresse.sty +++ b/Master/texmf-dist/tex/latex/paresse/paresse.sty @@ -4,109 +4,249 @@ %% %% The original source files were: %% -%% paresse.dtx (with options: `common,package') -%% This is a generated file. +%% paresse.dtx (with options: `package,MAIN') %% -%% Copyright (C) 2011, 2013 -%% by Yvon Henel, alias le TeXnicien de surface -%% +%% Do not distribute this file without also distributing the +%% source files specified above. %% -%% 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: +%% Do not distribute a modified version of this file. %% +%% File: paresse.dtx +%% Copyright (C) 2020 Yvon Henel aka Le TeXnicien de surface +%% +%% It may be distributed and/or modified under the conditions of the +%% LaTeX Project Public License (LPPL), either version 1.3c of this +%% license or (at your option) any later version. The latest version +%% of this license is in the file +%% %% 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. -\NeedsTeXFormat{LaTeX2e}[1999/12/01] -\def\fileversion{v4.1} -\def\filedate{2013/02/16} -\def\fileinfo{fichier paresse par le TeXnicien de surface} -\ProvidesPackage{paresse} - [\filedate\space\fileversion\space\fileinfo] -\RequirePackage{skeyval-bc} -\RequirePackage{ifluatex} -\RequirePackage{ifxetex} -\define@bitogkeys[GA]{paresse.sty}[GA@]{legacy}[true]{levi}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{wild}[true]{tame}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{ttau}[true]{ttheta}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{varepsilon}[true]{epsilon}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{varphi}[true]{phi}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{pi}[true]{varpi}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{sigma}[true]{varsigma}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{rho}[true]{varrho}{}{} -\define@bitogkeys[GA]{paresse.sty}[GA@]{theta}[true]{vartheta}{}{} -\DeclareOptionX*{\PackageError{paresse} {The option "\CurrentOption" - is not known!\MessageBreak The default options are:\MessageBreak - legacy, varepsilon, theta, pi, rho, sigma, and varphi.}% - {Choose between `wild' (for an active Paresse in all the document) - \MessageBreak and `tame', so that the character obtained by - \string\S\MessageBreak prints the section symbol \string\S). - \MessageBreak See the documentation for other options.}} -\ExecuteOptionsX[GA]{legacy,wild,varepsilon,theta,pi,rho,sigma,varphi} -\ProcessOptionsX[GA]\relax -\iftogon{GA@varepsilon}{% - \def\GA@epsilon{\varepsilon}}{\def\GA@epsilon{\epsilon}} -\iftogon{GA@vartheta}{\def\GA@theta{\vartheta}}{\def\GA@theta{\theta}} -\iftogon{GA@varpi}{\def\GA@pi{\varpi}}{\def\GA@pi{\pi}} -\iftogon{GA@varrho}{\def\GA@rho{\varrho}}{\def\GA@rho{\rho}} -\iftogon{GA@varsigma}{\def\GA@sigma{\varsigma}}{\def\GA@sigma{\sigma}} -\iftogon{GA@varphi}{\def\GA@phi{\varphi}}{\def\GA@phi{\phi}} +%% +\RequirePackage{expl3}[2020/09/24] +\GetIdInfo$Id: paresse.dtx 5.0 2020-10-06 TdS $ + {} +\ProvidesExplPackage + {\ExplFileName}{\ExplFileDate}{\ExplFileVersion}{\ExplFileDescription} +\RequirePackage{xparse} +\RequirePackage{l3keys2e} +\RequirePackage{iftex} +\keys_define:nn {paresse} +{ + encoding_is_legacy .bool_set:N = \g__paresse_encoding_is_legacy_bool, + encoding_is_levi .bool_set_inverse:N = + \g__paresse_encoding_is_legacy_bool, + legacy .meta:n = { + encoding_is_legacy = #1 + }, + legacy .default:n = {true}, + legacy .initial:n = {true}, + levi .meta:n = { + encoding_is_levi = #1 + }, + levi .default:n = {true}, + levi .initial:n = {false}, + + mood_is_wild .bool_set:N = \g__paresse_mood_is_wild_bool, + mood_is_tame .bool_set_inverse:N = + \g__paresse_mood_is_wild_bool, + wild .meta:n = { + mood_is_wild = #1 + }, + wild .default:n = {true}, + wild .initial:n = {true}, + tame .meta:n = { + mood_is_tame = #1 + }, + tame .default:n = {true}, + tame .initial:n = {false}, + + letter_t_is_theta .bool_set:N = \g__paresse_letter_t_is_theta_bool, + letter_t_is_tau .bool_set_inverse:N = + \g__paresse_letter_t_is_theta_bool, + theta .meta:n = { + letter_t_is_theta = #1 + }, + theta .default:n = {true}, + theta .initial:n = {true}, + tau .meta:n = { + letter_t_is_tau = #1 + }, + tau .default:n = {true}, + tau .initial:n = {false}, + + letter_theta_is_theta .bool_set:N = \g__paresse_letter_theta_is_theta_bool, + letter_theta_is_vartheta .bool_set_inverse:N = + \g__paresse_letter_theta_is_theta_bool, + theta .meta:n = { + letter_theta_is_theta = #1 + }, + theta .default:n = {true}, + theta .initial:n = {true}, + vartheta .meta:n = { + letter_theta_is_vartheta = #1 + }, + vartheta .default:n = {true}, + vartheta .initial:n = {false}, + + letter_pi_is_pi .bool_set:N = \g__paresse_letter_pi_is_pi_bool, + letter_pi_is_varpi .bool_set_inverse:N = + \g__paresse_letter_pi_is_pi_bool, + pi .meta:n = { + letter_pi_is_pi = #1 + }, + pi .default:n = {true}, + pi .initial:n = {true}, + varpi .meta:n = { + letter_pi_is_varpi = #1 + }, + varpi .default:n = {true}, + varpi .initial:n = {false}, + + letter_rho_is_rho .bool_set:N = \g__paresse_letter_rho_is_rho_bool, + letter_rho_is_varrho .bool_set_inverse:N = + \g__paresse_letter_rho_is_rho_bool, + rho .meta:n = { + letter_rho_is_rho = #1 + }, + rho .default:n = {true}, + rho .initial:n = {true}, + varrho .meta:n = { + letter_rho_is_varrho = #1 + }, + varrho .default:n = {true}, + varrho .initial:n = {false}, + + letter_sigma_is_sigma .bool_set:N = \g__paresse_letter_sigma_is_sigma_bool, + letter_sigma_is_varsigma .bool_set_inverse:N = + \g__paresse_letter_sigma_is_sigma_bool, + sigma .meta:n = { + letter_sigma_is_sigma = #1 + }, + sigma .default:n = {true}, + sigma .initial:n = {true}, + varsigma .meta:n = { + letter_sigma_is_varsigma = #1 + }, + varsigma .default:n = {true}, + varsigma .initial:n = {false}, + + letter_epsilon_is_epsilon .bool_set:N = + \g__paresse_letter_epsilon_is_epsilon_bool, + letter_epsilon_is_varepsilon .bool_set_inverse:N = + \g__paresse_letter_epsilon_is_epsilon_bool, + epsilon .meta:n = { + letter_epsilon_is_epsilon = #1 + }, + epsilon .default:n = {true}, + epsilon .initial:n = {false}, + varepsilon .meta:n = { + letter_epsilon_is_varepsilon = #1 + }, + varepsilon .default:n = {true}, + varepsilon .initial:n = {true}, + + letter_phi_is_phi .bool_set:N = \g__paresse_letter_phi_is_phi_bool, + letter_phi_is_varphi .bool_set_inverse:N = + \g__paresse_letter_phi_is_phi_bool, + phi .meta:n = { + letter_phi_is_phi = #1 + }, + phi .default:n = {true}, + phi .initial:n = {false}, + varphi .meta:n = { + letter_phi_is_varphi = #1 + }, + varphi .default:n = {true}, + varphi .initial:n = {true}, +} +\ProcessKeysOptions {paresse} +\bool_if:nTF {\g__paresse_letter_epsilon_is_epsilon_bool} +{\cs_new:Npn \__paresse_epsilon {\epsilon}} +{\cs_new:Npn \__paresse_epsilon {\varepsilon}} + +\bool_if:nTF {\g__paresse_letter_theta_is_theta_bool} +{\cs_new:Npn \__paresse_theta {\theta}} +{\cs_new:Npn \__paresse_theta {\vartheta}} + +\bool_if:nTF {\g__paresse_letter_pi_is_pi_bool} +{\cs_new:Npn \__paresse_pi {\pi}} +{\cs_new:Npn \__paresse_pi {\varpi}} + +\bool_if:nTF {\g__paresse_letter_rho_is_rho_bool} +{\cs_new:Npn \__paresse_rho {\rho}} +{\cs_new:Npn \__paresse_rho {\varrho}} + +\bool_if:nTF {\g__paresse_letter_sigma_is_sigma_bool} +{\cs_new:Npn \__paresse_sigma {\sigma}} +{\cs_new:Npn \__paresse_sigma {\varsigma}} + +\bool_if:nTF {\g__paresse_letter_phi_is_phi_bool} +{\cs_new:Npn \__paresse_phi {\phi}} +{\cs_new:Npn \__paresse_phi {\varphi}} + +\bool_new:c {g__paresse_file_encoding_is_utf8_bool} +\cs_new:Nn \__paresse_main_package_loaded: {} \ifluatex - \PackageInfo{paresse}{compiling with luatex} - \InputIfFileExists{paresseold.sto}{% - \PackageInfo{paresse}{paresseold loaded}}{% - \PackageInfo{paresse}{paresseold not loaded}} +\PackageInfo{paresse}{compiling~with~luatex} +\RequirePackageWithOptions{paresse-old} +\else +\ifxetex +\PackageInfo{paresse}{compiling~with~xetex} +\RequirePackageWithOptions{paresse-old} \else - \ifxetex - \PackageInfo{paresse}{compiling with xetex} - \InputIfFileExists{paresseold.sto}{% - \PackageInfo{paresse}{paresseold loaded}}{% - \PackageInfo{paresse}{paresseold not loaded}} - \else -\newcommand\encoding@error{% - \@latex@error{% - paresse needs inputenc loaded with option "utf8" - or option such as "latin1" (8 bits encodign).}{}\stop} -\@ifpackageloaded{inputenc}\relax -{\PackageError{paresse}{% - Please, load inputenc package before paresse}{% - With LaTeX, "paresse" needs to know the encoding to work well and so - the package "inputenc" must be loaded, with \string\usepackage, before - loading "paresse" itself}} -\AtBeginDocument{% - \@ifpackageloaded{inputenc}\find@encoding\encoding@error} -\newtog[GA@]{utf8}[false] -\newcommand\find@encoding{% + +\PackageInfo{paresse}{compiling~with~tex} + +\newcommand\default@encoding@message{ + \bool_gset_true:c {g__paresse_file_encoding_is_utf8_bool} + \PackageWarningNoLine{paresse}{ + The~package~"paresse"~expects~a~"utf8"~encoded~file.~ + In~case~of~an~8~bits~encoding,~ + please~use~inputenc~with~the~correct~option} +} + +\newcommand\find@encoding{ \begingroup - \def\utf@encoding{utf8}% - \def\temp@a{\togoff{GA@utf8}% - \PackageInfo{paresse}{8-bit encoding expected\@gobble}} + \def\utf@encoding{utf8} + \def\temp@a{ + \bool_gset_false:c {g__paresse_file_encoding_is_utf8_bool} + \PackageInfo{paresse}{8-bit~encoding~expected\@gobble} + } \ifx\utf@encoding\inputencodingname - \def\temp@a{\togon{GA@utf8}% - \PackageInfo{paresse}{utf8 encoding detected\@gobble}} + \def\temp@a{ + \bool_gset_true:c {g__paresse_file_encoding_is_utf8_bool} + \PackageInfo{paresse}{utf8~encoding~detected\@gobble} + } \fi \expandafter\endgroup\temp@a} -\AtBeginDocument{% + +\@ifpackageloaded{inputenc} +{ + \PackageInfo{paresse}{inputenc~loaded} +} +{ + \PackageInfo{paresse}{inputenc~not~loaded,~utf8~expected\@gobble} +} + +\AtBeginDocument +{ + \@ifpackageloaded{inputenc} \find@encoding \default@encoding@message + \ExplSyntaxOn \makeatletter - \iftogoff{GA@utf8}{% - \InputIfFileExists{paresseold.sto}{% - \PackageInfo{paresse}{old loaded\@gobble}}{% - \PackageError{paresse}{paresseold.sto not found}{% - The package "paresse" needs to load the file "paresseold.sto" - but can't find it. Something seems to be broken in your TeX - system}}}{% - \InputIfFileExists{paresseutf8.sto}{% - \PackageInfo{paresse}{utf8 loaded\@gobble}}{% - \PackageError{paresse}{paresseutf8 not found}{% - The package "paresse" needs to load the file "paresseutf8.sto" - but can't find it. Something seems to be broken in your TeX - system}}} - \makeatother} -\fi -\fi + \bool_if:nTF {\use:c{g__paresse_file_encoding_is_utf8_bool}} + { + \PackageInfo{paresse}{charge~utf8} + \RequirePackageWithOptions{paresse-utf8} + } + { + \PackageInfo{paresse}{charge~vieux} + \RequirePackageWithOptions{paresse-old} + } + \makeatother + \ExplSyntaxOff +} + +\fi % END OF ifxetex +\fi % END OF ifluatex \endinput %% %% End of file `paresse.sty'. diff --git a/Master/texmf-dist/tex/latex/paresse/paresseold.sto b/Master/texmf-dist/tex/latex/paresse/paresseold.sto deleted file mode 100644 index be2832354f9..00000000000 --- a/Master/texmf-dist/tex/latex/paresse/paresseold.sto +++ /dev/null @@ -1,97 +0,0 @@ -%% -%% This is file `paresseold.sto', -%% generated with the docstrip utility. -%% -%% The original source files were: -%% -%% paresse.dtx (with options: `oldpack') -%% This is a generated file. -%% -%% Copyright (C) 2011, 2013 -%% by Yvon Henel, alias le TeXnicien de surface -%% -%% -%% 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. -\ProvidesFile{paresseold.sto} -\count@=\catcode`\^^a7 -\let\GA@LaVieilleParesse= ^^a7 -\def\^^a7{\S} -\newcommand{\makeparesseletter}{\catcode `\^^a7=11\relax} -\newcommand{\makeparesseother}{\catcode `\^^a7=12\relax} -\newcommand{\GA@MakeParesseActive}{\catcode `\^^a7=\active} -\def\GA@ActiveLaParessexii{\catcode `\^^a7=\active} -\def\GA@ActiveLaParessexiii{\catcode `\^^a7=\active - \def^^a7##1{\ensuremath{\csname \string^^a7##1\endcsname}}} -\ifnum\count@=12 - \let\GA@ActiveLaParesse \GA@ActiveLaParessexii -\else - \let\GA@ActiveLaParesse \GA@ActiveLaParessexiii -\fi -\newcommand{\ActiveLaParesse}{\GA@ActiveLaParesse} -\newenvironment{ParesseActive}{\GA@ActiveLaParesse}{} -\makeparesseletter -\def\^^a7a {\alpha} -\def\^^a7b {\beta} -\def\^^a7g {\gamma} -\def\^^a7d {\delta} -\def\^^a7e {\GA@epsilon} -\def\^^a7z {\zeta} -\def\^^a7h {\eta} -\def\^^a7i {\iota} -\def\^^a7k {\kappa} -\def\^^a7l {\lambda} -\def\^^a7m {\mu} -\def\^^a7n {\nu} -\def\^^a7x {\xi} -\def\^^a7p {\GA@pi} -\def\^^a7r {\GA@rho} -\def\^^a7s {\GA@sigma} -\def\^^a7u {\upsilon} -\def\^^a7f {\GA@phi} -\def\^^a7w {\omega} -\iftogon{GA@legacy}{% - \def\^^a7v {\GA@theta} - \def\^^a7y {\tau} - \def\^^a7c {\chi} - \def\^^a7q {\psi} - \iftogon{GA@ttau}{\def\^^a7t {\tau}}{\def\^^a7t {\GA@theta}}}{% - \def\^^a7j {\GA@theta} - \def\^^a7t {\tau} - \def\^^a7q {\chi} - \def\^^a7y {\psi} - \def\^^a7c {\varsigma}} -\def\^^a7G {\Gamma} -\def\^^a7D {\Delta} -\def\^^a7L {\Lambda} -\def\^^a7P {\Pi} -\def\^^a7S {\Sigma} -\def\^^a7U {\Upsilon} -\def\^^a7F {\Phi} -\def\^^a7X {\Xi} -\def\^^a7W {\Omega} -\iftogon{GA@legacy}{% - \def\^^a7V {\Theta} - \def\^^a7T {\Theta} - \def\^^a7Q {\Psi} -}{% - \def\^^a7J {\Theta} - \def\^^a7Y {\Psi} -}% -\def\^^a7Z {\S} -\catcode `\^^a7=\active -\def^^a7#1{\ensuremath{\csname \string^^a7#1\endcsname}} -\iftogon{GA@tame}{% - \catcode`\^^a7=\count@ - \ifnum\count@=13 \let ^^a7=\GA@LaVieilleParesse \fi -}% -\endinput -%% -%% End of file `paresseold.sto'. diff --git a/Master/texmf-dist/tex/latex/paresse/paresseutf8.sto b/Master/texmf-dist/tex/latex/paresse/paresseutf8.sto deleted file mode 100644 index 0f232d83c47..00000000000 --- a/Master/texmf-dist/tex/latex/paresse/paresseutf8.sto +++ /dev/null @@ -1,140 +0,0 @@ -%% -%% This is file `paresseutf8.sto', -%% generated with the docstrip utility. -%% -%% The original source files were: -%% -%% paresse.dtx (with options: `utf8pack') -%% This is a generated file. -%% -%% Copyright (C) 2011, 2013 -%% by Yvon Henel, alias le TeXnicien de surface -%% -%% -%% 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. -\ProvidesFile{paresseutf8.sto} -\begingroup -\catcode`\"=12 -\catcode`\<=12 -\catcode`\.=12 -\catcode`\,=12 -\catcode`\;=12 -\catcode`\!=12 -\catcode`\~=13 -\global\let\GA@parse@UTFviii@a=\parse@UTFviii@a -\global\let\GA@parse@UTFviii@b=\parse@UTFviii@b -\gdef\declareunicodecharacter#1#2{% - \count@"#1\relax - \wlog{\space\space Redefining Unicode char U+#1 (decimal \the\count@)}% - \begingroup - \GA@parse@XML@charref - \def\UTFviii@two@octets##1##2{\csname u8:##1\string##2\endcsname}% - \def\UTFviii@three@octets##1##2##3{\csname u8:##1% - \string##2\string##3\endcsname}% - \def\UTFviii@four@octets##1##2##3##4{\csname u8:##1% - \string##2\string##3\string##4\endcsname}% - \expandafter\expandafter\expandafter - \expandafter\expandafter\expandafter - \expandafter - \gdef\UTFviii@tmp{\IeC{#2}}% - \endgroup} -\gdef\GA@parse@XML@charref{% - \ifnum\count@<"A0\relax - \PackageError{inputenc}{Cannot\space define\space Unicode\space - char\space value\space <\space 00A0}\@eha - \else\ifnum\count@<"800\relax - \GA@parse@UTFviii@a,% - \GA@parse@UTFviii@b C\UTFviii@two@octets.,% - \else\ifnum\count@<"10000\relax - \GA@parse@UTFviii@a;% - \GA@parse@UTFviii@a,% - \GA@parse@UTFviii@b E\UTFviii@three@octets.{,;}% - \else - \GA@parse@UTFviii@a;% - \GA@parse@UTFviii@a,% - \GA@parse@UTFviii@a!% - \GA@parse@UTFviii@b F\UTFviii@four@octets.{!,;}% - \fi - \fi -\fi} -\endgroup -\newcommand{\makeparesseletter}{\DeclareUnicodeCharacter{00A7}\S} -\newcommand{\makeparesseother}{% - \PackageWarning{paresse}{% - Command \string\makeparesseother disabled}{% - The command \string\makeparesseother would have been meaningless - in the current context}} -\newcommand{\ActiveLaParesse}{\declareunicodecharacter{00A7}\@paresse} -\newenvironment{ParesseActive}{\ActiveLaParesse}{} -\ActiveLaParesse -\def\@paresse{\futurelet\@toks\@i@paresse} -\def\@i@paresse{% - \csname\ifcat a\@toks @ii@paresse\else S\fi\endcsname} -\def\@ii@paresse#1{% - \ifcsname @paresse@#1\endcsname - \csname @paresse@#1\endcsname\expandafter\@gobble - \else - \expandafter\@firstofone - \fi{\S#1}} -\def\define@paresse@car#1#2{% - \expandafter\def\csname @paresse@#1\endcsname{\ensuremath{#2}}} -\define@paresse@car Z\S -\define@paresse@car a\alpha -\define@paresse@car b\beta -\define@paresse@car g\gamma -\define@paresse@car d\delta -\define@paresse@car e\GA@epsilon -\define@paresse@car z\zeta -\define@paresse@car h\eta -\define@paresse@car i\iota -\define@paresse@car k\kappa -\define@paresse@car l\lambda -\define@paresse@car m\mu -\define@paresse@car n\nu -\define@paresse@car x\xi -\define@paresse@car p\GA@pi -\define@paresse@car r\GA@rho -\define@paresse@car s\GA@sigma -\define@paresse@car u\upsilon -\define@paresse@car f\GA@phi -\define@paresse@car w\omega -\iftogon{GA@legacy}{% - \define@paresse@car v\GA@theta - \define@paresse@car y\tau - \define@paresse@car c\chi - \define@paresse@car q\psi - \iftogon{GA@ttau}{% - \define@paresse@car t\tau}{% - \define@paresse@car t\GA@theta}}{% - \define@paresse@car j\GA@theta - \define@paresse@car t\tau - \define@paresse@car q\chi - \define@paresse@car y\psi - \define@paresse@car c\varsigma} -\define@paresse@car G\Gamma -\define@paresse@car D\Delta -\define@paresse@car L\Lambda -\define@paresse@car P\Pi -\define@paresse@car S\Sigma -\define@paresse@car U\Upsilon -\define@paresse@car F\Phi -\define@paresse@car X\Xi -\define@paresse@car W\Omega -\iftogon{GA@legacy}{% - \define@paresse@car V\Theta - \define@paresse@car T\Theta - \define@paresse@car Q\Psi}{% - \define@paresse@car J\Theta - \define@paresse@car Y\Psi}% -\iftogon{GA@tame}{\makeparesseletter} -\endinput -%% -%% End of file `paresseutf8.sto'. -- cgit v1.2.3