new font gfscomplutum

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

2 files changed, 128 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/gfscomplutum/gfscomplutum.sty b/Master/texmf-dist/tex/latex/gfscomplutum/gfscomplutum.sty
new file mode 100644
index 00000000000..25c2ced5846
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/gfscomplutum/gfscomplutum.sty
@@ -0,0 +1,99 @@
+%% This is the file `gfscomplutum.sty'.
+%%
+%%  (c) copyright  2006
+%% Antonis Tsolomitis
+%% Department of Mathematics, University of the Aegean
+%%
+%%  This program can be redistributed and/or modified under the terms
+%%  of the LaTeX Project Public License Distributed from CTAN
+%%  archives in directory macros/latex/base/lppl.txt; either
+%%  version 1 of the License, or any later version.
+%%
+%%   Please report errors or suggestions for improvement to
+%%
+%%     Dr. Antonis Tsolomitis
+%%     Department of Mathematics
+%%     University of the Aegean
+%%     atsol@aegean.gr
+%%
+%% \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         \~}
+\ProvidesFile{gfscomplutum.sty}
+[2001/12/15 v1.0 Package `gfscomplutum.sty']
+\NeedsTeXFormat{LaTeX2e}
+\message{}\MessageBreak
+\message{*****************************************************************}\MessageBreak
+\message{  GFS-Complutum style file by A. Tsolomitis}\MessageBreak
+\message{*****************************************************************}\MessageBreak
+\DeclareOption{default}{%
+\renewcommand{\rmdefault}{complutum}}
+\ProcessOptions
+\newenvironment{complutum}{\fontfamily{complutum}\selectfont}{}
+\newcommand{\textcomplutum}[1]{{\fontfamily{complutum}\selectfont #1}}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%\def\stigma{st}
+%\DeclareTextCommand{\anwtonos}{LGR}{\char'047\relax}
+%\let\katwtonos\relax
+%\let\qoppa\relax
+%\let\sampi\relax
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\DeclareTextCommand{\taualt}{LGR}{\char"0D\relax}
+%%%%%%%%%%% C-S %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\@ifpackagewith{inputenc}{iso-8859-7}{%
+      \DeclareInputText{242}{c}
+}{}                 
+\@ifpackagewith{babel}{greek}{%
+%%%% from grsymb package %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\DeclareTextCommand{\Digamma}{LGR}{\char"C3\relax}
+\DeclareTextCommand{\ddigamma}{LGR}{\char"93\relax}
+\DeclareTextCommand{\tao}{LGR}{\char"01\relax}
+\DeclareTextCommand{\Qoppa}{LGR}{\char"14\relax}
+\DeclareTextCommand{\varqoppa}{LGR}{\char"13\relax}
+\DeclareTextCommand{\Sampi}{LGR}{\char"13\relax}
+\DeclareTextCommand{\sampi}{LGR}{\char"13\relax}
+\DeclareTextCommand{\vardigamma}{LGR}{\char"07\relax}
+\DeclareTextCommand{\Stigma}{LGR}{\textlatin{\char"43\relax}}
+\DeclareTextCommand{\VarQoppa}{LGR}{\textlatin{\char"47\relax}}   
+\DeclareTextCommand{\euro}{LGR}{\char"18\relax}
+\DeclareTextCommand{\Euro}{LGR}{\char"18\relax}
+%\DeclareTextCommand{\permill}{LGR}{\char"19\relax}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+}{%
+\@ifpackagewith{babel}{polutonikogreek}{
+%%%% from grsymb package %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\DeclareTextCommand{\Digamma}{LGR}{\char"C3\relax}   
+\DeclareTextCommand{\ddigamma}{LGR}{\char"93\relax}
+\DeclareTextCommand{\tao}{LGR}{\char"01\relax}
+\DeclareTextCommand{\Qoppa}{LGR}{\char"14\relax}
+\DeclareTextCommand{\varqoppa}{LGR}{\char"13\relax}
+\DeclareTextCommand{\Sampi}{LGR}{\char"13\relax}
+\DeclareTextCommand{\sampi}{LGR}{\char"13\relax}
+\DeclareTextCommand{\vardigamma}{LGR}{\char"07\relax}
+\DeclareTextCommand{\Stigma}{LGR}{\textlatin{\char"43\relax}}
+\DeclareTextCommand{\VarQoppa}{LGR}{\textlatin{\char"47\relax}}
+\DeclareTextCommand{\euro}{LGR}{\char"18\relax}
+\DeclareTextCommand{\Euro}{LGR}{\char"18\relax}
+%\DeclareTextCommand{\permill}{LGR}{\char"19\relax}
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+}{}}            
+
+
+
+
+\endinput
+%%
+%% End of file `gfscomplutum.sty'.
diff --git a/Master/texmf-dist/tex/latex/gfscomplutum/lgrcomplutum.fd b/Master/texmf-dist/tex/latex/gfscomplutum/lgrcomplutum.fd
new file mode 100644
index 00000000000..fbfde3d36be
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/gfscomplutum/lgrcomplutum.fd
@@ -0,0 +1,29 @@
+%% This is file 'lgrcomplutum.fd'.
+%%
+%% (c) copyright Apr 2007 by
+%% Tsolomitis Antonis.
+%%
+%%  This program can be redistributed and/or modified under the terms
+%%  of the LaTeX Project Public License Distributed from CTAN
+%%  archives in directory macros/latex/base/lppl.txt; either
+%%  version 1 of the License, or any later version.
+%%
+%% THIS FILE SHOULD BE PUT IN A TEX INPUTS DIRECTORY
+
+\DeclareFontFamily{LGR}{complutum}{}
+\DeclareFontShape{LGR}{complutum}{m}{n}{<-> s * [0.92] gcomplutum8a}{}
+\DeclareFontShape{LGR}{complutum}{m}{it}{<-> s * [0.92] gcomplutumo8a}{}
+\DeclareFontShape{LGR}{complutum}{b}{n}{<-> s * [0.92] gcomplutum8a}{}
+\DeclareFontShape{LGR}{complutum}{b}{it}{<-> s * [0.92] gcomplutumo8a}{}
+\DeclareFontShape{LGR}{complutum}{m}{sl}{<-> s * [0.92] gcomplutumo8a}{}
+\DeclareFontShape{LGR}{complutum}{b}{sl}{<-> s * [0.92] gcomplutumo8a}{}
+\DeclareFontShape{LGR}{complutum}{m}{sc}{<-> s * [0.92] gcomplutum8a}{}
+
+
+\DeclareFontShape{LGR}{complutum}{bx}{n}{<-> s * [0.92] gcomplutum8a}{}
+\DeclareFontShape{LGR}{complutum}{bx}{it}{<-> s * [0.92] gcomplutumo8a}{}
+\DeclareFontShape{LGR}{complutum}{bx}{sl}{<-> s * [0.92] gcomplutumo8a}{}
+
+\endinput
+%%
+%% End of file 'lgrcomplutum.fd'.