new xelatex package+font philokalia

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

2 files changed, 277 insertions, 0 deletions

diff --git a/Master/texmf-dist/source/xelatex/philokalia/philokalia.dtx b/Master/texmf-dist/source/xelatex/philokalia/philokalia.dtx
new file mode 100644
index 00000000000..cc20cbb400a
--- /dev/null
+++ b/Master/texmf-dist/source/xelatex/philokalia/philokalia.dtx
@@ -0,0 +1,222 @@
+%% \CharacterTable
+%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%%   Digits        \0\1\2\3\4\5\6\7\8\9
+%%   Exclamation   \!     Double quote  \"     Hash (number) \#
+%%   Dollar        \$     Percent       \%     Ampersand     \&
+%%   Acute accent  \'     Left paren    \(     Right paren   \)
+%%   Asterisk      \*     Plus          \+     Comma         \,
+%%   Minus         \-     Point         \.     Solidus       \/
+%%   Colon         \:     Semicolon     \;     Less than     \<
+%%   Equals        \=     Greater than  \>     Question mark \?
+%%   Commercial at \@     Left bracket  \[     Backslash     \\
+%%   Right bracket \]     Circumflex    \^     Underscore    \_
+%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
+%%   Right brace   \}     Tilde         \~}
+%\iffalse
+%
+% (c) Copyright 2007 Apostolos Syropoulos 
+% This program can be redistributed and/or modified under the 
+% terms of the LaTeX Project Public License Distributed from 
+% http://www.latex-project.org/lppl.txt; either
+% version 1.3c of the License, or any later version.
+%  
+% This work has the LPPL maintenance status `maintained'.
+%
+% Please report errors or suggestions for improvement to
+%
+%    Apostolos Syropoulos  (asyropoulos@yahoo.com)
+%
+%\fi
+% \CheckSum{32}
+% \iffalse This is a Metacomment
+%
+%<philokalia>\ProvidesFile{philokalia.sty}
+%<EU1plk>\ProvidesFile{eu1plk.fd}
+%
+%<philokalia>[2007/01/07 v1.0 Package `philokalia']
+%<EU1plk>[2007/01/07 v1.0 Philokalia-Regular Support File]
+%
+%    \begin{macrocode}
+%<*driver>
+\documentclass{ltxdoc}
+\usepackage[local]{philokalia}
+\GetFileInfo{philokalia.drv}
+\begin{document}
+   \DocInput{philokalia.dtx}
+\end{document}
+%</driver>
+%    \end{macrocode}
+% \fi
+%
+%\title{The \textsf{philokalia} package}
+%\author{Apostolos Syropoulos\\366, 28th October Str.\\
+%GR-671 00 Xanthi, HELLAS\\ 
+%Email:\texttt{asyropoulos@yahoo.com}}
+% \date{2007/01/07}
+%\maketitle
+%\begin{abstract}
+% This document describes the functionality of the \textsf{philokalia} package, which
+% have been designed to ease the use of the Philokalia-Regular OpenType font with \XeLaTeX, as well as
+% the OpenType features of the Philokalia-Regular font.
+%\end{abstract}
+%\StopEventually{}
+%\section{Introduction}
+% The \textsf{philokalia} package has been designed to ease the use of the Philokalia-Regular (henceforward
+% it will specified simply as the font)
+% OpenType font with \XeLaTeX. The package provides two options: \texttt{global} and \texttt{local}.
+% When the package is used with the \texttt{global} option, which is the default option, the font 
+% is made the main font of the entire document, while when the package is used with the \texttt{local}
+% option, it just provides the commands \verb=\textphlk= and \verb=\phkl=. The first command takes
+% one argument which is typeset using the font. The second command makes the font the main font of
+% current environment, local scope, or the rest of the document. The complete package provides the 
+% following \XeLaTeX\ files:
+%\begin{center}
+% \begin{tabular}{ll}
+%   driver     & produce the documentation \\
+%   philokalia & the package itself \\
+%   EU1pkl     & The Philokalia font shapes\\
+% \end{tabular}
+% \end{center}
+% 
+% \section{About The Font}
+%  
+% The font started as a project to digitize the typeface
+% used to typeset the Philokalia books. For information regarding these books, the reader
+% should visit either the following URL:
+%\begin{center}
+% \verb=http://orthodoxwiki.org/Philokalia=
+%\end{center}
+% or enter the word {\em philokalia} in the Amazon.com search box. The project was carried out by 
+% Apostolos Syropoulos and Ioannis Gamvets. Initially, the project was part
+% of Ioannis Gamvetas's diploma thesis, but the resulting Opetype font is not part of this
+% thesis work and it was developed by this author. The original thesis work was to develop Type~1 fonts
+% and tools to typeset portions of the Philokalia books with Omega. Since, the original thesis work has
+% not been completed yet (!), the idea of releasing an OpenType font emerged quite naturally.
+% The font contains only Greek letters but it can be used to typeset any Greek text. However, since the 
+% shapes of the letters are not that obvious, here is a ``translation''-table:
+% \begin{center}
+% \begin{tabular}{cccccccccc}
+% \textphlk{α} & \texttt{α} & \textphlk{β} & \texttt{β} & \textphlk{γ} & \texttt{γ} & 
+% \textphlk{δ} & \texttt{δ} & \textphlk{ε} & \texttt{ε} \\
+% \textphlk{ζ} & \texttt{ζ} & \textphlk{η} & \texttt{η} & \textphlk{θ} & \texttt{θ} & 
+% \textphlk{ι} & \texttt{ι} & \textphlk{κ} & \texttt{κ} \\
+% \textphlk{λ} & \texttt{λ} & \textphlk{μ} & \texttt{μ} & \textphlk{ν} & \texttt{ν} & 
+% \textphlk{ξ} & \texttt{ξ} & \textphlk{ο} & \texttt{ο} \\
+% \textphlk{π} & \texttt{π} & \textphlk{ρ} & \texttt{ρ} & \textphlk{σ} & \texttt{σ} & 
+% \textphlk{ς} & \texttt{ς} & \textphlk{τ} & \texttt{τ} \\
+% \textphlk{υ} & \texttt{υ} & \textphlk{φ} & \texttt{φ} & \textphlk{χ} & \texttt{χ} & 
+% \textphlk{ψ} & \texttt{ψ} & \textphlk{ω} & \texttt{ω} 
+% \end{tabular}
+% \end{center}
+% One of the interesting aspect of this font is that accents are placed {\em after} capital
+% letters (see the sample below). Another interesting aspect of the font is the great number of 
+% ligatures it provides. In fact, it provides more than 40 {\em historical} ligatures plus two 
+% {\em contextual} ligatures. When typing \texttt{κι} and these letters are not part of a word, then
+% one gets the \textphlk{κι} symbol, which is the Greek ampersand. The same ligature can be
+% obtained if we substiture {\em iota} with {\em iota with varia}. The table below shows all the
+% ligatures provided by the font: 
+%  \begin{center}
+% \begin{tabular}{llllllllll}
+% \textphlk{λλ} & \texttt{λλ} & \textphlk{ἀν} & \texttt{ἀν} & \textphlk{εν} & \texttt{εν} & 
+% \textphlk{γάρ} & \texttt{γάρ} & \textphlk{κατὰ} & \texttt{κατὰ} \\
+% \textphlk{μετὰ} & \texttt{μετὰ} & \textphlk{στί} & \texttt{στί} & \textphlk{σθ} & \texttt{σθ} & 
+% \textphlk{σχ} & \texttt{σχ} & \textphlk{τῶν} & \texttt{τῶν} \\
+% \textphlk{χρ} & \texttt{χρ} & \textphlk{καὶ} & \texttt{καὶ} & \textphlk{σσ} & \texttt{σσ} & 
+% \textphlk{δια} & \texttt{δια} & \textphlk{ευ} & \texttt{ευ} \\
+% \textphlk{εὑ} & \texttt{εὑ} & \textphlk{εὐ} & \texttt{εὐ} & \textphlk{ου} & \texttt{ου} & 
+% \textphlk{ού} & \texttt{ού} & \textphlk{οὺ} & \texttt{οὺ} \\
+% \textphlk{οὖ} & \texttt{οὖ} & \textphlk{οὗ} & \texttt{οὗ} & \textphlk{εύ} & \texttt{εύ} & 
+% \textphlk{αι} & \texttt{αι} & \textphlk{αῖ} & \texttt{αῖ} \\
+% \textphlk{αί} & \texttt{αί} & \textphlk{αὶ} & \texttt{αὶ} & \textphlk{αἰ} & \texttt{αἰ} & 
+% \textphlk{αύ} & \texttt{αύ} & \textphlk{ει} & \texttt{ει} \\
+% \textphlk{εῖ} & \texttt{εῖ} & \textphlk{όξ} & \texttt{όξ} & \textphlk{ὄξ} & \texttt{ὄξ} & 
+% \textphlk{ρί} & \texttt{ρί} & \textphlk{ρὶ} & \texttt{ρὶ} \\
+% \textphlk{ρῖ} & \texttt{ρῖ} & \textphlk{ἡν} & \texttt{ἡν} & \textphlk{ην} & \texttt{ην} & 
+% \textphlk{ῆν} & \texttt{ῆν} & \textphlk{ήν} & \texttt{ήν} \\
+% \textphlk{υν} & \texttt{υν} & \textphlk{ύν} & \texttt{ύν} & \textphlk{΄-} & \texttt{΄-} &
+% \textphlk{στ} & \texttt{στ}
+% \end{tabular}
+% \end{center}
+% Notice that in order to get the \textphlk{΄-} symbol one has to type a tonos and then a
+% hyphen. This symbol has been used by the ancient Greek mathematician Diophantus to denote
+% the minus sign. This symbol was not in the original Philokalia font, but it has been
+% included here for reasons of completeness. Future releases of the font may contain some more 
+% mathematical symbols. In case, someone wants only to use this symbol, she can use the
+% \verb=\dminus= command.
+% 
+% These ligatures really honor content and most of them are really rare in the sense that are not
+% used in modern Greek typography. We provide 
+% a short  passage from Aristotle's treatise {\em The Poetics} typeset with the font so that readers can
+% appreciate the beauty of these ligatures:  
+% \begin{quotation}
+%\fontfamily{plk}\selectfont\language\ancientgreek
+%1. Περὶ ποιητικῆς αὐτῆς τε καὶ τῶν εἰδῶν αὐτῆς, ἥν τινα δύναμιν ἕκαστον ἔχει, 
+%καὶ πῶς δεῖ συνίστασθαι τοὺς μύθους  εἰ μέλλει καλῶς ἕξειν ἡ ποίησις, ἔτι δὲ ἐκ πόσων καὶ ποίων 
+%ἐστὶ μορίων, ὁμοίως δὲ καὶ περὶ τῶν ἄλλων ὅσα τῆς αὐτῆς ἐστι μεθόδου, λέγωμεν ἀρξάμενοι κατὰ φύσιν 
+%πρῶτον ἀπὸ τῶν πρώτων.
+% 
+%Ἐποποιία δὴ καὶ ἡ τῆς τραγῳδίας ποίησις ἔτι δὲ κωμῳδία καὶ ἡ διθυραμβοποιητικὴ καὶ τῆς αὐλητικῆς 
+%ἡ πλείστη καὶ κιθαριστικῆς πᾶσαι τυγχάνουσιν οὖσαι μιμήσεις τὸ σύνολον· διαφέρουσι δὲ ἀλλήλων τρισίν, 
+%ἢ γὰρ τῷ ἐν ἑτέροις μιμεῖσθαι ἢ τῷ ἕτερα ἢ τῷ ἑτέρως καὶ μὴ τὸν αὐτὸν τρόπον. 
+%
+%Ὥσπερ γὰρ καὶ χρώμασι καὶ σχήμασι πολλὰ μιμοῦνταί τινες ἀπεικάζοντες (οἱ μὲν [20] διὰ τέχνης οἱ δὲ διὰ συνηθείας),
+%ἕτεροι δὲ διὰ τῆς φωνῆς, οὕτω κἀν ταῖς εἰρημέναις τέχναις ἅπασαι μὲν ποιοῦνται τὴν μίμησιν ἐν ῥυθμῷ καὶ λόγῳ καὶ
+%ἁρμονίᾳ, τούτοις δ᾽ ἢ χωρὶς ἢ μεμιγμένοις· οἷον ἁρμονίᾳ μὲν καὶ ῥυθμῷ χρώμεναι μόνον ἥ τε αὐλητικὴ καὶ ἡ κιθαριστικὴ
+%κἂν εἴ τινες [25] ἕτεραι τυγχάνωσιν οὖσαι τοιαῦται τὴν δύναμιν, οἷον ἡ τῶν συρίγγων, αὐτῷ δὲ τῷ ῥυθμῷ [μιμοῦνται]
+%χωρὶς ἁρμονίας ἡ τῶν ὀρχηστῶν (καὶ γὰρ οὗτοι διὰ τῶν σχηματιζομένων ῥυθμῶν μιμοῦνται καὶ ἤθη καὶ πάθη καὶ πράξεις)· 
+% \end{quotation}
+% \section{The package \textsf{philokalia}}
+% The code of the \textsf{philokalia} package is really very simple. First, we specify what has to be 
+% done when the package is invoked with the corresponding option and then load some reuired packages. 
+%    \begin{macrocode}
+%<*philokalia>
+\DeclareOption{global}{%
+   \renewcommand{\rmdefault}{plk}%
+}
+\DeclareOption{local}{%
+   \def\phkl{\fontfamily{plk}\selectfont}%
+   \newcommand{\textphlk}[1]{{\phkl #1}}%
+}
+\ExecuteOptions{global}
+\ProcessOptions
+\RequirePackage{fontspec}
+\RequirePackage{xunicode}
+\RequirePackage{xltxtra}
+%    \end{macrocode}
+% The command \verb|\dminus| provides access to the glyph that represents Diophantus minus sign.
+%    \begin{macrocode}
+\def\dminus{{\fontfamily{plk}\selectfont\char"0185}}
+%</philokalia>
+%    \end{macrocode}
+%
+% \section{The Font Definition File}
+% Since there is only one font shape, there is not much work to do: we just need to specify 
+% the available font properties:
+%    \begin{macrocode}
+%<*EU1plk>
+\DeclareFontFamily{EU1}{plk}{}
+\DeclareFontShape{EU1}{plk}{m}{n}%
+     {<-> "[Philokalia-Regular]/ICU:script=grek,+hlig,+clig:mapping=tex-text"}{
+}
+%    \end{macrocode}
+% And here we define the default substitutions:
+%    \begin{macrocode}
+\DeclareFontShape{EU1}{plk}{m}{sl}{<-> ssub * plk/m/n}{}
+\DeclareFontShape{EU1}{plk}{m}{it}{<-> ssub * plk/m/sl}{}
+\DeclareFontShape{EU1}{plk}{m}{sc}{<-> ssub * plk/m/n}{}
+\DeclareFontShape{EU1}{plk}{b}{n}{<-> ssub * plk/m/n}{}
+\DeclareFontShape{EU1}{plk}{b}{sl}{<-> ssub * plk/m/n}{}
+\DeclareFontShape{EU1}{plk}{b}{it}{<-> ssub * plk/m/n}{}
+\DeclareFontShape{EU1}{plk}{bx}{n}{<-> ssub * plk/b/n}{}
+\DeclareFontShape{EU1}{plk}{bx}{it}{<-> ssub * plk/b/sl}{}
+\DeclareFontShape{EU1}{plk}{bx}{sl}{<-> ssub * plk/b/sl}{}
+%</EU1plk>
+%    \end{macrocode} 
+%
+% \section*{Acknowledgement}
+% Firts of all, I thank Ioannis Gamvetas for his collaboration back in the years 2002-2003.
+% Also, I would like to thank George Williams, the designer of FontForge, the free font-editor, for all his
+% valuable help, Adam Twardoch for explaining to me how to implement the contextual ligature, and Dimitrios
+% Philippou for his comments and suggestions. Last, but certainly not least, I thank my son for his help!
+% \Finale
diff --git a/Master/texmf-dist/source/xelatex/philokalia/philokalia.ins b/Master/texmf-dist/source/xelatex/philokalia/philokalia.ins
new file mode 100644
index 00000000000..cff7cc831a3
--- /dev/null
+++ b/Master/texmf-dist/source/xelatex/philokalia/philokalia.ins
@@ -0,0 +1,55 @@
+%% Copyright 1999 Apostolos Syropoulos
+%%
+%% This file is part of the `grtimes' package.
+%% You are not allowed to modify its contents.
+%%
+\def\filedate{2007/01/07}
+\def\batchfile{philokalia.ins}
+\input docstrip.tex
+
+{\ifx\generate\undefined
+\Msg{**********************************************}
+\Msg{*}
+\Msg{* This installation requires docstrip}
+\Msg{* version 2.3c or later.}
+\Msg{*}
+\Msg{* An older version of docstrip has been input}
+\Msg{*}
+\Msg{**********************************************}
+\errhelp{Move or rename old docstrip.tex.}
+\errmessage{Old docstrip in input path}
+\batchmode
+\csname @@end\endcsname
+\fi}
+
+\preamble
+
+ (c) Copyright 2007 Apostolos Syropoulos 
+ This program can be redistributed and/or modified under the 
+ terms of the LaTeX Project Public License Distributed from 
+ http://www.latex-project.org/lppl.txt; either
+ version 1.3c of the License, or any later version.
+  
+ This work has the LPPL maintenance status `maintained'.
+
+ Please report errors or suggestions for improvement to
+
+    Apostolos Syropoulos  (asyropoulos@yahoo.com)
+
+\endpreamble
+
+
+\keepsilent
+ 
+\generate{\generateFile{philokalia.sty}{f}{\from{philokalia.dtx}{philokalia}}
+          \generateFile{eu1plk.fd}{f}{\from{philokalia.dtx}{EU1plk}}}
+\postamble
+\endpostamble
+\Msg{**********************************************************}
+\Msg{* To finish installation you have to copy}
+\Msg{* the .fd files, the .mf file and the .sty}
+\Msg{* file in the appropriate directories and to}
+\Msg{* rehash your TeX, if it is required to do so.}
+\Msg{*                  Happy XeTeXing!}
+\Msg{**********************************************************}
+\endinput