%% %% This is file `textgreek.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% textgreek.dtx (with options: `package') %% %% This is a generated file. %% %% Copyright 2010,2011 Leonard Michlmayr %% %% This work may be distributed and/or modified under the %% conditions of the LaTeX Project Public License, either version 1.3 %% 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.3 or later is part of all distributions of LaTeX %% version 2005/12/01 or later. %% %% This work has the LPPL maintenance status `author-maintained'. %% %% The Current Maintainer of this work is Leonard Michlmayr %% . %% %% This work consists of the file textgreek.dtx %% and the derived files textgreek.sty and textgreek.pdf %% \NeedsTeXFormat{LaTeX2e}[2009/09/24] \ProvidesPackage{textgreek} [2011/04/08 v0.5 greek symbols in text] \InputIfFileExists{lgrenc.def}{% \PackageInfo{textgreek}{Loading the definitions for the Greek font% encoding.}}{% \PackageError{textgreek}{Cannot find the file lgrenc.def}{% lgrenc.def is a file that contains the definitions for the Greek font encoding LGR. Maybe it comes with the babel package.}} \DeclareOption{cbgreek}{% \renewcommand*{\textgreekfontmap}{% {eur/*/*}{U/eur/*/*} {phv/*/*}{U/psy/*/*}}}% \DeclareOption{euler}{% \renewcommand*{\textgreekfontmap}{% {phv/*/*}{U/psy/*/*} {*/bx/n}{U/eur/b/n} {*/b/n}{U/eur/b/n} {*/*/n}{U/eur/m/n}}}% \DeclareOption{artemisia}{% \renewcommand*{\textgreekfontmap}{% {eur/*/*}{U/eur/*/*} {phv/*/*}{U/psy/*/*} {*/b/n}{LGR/artemisia/b/n} {*/bx/n}{LGR/artemisia/bx/n} {*/*/n}{LGR/artemisia/m/n} {*/b/it}{LGR/artemisia/b/it} {*/bx/it}{LGR/artemisia/bx/it} {*/*/it}{LGR/artemisia/m/it} {*/b/sl}{LGR/artemisia/b/sl} {*/bx/sl}{LGR/artemisia/bx/sl} {*/*/sl}{LGR/artemisia/m/sl} {*/*/sc}{LGR/artemisia/m/sc} {*/*/sco}{LGR/artemisia/m/sco}}}% \newcommand*{\textgreekfontmap}{}% \ExecuteOptions{cbgreek} \ProcessOptions\relax% \PackageInfo{textgreek}{Loaded fontmap: \textgreekfontmap.} \def\textgreek@setfont#1/#2/#3/#4\relax{% \textgreek@ematch{#1}{*}{}{\fontencoding{#1}}% \textgreek@ematch{#2}{*}{}{\fontfamily{#2}}% \textgreek@ematch{#3}{*}{}{\fontseries{#3}}% \textgreek@ematch{#4}{*}{}{\fontshape{#4}}}% \def\textgreek@eof{}% \def\textgreek@return#1#2\textgreek@eof{% \fi#1}% \def\textgreek@ematch#1#2#3#4{% \begingroup% \edef\tempa{#1}\edef\tempb{#2}\def\tempc{*}% \def\return##1##2\endgroup{\fi\endgroup##1}% \ifx\tempa\tempb\return{#3}\fi% \ifx\tempa\tempc\return{#3}\fi% \iftrue\return{#4}\fi% \endgroup}% \def\textgreek@matchfont#1/#2/#3\relax#4#5{% \textgreek@ematch{#1}{\f@family}{% \textgreek@ematch{#2}{\f@series}{% \textgreek@ematch{#3}{\f@shape}{#4}{#5}}% {#5}}% {#5}% }% \def\textgreek@findfont@#1#2#3\textgreek@eof{% \textgreek@matchfont#1\relax% {\textgreek@setfont#2\relax}% {\textgreek@findfont#3\textgreek@eof}}% \def\textgreek@findfont#1\textgreek@eof{% \begingroup% \def\temp{#1}% \def\return##1##2\endgroup{\fi\endgroup##1}% \ifx\temp\textgreek@eof\else% \return{\textgreek@findfont@#1\textgreek@eof}% \fi\endgroup}% \newcommand*{\textgreekfont}{% \fontencoding{LGR}% \edef\textgreek@fontmap{\textgreekfontmap}% \expandafter\textgreek@findfont\textgreek@fontmap\textgreek@eof% \selectfont% }% \newcommand*{\lgrtoeuler}[1]{% \if G#1\textgreek@return{\char0}\fi% \if D#1\textgreek@return{\char1}\fi% \if J#1\textgreek@return{\char2}\fi% \if L#1\textgreek@return{\char3}\fi% \if X#1\textgreek@return{\char4}\fi% \if P#1\textgreek@return{\char5}\fi% \if S#1\textgreek@return{\char6}\fi% \if U#1\textgreek@return{\char7}\fi% \if F#1\textgreek@return{\char8}\fi% \if Y#1\textgreek@return{\char9}\fi% \if W#1\textgreek@return{\char10}\fi% \if a#1\textgreek@return{\char11}\fi% \if b#1\textgreek@return{\char12}\fi% \if g#1\textgreek@return{\char13}\fi% \if d#1\textgreek@return{\char14}\fi% \if 3#1\textgreek@return{\char15}\fi% element-of style epsilon \if z#1\textgreek@return{\char16}\fi% \if h#1\textgreek@return{\char17}\fi% \if j#1\textgreek@return{\char18}\fi% temperature style theta \if i#1\textgreek@return{\char19}\fi% \if k#1\textgreek@return{\char20}\fi% \if l#1\textgreek@return{\char21}\fi% \if m#1\textgreek@return{\char22}\fi% \if n#1\textgreek@return{\char23}\fi% \if x#1\textgreek@return{\char24}\fi% \if p#1\textgreek@return{\char25}\fi% \if r#1\textgreek@return{\char26}\fi% \if s#1\textgreek@return{\char27}\fi% \if t#1\textgreek@return{\char28}\fi% \if u#1\textgreek@return{\char29}\fi% \if v#1\textgreek@return{\char30}\fi% o-slash style phi \if q#1\textgreek@return{\char31}\fi% \if y#1\textgreek@return{\char32}\fi% \if w#1\textgreek@return{\char33}\fi% \if e#1\textgreek@return{\char34}\fi% \if 0#1\textgreek@return{\char35}\fi% \if f#1\textgreek@return{\char39}\fi% \fontencoding{LGR}\selectfont #1% \textgreek@eof}% \newcommand*{\lgrtosymbol}[1]{% \if A#1\textgreek@return{A}\fi% \if B#1\textgreek@return{B}\fi% \if Q#1\textgreek@return{C}\fi% \if D#1\textgreek@return{D}\fi% \if E#1\textgreek@return{E}\fi% \if F#1\textgreek@return{F}\fi% \if G#1\textgreek@return{G}\fi% \if H#1\textgreek@return{H}\fi% \if I#1\textgreek@return{I}\fi% \if 0#1\textgreek@return{J}\fi% \if K#1\textgreek@return{K}\fi% \if L#1\textgreek@return{L}\fi% \if M#1\textgreek@return{M}\fi% \if N#1\textgreek@return{N}\fi% \if O#1\textgreek@return{O}\fi% \if P#1\textgreek@return{P}\fi% \if J#1\textgreek@return{Q}\fi% \if R#1\textgreek@return{R}\fi% \if S#1\textgreek@return{S}\fi% \if T#1\textgreek@return{T}\fi% \if U#1\textgreek@return{U}\fi% \if c#1\textgreek@return{V}\fi% \if W#1\textgreek@return{W}\fi% \if X#1\textgreek@return{X}\fi% \if Y#1\textgreek@return{Y}\fi% \if Z#1\textgreek@return{Z}\fi% \if a#1\textgreek@return{a}\fi% \if b#1\textgreek@return{b}\fi% \if q#1\textgreek@return{c}\fi% \if d#1\textgreek@return{d}\fi% \if e#1\textgreek@return{e}\fi% \if v#1\textgreek@return{f}\fi% \if g#1\textgreek@return{g}\fi% \if h#1\textgreek@return{h}\fi% \if i#1\textgreek@return{i}\fi% \if f#1\textgreek@return{j}\fi% \if k#1\textgreek@return{k}\fi% \if l#1\textgreek@return{l}\fi% \if m#1\textgreek@return{m}\fi% \if n#1\textgreek@return{n}\fi% \if o#1\textgreek@return{o}\fi% \if p#1\textgreek@return{p}\fi% \if j#1\textgreek@return{q}\fi% \if r#1\textgreek@return{r}\fi% \if s#1\textgreek@return{s}\fi% \if t#1\textgreek@return{t}\fi% \if u#1\textgreek@return{u}\fi% \if w#1\textgreek@return{w}\fi% \if x#1\textgreek@return{x}\fi% \if y#1\textgreek@return{y}\fi% \if z#1\textgreek@return{z}\fi% \fontencoding{LGR}\selectfont #1% \textgreek@eof}% \DeclareRobustCommand*{\TextGreek}[1]{% \begingroup% \textgreekfont% \edef\tempa{\f@family}% \def\tempb{eur}\def\tempc{psy}% \ifx\tempa\tempb\textgreek@return{\lgrtoeuler#1}\fi% \ifx\tempa\tempc\textgreek@return{\lgrtosymbol#1}\fi% #1% \textgreek@eof% \endgroup}% \newcommand*{\DeclareTextGreekSymbol}[2]{% \expandafter\DeclareTextCommandDefault\csname text#1\endcsname% {\TextGreek{#2}}}% \DeclareTextGreekSymbol{alpha}{a} \DeclareTextGreekSymbol{beta}{b} \DeclareTextGreekSymbol{gamma}{g} \DeclareTextGreekSymbol{delta}{d} \DeclareTextGreekSymbol{epsilon}{e} \DeclareTextGreekSymbol{zeta}{z} \DeclareTextGreekSymbol{eta}{h} \DeclareTextGreekSymbol{theta}{j} \DeclareTextGreekSymbol{iota}{i} \DeclareTextGreekSymbol{kappa}{k} \DeclareTextGreekSymbol{lambda}{l} \expandafter\ifx\csname?\string\textmu\endcsname\relax% \DeclareTextGreekSymbol{mu}{m}\fi \DeclareTextGreekSymbol{mugreek}{m} \DeclareTextGreekSymbol{nu}{n} \DeclareTextGreekSymbol{xi}{x} \DeclareTextGreekSymbol{omikron}{o} \DeclareTextGreekSymbol{pi}{p} \DeclareTextGreekSymbol{rho}{r} \DeclareTextGreekSymbol{sigma}{s\noboundary} \DeclareTextGreekSymbol{varsigma}{c} \DeclareTextGreekSymbol{tau}{t} \DeclareTextGreekSymbol{upsilon}{u} \DeclareTextGreekSymbol{phi}{f} \DeclareTextGreekSymbol{chi}{q} \DeclareTextGreekSymbol{psi}{y} \DeclareTextGreekSymbol{omega}{w} \DeclareTextGreekSymbol{Alpha}{A} \DeclareTextGreekSymbol{Beta}{B} \DeclareTextGreekSymbol{Gamma}{G} \DeclareTextGreekSymbol{Delta}{D} \DeclareTextGreekSymbol{Epsilon}{E} \DeclareTextGreekSymbol{Zeta}{Z} \DeclareTextGreekSymbol{Eta}{H} \DeclareTextGreekSymbol{Theta}{J} \DeclareTextGreekSymbol{Iota}{I} \DeclareTextGreekSymbol{Kappa}{K} \DeclareTextGreekSymbol{Lambda}{L} \DeclareTextGreekSymbol{Mu}{M} \DeclareTextGreekSymbol{Nu}{N} \DeclareTextGreekSymbol{Xi}{X} \DeclareTextGreekSymbol{Omikron}{O} \DeclareTextGreekSymbol{Pi}{P} \DeclareTextGreekSymbol{Rho}{R} \DeclareTextGreekSymbol{Sigma}{S} \DeclareTextGreekSymbol{Tau}{T} \DeclareTextGreekSymbol{Upsilon}{U} \DeclareTextGreekSymbol{Phi}{F} \DeclareTextGreekSymbol{Chi}{Q} \DeclareTextGreekSymbol{Psi}{Y} \DeclareTextGreekSymbol{Omega}{W} \DeclareTextCommand{\straightphi}{PU}% {\83\325} % U+03D5 GREEK PHI SYMBOL \DeclareTextCommandDefault{\straightphi}{% \begingroup\textgreekfont% \edef\tempa{\f@family}% \edef\tempb{\f@shape}% \def\tempc{eur}\def\tempd{psy}% \def\tempe{it}% \ifx\tempa\tempc\textgreek@return{\lgrtoeuler{v}}\fi% \ifx\tempa\tempd\textgreek@return{\lgrtosymbol{v}}\fi% \ifx\tempb\tempe\textgreek@return{% \fontencoding{OML}\selectfont\char30}\fi% \fontencoding{U}\fontfamily{eur}\selectfont\lgrtoeuler{v}% \textgreek@eof% \endgroup}% \DeclareTextCommand{\scripttheta}{PU}% {\83\321}% U+03D1 GREEK THETA SYMBOL \DeclareTextCommandDefault{\scripttheta}{% \begingroup\textgreekfont% \edef\tempa{\f@family}% \edef\tempb{\f@shape}% \def\tempc{eur}\def\tempd{psy}% \def\tempe{it}% \ifx\tempa\tempc\textgreek@return{\lgrtoeuler{0}}\fi% \ifx\tempa\tempd\textgreek@return{\lgrtosymbol{0}}\fi% j% default theta in cbgreek and artemisia \textgreek@eof% \endgroup}% \DeclareTextCommand{\straighttheta}{PU}% {\83\270} % U+03B8 GREEK THETA SYMBOL \DeclareTextCommandDefault{\straighttheta}{% \begingroup\textgreekfont% \edef\tempa{\f@family}% \edef\tempb{\f@shape}% \def\tempc{eur}\def\tempd{psy}% \def\tempe{it}% \ifx\tempa\tempc\textgreek@return{\lgrtoeuler{j}}\fi% \ifx\tempa\tempd\textgreek@return{\lgrtosymbol{j}}\fi% \ifx\tempb\tempe\textgreek@return{% \fontencoding{OML}\selectfont\char18}\fi% \fontencoding{U}\fontfamily{eur}\selectfont\lgrtoeuler{j}% \textgreek@eof% \endgroup}% \iffalse\fi % U+03F5 GREEK LUNATE EPSILON SYMBOL \DeclareTextCommand{\straightepsilon}{PU}{\83\365}% \DeclareTextCommandDefault{\straightepsilon}{% \begingroup\textgreekfont% \edef\tempa{\f@family}% \edef\tempb{\f@shape}% \def\tempc{eur}\def\tempd{psy}% \def\tempe{it}% \ifx\tempa\tempc\textgreek@return{\lgrtoeuler{3}}\fi% \ifx\tempa\tempd\textgreek@return{% \fontfamily{eur}\fontseries{b}\selectfont\lgrtoeuler{3}}\fi% \ifx\tempb\tempe\textgreek@return{% \fontencoding{OML}\selectfont\char15}\fi% \fontencoding{U}\fontfamily{eur}\selectfont\lgrtoeuler{3}% \textgreek@eof% \endgroup}% \endinput %% %% End of file `textgreek.sty'.