diff options
Diffstat (limited to 'Master/texmf-dist/doc/plain')
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/00changes.txt | 36 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/00readme.txt | 49 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/monsyl.txt | 456 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/rgr.readme | 39 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/rgreekmacros.tex | 159 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/rgrhyph.tex | 1179 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/rgrpaper.tex | 763 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/rgrtestfont.tex | 274 | ||||
| -rw-r--r-- | Master/texmf-dist/doc/plain/yannisgr/tomakeformat.txt | 26 |
9 files changed, 0 insertions, 2981 deletions
diff --git a/Master/texmf-dist/doc/plain/yannisgr/00changes.txt b/Master/texmf-dist/doc/plain/yannisgr/00changes.txt deleted file mode 100644 index 9be612e38ba..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/00changes.txt +++ /dev/null @@ -1,36 +0,0 @@ - -Files renamed to avoid conflicts with CM: - accent.mf renamed to rgraccent.mf - punct.mf renamed to rgrpunct.mf - - -Files renamed to avoid conflicts with Levy's Greek - gen_acc.mf renamed to rgen_acc.mf - grbase.mf renamed to rgrbase.mf - greek.mf renamed to rgreek.mf - greekmacros.tex renamed to rgreekmacros.tex - grtestfont.tex renamed to rgrtestfont.tex - lig.mf renamed to rgrlig.mf - lower.mf renamed to rgrlower.mf - upper.mf renamed to rgrupper.mf - - -Files renamed to conform to HMC foreign language conventions - rgrhyph.tex renamed to grhypha.tex - - -Files replaced with near-identical files from Levy's Greek - digits.mf - - -Files changed to reflect above renamings: - greekcsc.mf - mrgrbf10.mf - mrgrrg10.mf - mrgrsl10.mf - mrgrti10.mf - m_greek.mf - rgrbf10.mf - rgreek.mf - rgrpaper.tex - rgrrg10.mf - rgrsc10.mf - rgrsl10.mf - rgrtestfont.tex - rgrti10.mf - tomakeformat.txt diff --git a/Master/texmf-dist/doc/plain/yannisgr/00readme.txt b/Master/texmf-dist/doc/plain/yannisgr/00readme.txt deleted file mode 100644 index 9110bf9a1c1..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/00readme.txt +++ /dev/null @@ -1,49 +0,0 @@ - -Directory TEX_ROOT:[BABEL.GREEK.YANNIS] - -00CHANGES.TXT;5 -00README.TXT;1 -CSC_MISCE.MF;1 -DIGITS.MF;2 -GEN_ACC.MF;2 -GEN_M_ACC.MF;1 -GREEKCSC.MF;2 -IT_DIGITS.MF;1 -IT_LIG.MF;1 -IT_LOWER.MF;1 -LIGCSC.MF;1 -MONSYL.TXT;1 -MRGRBF10.MF;2 -MRGRRG10.MF;2 -MRGRSL10.MF;2 -MRGRTI10.MF;2 -M_ACCENT.MF;1 -M_GREEK.MF;2 -RGEN_ACC.MF;1 -RGR.README;2 -RGRACCENT.MF;1 -RGRBASE.MF;1 -RGRBF10.MF;3 -RGREEK.MF;3 -RGREEKMACROS.TEX;1 -RGRHYPH.TEX;1 -RGRLIG.MF;1 -RGRLOWER.MF;1 -RGRPAPER.DVI;1 -RGRPAPER.LIS;2 -RGRPAPER.TEX;3 -RGRPUNCT.MF;1 -RGRRG10.MF;3 -RGRSC10.300GF;1 -RGRSC10.LIS;1 -RGRSC10.MF;2 -RGRSC10.PL;1 -RGRSC10.TFM;1 -RGRSL10.MF;3 -RGRTESTFONT.TEX;2 -RGRTI10.MF;3 -RGRUPPER.MF;1 -SCSC.MF;1 -TOMAKEFORMAT.TXT;2 - -Total of 44 files. diff --git a/Master/texmf-dist/doc/plain/yannisgr/monsyl.txt b/Master/texmf-dist/doc/plain/yannisgr/monsyl.txt deleted file mode 100644 index b704a49ee7f..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/monsyl.txt +++ /dev/null @@ -1,456 +0,0 @@ -% -% This is part of the rgr-package, version 1.0 -% -% LIST OF ONE-SYLLAB WORDS WHICH TAKE NO ACCENT -% IN THE NEW ONE-ACCENT SYSTEM -% -% Source: Dictionnary of Mhqi'wthc (ref. 3 in the paper) -% -% -% Exceptions are: >'h, p~wc, po~u, und mo~u, so~u, to~u etc -% in case of misunderstanding: -% for example o pat'erac mou e'ipe -% can mean: my father said (<o pat'erac mou, e>~ipe) -% or father said to me (<o pat'erac, mo~u e>~ipe). -% In the first case it would be: o pat'erac mou e'ipe -% and in the second one: o pat'erac mo'u e'ipe. -% But if there is no possible misunderstanding, these words get no -% accent. -% -% ->~a ->'a -<'a ->'ai ->'ah -<'alc ->'alt ->'an ->'aq -b'att -b'aq -b'hx -b'olt -bo~u -bo~uc -bg'ec -br'ec -bg~w -bge~ic -bge~i -bgo~un -br'e -b~wx -bi'oc -br~w -bre~ic -bre~i -bro~un -bo~un -g'a -g'ar -g~h -g~hc -g~hn -gi'a -gi'en -gi'wt -gk'el -gk'i -gk'olf -gi'oc -gio~u -gi'o -gio'i -gi~wn -gio'uc -gkro'um -gla~ux -gra~uc -gr'i -gr~u -gr'uy -gk'ol -g'in -gi'angk -gi'ok -g'uy -d'a -da'ic -d'ac -d'e -de~i -de~in -d'en -d'ec -d~w -de~ic -do~un -d'h -d'hx -di'a -d'ic -d'on -do'ux -dr'ax -du'o -dr~w -dr~ac -dr~a -dro~un -dr~uc ->'e ->'ea -e<~ic ->'em -<'en -<'ex -e>~u -ze'uc -ze~i -ze~ic -z~hn -zo~un -z~w -z'en ->~hn -<'h -<~hc -<'hn -j'a -j'in -j'ic -jl~a -jl~ac -jlo~un -jl~w -j'ec -jr'ix -jr'iy -jro~uc -j'wc -jei'oc -jei'a -jeio'i -jeio'uc -jei~wn -jeio~u -jei~ac -jei'ec ->'ic ->'i -ka'i -k>'an -k'ic -k~in -kl~a -kl~ac -klo~un -kl~w -k'itc -k'atc -kr'a -kr'aq -kr'hc -kte'ic -k'ur -k'wk -k~wc -k~w -kla~ic -ka~ic -ka~in -kl'unn -l'a -l'ax -l'iy -l'ugx -l'ec -l'en -l'ok -m'a -ma'itr -m'arc -m~ac -m'at -m'atc -m'e -mo'utc -m'en -m'h -m'hn -m'i -m'ic -mn~an -mn~ac -mn~a -m'orc -mi'a -m'ec -mp~a -mp'a -mp'ar -mp'ac -mp'iz -mpl'e -mpl'ok -mo~u -mp'ec -mplo'um -mplo'uz -mp'ol -mp'ox -mpr'e -mpr'ik -mpr'itz -mp'it -mp'ip -mpr'oc -m~u -m~uc -m'wy -mp'ak -mpo'um -mp'am -n'a -na'i -na~u -na~un -na~uc -n'h -n'i -ni'a -nt'an -n'ok -nt'e -nt'o -nt'ok -nt'on -nto'uc -n~u -n~un -n'ux -n'ec -nt'ip -ntr'in -nto~u -ni'oc -nio~u -ni'o -nio'i -ni~wn -nio'uc -ni~ac -ni'an -ni'ec ->'on -<'oc -o<~u -<'on -<'o -o<'i -o<'uc -o<'u -o>~uc -o>'ust -o>'uf -o>'uq ->'oq -p'a -pa~ic -pa~i -p~an -p'an -p~ac -p'at -p~w -pe~ic -pe~i -po~un -p'ec -p'ik-n'ik -pl'hn -plo~uc -plo~i -plo~un -plo~u -p'i -pi'ec -pie~i -pio~un -pi~w -pie~ic -pn'ux -po'u -po'uc -po'uf -pr'in -pr'o -pro'ix -pi'a -pi'o -pr'oc -p'ux -p~ur -p'w -p'wc -poi'oc -poi'a -poi'o -poio'i -poio'uc -poi~wn -poio~u -poi~ac -poi'an -poi'on -poi'ec -r'ax -r'e -r'ingk -r'ic -ro~uc -ro~u -ro~un -r'wx -r'wc -r~w -r'o -r'ok -re~i -s'an -s'a -s'arx -s~ac -s'e -s'ex -s'er -s'hc -s'hy -s'ef -st'a -st'o -s'ik -sk'i -sk'wr -sk'wy -sn'omp -s'ok -s'oc -so'ut -so~u -sto~u -st'on -sto'uc -spl'hn -sp'or -sp~w -sp~ac -sp~an -st'ar -st'ul -st'ux -s'u -st~hc -st'hn -st~wn -st'h -s'un -s~uc -s~un -sf'hn -sf'hx -sf'igx -st'op -str'ac -st'ok -t'a -ta~u -t'akt -t'an -t~ac -t'e -t'est -tz'in -t'i -ts'ok -tz'im -tz'wn -t'ik -t'ic -t'o -to~u -t'on -to'uc -t~hc -t'hn -t~wn -tr'ak -t'h -tz'ak -tr'am -tr'ast -tre~ic -tr'ic -tr'ik -tr'wc -tr~wc -tr~wn -ts'ak -t'ak -t'ok -ts'e -ts'ek -ts'if -tso'u -ts'a -tso'uf -ts'af -tz'az -t'ost -tz'ast -ts'ingk -f'i -f~ac -f~an -fe~u -fl'ert -fl'ey -fl'it -fl'ux -f'wr -f~wc -f'wc -f'ilm -fl'ac -f'ic -f'on -fto~u -f'ast -fo~unt -q'a -q'i -q'e -qo'u -qe'ir -q'hn -qj'ec -qt'ec -qj'wn -jo~uc -jo~un -jr'h -jr'wc -j'wl -y'i -y'ec -y'hn -y'it ->'w ->~w ->'wm ->'wn ->'wq ->'wy -<'wc - diff --git a/Master/texmf-dist/doc/plain/yannisgr/rgr.readme b/Master/texmf-dist/doc/plain/yannisgr/rgr.readme deleted file mode 100644 index f7a455b19aa..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/rgr.readme +++ /dev/null @@ -1,39 +0,0 @@ -List of files: -accent.mf, csc_misce.mf, digits.mf, gen_acc.mf, gen_m_acc.mf, grbase.mf, -greek.mf, greekcsc.mf, it_digits.mf, it_lig.mf, it_lower.mf, lig.mf, -ligcsc.mf, lower.mf, m_accent.mf, m_greek.mf, punct.mf, scsc.mf, upper.mf, - -rgrrg10.mf, rgrsl10.mf, rgrti10.mf, rgrbf10.mf, rgrsc10.mf, mrgrrg10.mf, -mrgrsl10.mf, mrgrti10.mf, mrgrbf10.mf, - -greekmacros.tex, monsyl.txt, rgrhyph.tex, rgrpaper.tex, tomakeformat.txt, -grtestfont.tex - -************************************************************************* - USERS'S GUIDE -************************************************************************* - -Run all the fonts with \mag:=1; Run rgrrg10 also with \mag:=.9;. Make sure -that the fonts cmssqi8 and mcyr10 are available. Same thing for tugbot.sty -and tugbot.com (version 0.5 at least). Run rgrpaper.tex (this is a NEW version -of "Y. Haralambous, K. Thull, Typesetting modern greek with 128 character -codes, TUGboat 10 (1989) 354-359). - -Read it! - -If you want to make a greek format, remove "\input hyphen.tex" from plain.tex, -and replace by he contents of tomakeformat.txt. - -If you want to make the PASCAL word processor mentionned in rgrpaper, you -will find in monsyl.txt a list of monosyllabes. - -That's it. If you are a satisfied user you can send me a postcard for my -collection (or perhaps some work you have done with this package), else send -me your remarks and complaints. My address is - - Yannis Haralambous - 101/11, rue Breughel - 59650 Villeneuve d'Ascq, France - Tel. (33) 20.05.28.80 - email: (Bitnet) yannis@frcitl71 - (after June, 1, 1990 yannis@frcitl81) diff --git a/Master/texmf-dist/doc/plain/yannisgr/rgreekmacros.tex b/Master/texmf-dist/doc/plain/yannisgr/rgreekmacros.tex deleted file mode 100644 index 3aad8fd1ac0..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/rgreekmacros.tex +++ /dev/null @@ -1,159 +0,0 @@ -\def\lt{<} -\def\gt{>} -\newcount\fontnumber -\fontnumber=0 -\newif\ifoneaccent\oneaccenttrue -\def\ifnextchar#1#2#3{\let\tempe #1\def\tempa{#2}\def\tempb{#3}\futurelet - \tempc\ifnch} -\def\ifnch{\ifx\tempc\tempe\let\tempd\tempa\else\let\tempd\tempb\fi\tempd} -\def\gobble#1{} -\def\greekmode{% -\catcode`\<=13% -\catcode`\>=13% -\catcode`\'=11% -\catcode`\`=13% -\catcode`\~=11% -\catcode`\"=13% -\lccode`\<=`\<% -\lccode`\>=`\>% -\lccode`\'=`\'% -\lccode`\~=`\~% -\lccode`\"=`\"% -\def\rg{\fontnumber=1\tengr}% -\def\sl{\fontnumber=2\tengrsl}% -\def\it{\fontnumber=3\tengrit}% -\def\bf{\fontnumber=4\tengrbf}% -\def\smc{\fontnumber=5\tengrsmc}% -\def\I##1{\setbox0\hbox{##1}\ifdim\ht0=1ex\accent'174 ##1% - \else{\ooalign{\hidewidth\char'174\hidewidth\crcr\unhbox0}}\fi}}% -\newcount\vwl -\newcount\acct -{ - \greekmode - \gdef>{\ifnextchar ~{\expandafter\smoothcircumflex\gobble}{\char\lq\>}} - \gdef<{\ifnextchar ~{\expandafter\roughcircumflex\gobble}{\char\lq\<}} - \gdef\smoothcircumflex#1{\acct=\rq134 \vwl=\lq#1 \dobreathingcircumflex} - \gdef\roughcircumflex#1{\acct=\rq100 \vwl=\lq#1 \dobreathingcircumflex} - \gdef\dobreathingcircumflex{\ifnum\vwl\lt\rq140 %if uppercase - \char\the\acct\kern -.2em\char\the\vwl\else - \doaccent\fi} - \gdef\doaccent{\accent\the\acct \char\the\vwl\relax} - \gdef"{\ifnextchar '{\expandafter\diaeresisacute\gobble}{\accent\lq\"}} - \gdef\diaeresisacute#1{\accent\rq043 #1} - \gdef`{'} -} - -\newif\ifgreek\greekfalse - -\def\begingreek{\bgroup\font\tengr=rgrrg10\font\tengrsl=rgrsl10% -\font\tengrbf=rgrbf10\font\tengrit=rgrti10\font\tengrsmc=rgrsc10% -\greektrue\greekmode\rg} -\def\beginmgreek{\bgroup\font\tengr=mrgrrg10\font\tengrsl=mrgrsl10% -\font\tengrbf=mrgrbf10\font\tengrit=mrgrti10\font\tengrsmc=rgrsc10% -\greektrue\greekmode\rg} -\def\endgreek{\egroup} -\def\endmgreek{\egroup} -\def\monotoniko{% -\font\tengr=mrgrrg10\font\tengrsl=mrgrsl10% -\font\tengrbf=mrgrbf10\font\tengrit=mrgrti10% -\ifnum\fontnumber=5\smc% - \else\ifnum\fontnumber=4\bf% - \else\ifnum\fontnumber=3\it% - \else\ifnum\fontnumber=2\sl% - \else\rg% - \fi% - \fi% - \fi% -\fi% -} -\def\polutoniko{% -\font\tengr=rgrrg10\font\tengrsl=rgrsl10% -\font\tengrbf=rgrbf10\font\tengrit=rgrti10% -\ifnum\fontnumber=5\smc% - \else\ifnum\fontnumber=4\bf% - \else\ifnum\fontnumber=3\it% - \else\ifnum\fontnumber=2\sl% - \else\rg% - \fi% - \fi% - \fi% -\fi% -} -\let\math=$% -{\catcode`\$=13% -\gdef\greekdelims{\catcode`\$=13% -\def${\ifgreek\endgreek\else\begingreek\fi} -\def\display{\math\math}\def\enddisplay{\math\math}}} -\def\grave#1{{\edef\next{\the\font}\smc\accent\rq001\next#1}} -\def\roughgrave#1{{\edef\next{\the\font}\smc\accent\rq002\next#1}} -\def\smoothgrave#1{{\edef\next{\the\font}\smc\accent\rq003\next#1}} -\def\diaeresisgrave#1{{\edef\next{\the\font}\smc\accent\rq004\next#1}} -\def\diaeresiscircumflex#1{{\edef\next{\the\font}\smc\accent\rq005\next#1}} -\def\breve#1{{\edef\next{\the\font}\smc\accent\rq006\next#1}} -\def\macron#1{{\edef\next{\the\font}\smc\accent\rq007\next#1}} -\def\rhorough{{\tengrsmc -\ifnum\fontnumber=5\char\rq162 - \else\ifnum\fontnumber=4\char\rq016 - \else\ifnum\fontnumber=3\char\rq014 - \else\ifnum\fontnumber=2\char\rq012 - \else\char\rq010 - \fi - \fi - \fi -\fi -}} -\def\rhosmooth{{\tengrsmc -\ifnum\fontnumber=5\char\rq162 - \else\ifnum\fontnumber=4\char\rq017 - \else\ifnum\fontnumber=3\char\rq015 - \else\ifnum\fontnumber=2\char\rq013 - \else\char\rq011 - \fi - \fi - \fi -\fi -}} -\def\digamma{{\smc\char\rq135}} -\def\smallDigamma{{\smc\char\rq140}} -\def\Digamma{{\tengrsmc -\ifnum\fontnumber=5\char\rq021 - \else\ifnum\fontnumber=4\char\rq027 - \else\ifnum\fontnumber=3\char\rq025 - \else\ifnum\fontnumber=2\char\rq023 - \else\char\rq021 - \fi - \fi - \fi -\fi -}} -\def\vardigamma{{\tengrsmc -\ifnum\fontnumber=5\char\rq020 - \else\ifnum\fontnumber=4\char\rq026 - \else\ifnum\fontnumber=3\char\rq024 - \else\ifnum\fontnumber=2\char\rq022 - \else\char\rq020 - \fi - \fi - \fi -\fi -}} -\def\understroke{{\smc\char\rq046}} -\def\overstroke{{\smc\char\rq044}} -\def\sanpi{{\smc\char\rq136}} -\def\Sanpi{{\smc\char\rq137}} -\def\qoppa{{\smc\char\rq133}} -\def\varqoppa{{\smc\char\rq134}} -\def\Qoppa{{\smc\char\rq103}} -\def\Tao{{\smc\char\rq177}} -\def\ssh{\breve{s}}\def\SSH{\breve{S}} -\def\dz{\breve{z}}\def\DZ{\breve{Z}} -\def\psh{\breve{y}}\def\PSH{\breve{Y}} -\def\ksh{\breve{x}}\def\KSH{\breve{X}} -\def\inviota{{\smc\char\rq126}} -\def\grMF{{\smc\char\rq030\char\rq031\char\rq032\char\rq033}\-{\smc% -\char\rq034\char\rq036\char\rq037\char\rq032}} -\def\MF{{\smc\char\rq030\char\rq031\char\rq032\char\rq033}\-{\smc% -\char\rq040\char\rq036\char\rq037\char\rq032}} - -\endinput - diff --git a/Master/texmf-dist/doc/plain/yannisgr/rgrhyph.tex b/Master/texmf-dist/doc/plain/yannisgr/rgrhyph.tex deleted file mode 100644 index 5ae489b008c..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/rgrhyph.tex +++ /dev/null @@ -1,1179 +0,0 @@ -% -% This is part of the rgr-package version 1.1 -% as of March 2, 1990 Lille (France) -% -% Hyphenation patterns for modern greek language -% ********************************************** -% -\patterns{% -.>a4 -.>'a4 -.>~a4 -.<a4 -.<'a4 -.<~a4 -.'a4 -.>e4 -.>'e4 -.>~e4 -.<e4 -.<'e4 -.<~e4 -.'e4 -.>h4 -.>'h4 -.>~h4 -.<h4 -.<'h4 -.<~h4 -.'h4 -.>i4 -.>'i4 -.>~i4 -.<i4 -.<'i4 -.<~i4 -.'i4 -.>o4 -.>'o4 -.>~o4 -.<o4 -.<'o4 -.<~o4 -.'o4 -.<u4 -.<'u4 -.<~u4 -.'u4 -.>w4 -.>'w4 -.>~w4 -.<w4 -.<'w4 -.<~w4 -.'w4 -a1 -a2i -a2'i -a2~i -a2>i -a2>'i -a2>~i -a2<i -a2<'i -a2<~i -'a3i -a3" -a2u -a2'u -a2~u -a2>u -a2>'u -a2>~u -a2<u -a2<'u -a2<~u -'a3u -e1 -e2i -e2'i -e2~i -e2>i -e2>'i -e2>~i -e2<i -e2<'i -e2<~i -'e3i -e3" -e2u -e2'u -e2~u -e2>u -e2>'u -e2>~u -e2<u -e2<'u -e2<~u -'e3u -h1 -h2u -h2'u -h2~u -h2>u -h2>'u -h2>~u -h2<u -h2<'u -h2<~u -'h3u -h3" -i1 -i2a -i2'a -i2~a -'i3a -~i3a -u2'a -i2e -i2'e -'i3e -~i3e -u2'e -i2o -i2'o -'i3o -~i3o -u2'o -i2w -i2'w -i2~w -'i3w -~i3w -u2'w -'4' -''4' -''4> -''4< -'''a4 -''>a'4 -''<a'4 -''>~a4 -''<~a4 -'''e4 -'''>e'4 -'''<e'4 -'''h4 -''>h'4 -''<h'4 -''>~h4 -''<~h4 -'''i4 -''>i'4 -''<i'4 -''>~i4 -''<~i4 -'''o4 -''>o'4 -''<o'4 -'''u4 -''>u'4 -''<u'4 -''>~u4 -''<~u4 -'''w4 -''>w'4 -''<w'4 -''>~w4 -''<~w4 -o1 -o2i -o2'i -o2~i -o2>i -o2>'i -o2>~i -o2<i -o2<'i -o2<~i -'o3i -o3" -o2u -o2'u -o2~u -o2>u -o2>'u -o2>~u -o2<u -o2<'u -o2<~u -'o3u -u1 -u2i -u2'i -u2~i -u2>i -u2>'i -u2>~i -u2<i -u2<'i -u2<~i -u3" -w1 -~a3i -~a3u -~h3u -a1b -a1g -a1d -a1z -a1j -a1k -a1l -a1m -a1n -a1x -a1p -a1r -a1s -a1t -a1f -a1q -a1y -e1b -e1g -e1d -e1z -e1j -e1k -e1l -e1m -e1n -e1x -e1p -e1r -e1s -e1t -e1f -e1q -e1y -h1b -h1g -h1d -h1z -h1j -h1k -h1l -h1m -h1n -h1x -h1p -h1r -h1s -h1t -h1f -h1q -h1y -i1b -i1g -i1d -i1z -i1j -i1k -i1l -i1m -i1n -i1x -i1p -i1r -i1s -i1t -i1f -i1q -i1y -o1b -o1g -o1d -o1z -o1j -o1k -o1l -o1m -o1n -o1x -o1p -o1r -o1s -o1t -o1f -o1q -o1y -u1b -u1g -u1d -u1z -u1j -u1k -u1l -u1m -u1n -u1x -u1p -u1r -u1s -u1t -u1f -u1q -u1y -w1b -w1g -w1d -w1z -w1j -w1k -w1l -w1m -w1n -w1x -w1p -w1r -w1s -w1t -w1f -w1q -w1y -2b1b -2b1z -2b1j -2b1k -2b1m -2b1n -2b1x -2b1s -2b1t -2b1f -2b1q -2b1y -2g1b -2g1g -2g1z -2g1j -2g1m -2g1x -2g1s -2g1t -2g1f -2g1q -2g1y -2d1b -2d1g -2d1d -2d1z -2d1j -2d1k -2d1l -2d1m -2d1n -2d1x -2d1p -2d1s -2d1t -2d1f -2d1q -2d1y -2z1b -2z1g -2z1d -2z1z -2z1j -2z1k -2z1l -2z1m -2z1n -2z1x -2z1p -2z1r -2z1s -2z1t -2z1f -2z1q -2z1y -2j1b -2j1g -2j1d -2j1z -2j1j -2j1k -2j1m -2j1n -2j1x -2j1p -2j1s -2j1t -2j1f -2j1q -2j1y -2k1b -2k1g -2k1d -2k1z -2k1j -2k1k -2k1m -2k1n -2k1x -2k1p -2k1s -2k1f -2k1q -2k1y -2l1b -2l1g -2l1d -2l1z -2l1j -2l1k -2l1l -2l1m -2l1n -2l1x -2l1p -2l1r -2l1s -2l1t -2l1f -2l1q -2l1y -2m1b -2m1g -2m1d -2m1z -2m1j -2m1k -2m1l -2m1m -2m1x -2m1r -2m1s -2m1t -2m1f -2m1q -2m1y -2n1b -2n1g -2n1d -2n1z -2n1j -2n1k -2n1l -2n1m -2n1n -2n1x -2n1p -2n1r -2n1s -2n1f -2n1q -2n1y -2x1b -2x1g -2x1d -2x1z -2x1j -2x1k -2x1l -2x1m -2x1n -2x1x -2x1p -2x1r -2x1s -2x1t -2x1f -2x1q -2x1y -2p1b -2p1g -2p1d -2p1z -2p1j -2p1k -2p1m -2p1x -2p1p -2p1s -2p1f -2p1q -2p1y -2r1b -2r1g -2r1d -2r1z -2r1j -2r1k -2r1l -2r1m -2r1n -2r1x -2r1p -2r1r -2r1s -2r1t -2r1f -2r1q -2r1y -2s1b -2s1d -2s1z -sj2m -2s1l -2s1n -2s1x -2s1r -2s1s -2s1y -2t1b -2t1g -2t1d -2t1z -2t1j -2t1k -2t1l -2t1m -2t1n -2t1x -2t1p -2t1t -2t1f -2t1q -2t1y -2f1b -2f1g -2f1d -2f1z -2f1k -2f1m -2f1n -2f1x -2f1p -2f1s -2f1f -2f1y -2q1b -2q1g -2q1d -2q1z -2q1j -2q1k -2q1m -2q1n -2q1x -2q1p -2q1s -2q1f -2q1q -2q1y -2y1b -2y1g -2y1d -2y1z -2y1j -2y1k -2y1l -2y1m -2y1n -2y1x -2y1p -2y1r -2y1s -2y1t -2y1f -2y1q -2y1y -a1"'i -e1"'i -o1"'i -a1"'u -e1"'u -o1"'u -h1"'u -a1"~1 -e1"~i -o1"~i -a1"~u -e1"~u -o1"~u -h1"~u -4'a. -4~a. -4'e. -4~e. -4'h. -4~h. -4'i. -4~i. -4'u. -4~u. -4'o. -4~o. -4'w. -4~w. -4'aa. -4'ab. -4'ag. -4'ad. -4'ae. -4'az. -4'ah. -4'aj. -4'ai. -4'ak. -4'al. -4'am. -4'an. -4'ax. -4'ao. -4'ap. -4'ar. -4'ac. -4'at. -4'au. -4'af. -4'aq. -4'ay. -4'aw. -4'ea. -4'eb. -4'eg. -4'ed. -4'ee. -4'ez. -4'eh. -4'ej. -4'ei. -4'ek. -4'el. -4'em. -4'en. -4'ex. -4'eo. -4'ep. -4'er. -4'ec. -4'et. -4'eu. -4'ef. -4'eq. -4'ey. -4'ew. -4'ha. -4'hb. -4'hg. -4'hd. -4'he. -4'hz. -4'hh. -4'hj. -4'hi. -4'hk. -4'hl. -4'hm. -4'hn. -4'hx. -4'ho. -4'hp. -4'hr. -4'hc. -4'ht. -4'hu. -4'hf. -4'hq. -4'hy. -4'hw. -4'ia. -4'ib. -4'ig. -4'id. -4'ie. -4'iz. -4'ih. -4'ij. -4'ii. -4'ik. -4'il. -4'im. -4'in. -4'ix. -4'io. -4'ip. -4'ir. -4'ic. -4'it. -4'iu. -4'if. -4'iq. -4'iy. -4'iw. -4'oa. -4'ob. -4'og. -4'od. -4'oe. -4'oz. -4'oh. -4'oj. -4'oi. -4'ok. -4'ol. -4'om. -4'on. -4'ox. -4'oo. -4'op. -4'or. -4'oc. -4'ot. -4'ou. -4'of. -4'oq. -4'oy. -4'ow. -4'ua. -4'ub. -4'ug. -4'ud. -4'ue. -4'uz. -4'uh. -4'uj. -4'ui. -4'uk. -4'ul. -4'um. -4'un. -4'ux. -4'uo. -4'up. -4'ur. -4'uc. -4'ut. -4'uu. -4'uf. -4'uq. -4'uy. -4'uw. -4'wa. -4'wb. -4'wg. -4'wd. -4'we. -4'wz. -4'wh. -4'wj. -4'wi. -4'wk. -4'wl. -4'wm. -4'wn. -4'wx. -4'wo. -4'wp. -4'wr. -4'wc. -4'wt. -4'wu. -4'wf. -4'wq. -4'wy. -4'ww. -4~aa. -4~ab. -4~ag. -4~ad. -4~ae. -4~az. -4~ah. -4~aj. -4~ai. -4~ak. -4~al. -4~am. -4~an. -4~ax. -4~ao. -4~ap. -4~ar. -4~ac. -4~at. -4~au. -4~af. -4~aq. -4~ay. -4~aw. -4~ha. -4~hb. -4~hg. -4~hd. -4~he. -4~hz. -4~hh. -4~hj. -4~hi. -4~hk. -4~hl. -4~hm. -4~hn. -4~hx. -4~ho. -4~hp. -4~hr. -4~hc. -4~ht. -4~hu. -4~hf. -4~hq. -4~hy. -4~hw. -4~ia. -4~ib. -4~ig. -4~id. -4~ie. -4~iz. -4~ih. -4~ij. -4~ii. -4~ik. -4~il. -4~im. -4~in. -4~ix. -4~io. -4~ip. -4~ir. -4~ic. -4~it. -4~iu. -4~if. -4~iq. -4~iy. -4~iw. -4~ua. -4~ub. -4~ug. -4~ud. -4~ue. -4~uz. -4~uh. -4~uj. -4~ui. -4~uk. -4~ul. -4~um. -4~un. -4~ux. -4~uo. -4~up. -4~ur. -4~uc. -4~ut. -4~uu. -4~uf. -4~uq. -4~uy. -4~uw. -4~wa. -4~wb. -4~wg. -4~wd. -4~we. -4~wz. -4~wh. -4~wj. -4~wi. -4~wk. -4~wl. -4~wm. -4~wn. -4~wx. -4~wo. -4~wp. -4~wr. -4~wc. -4~wt. -4~wu. -4~wf. -4~wq. -4~wy. -4~ww. -4a'a. -4b'a. -4g'a. -4d'a. -4e'a. -4z'a. -4h'a. -4j'a. -4i'a. -4k'a. -4l'a. -4m'a. -4n'a. -4x'a. -4o'a. -4p'a. -4r'a. -4s'a. -4t'a. -4u'a. -4f'a. -4q'a. -4y'a. -4w'a. -4a'e. -4b'e. -4g'e. -4d'e. -4e'e. -4z'e. -4h'e. -4j'e. -4i'e. -4k'e. -4l'e. -4m'e. -4n'e. -4x'e. -4o'e. -4p'e. -4r'e. -4s'e. -4t'e. -4u'e. -4f'e. -4q'e. -4y'e. -4w'e. -4a'h. -4b'h. -4g'h. -4d'h. -4e'h. -4z'h. -4h'h. -4j'h. -4i'h. -4k'h. -4l'h. -4m'h. -4n'h. -4x'h. -4o'h. -4p'h. -4r'h. -4s'h. -4t'h. -4u'h. -4f'h. -4q'h. -4y'h. -4w'h. -4a'i. -4b'i. -4g'i. -4d'i. -4e'i. -4z'i. -4h'i. -4j'i. -4i'i. -4k'i. -4l'i. -4m'i. -4n'i. -4x'i. -4o'i. -4p'i. -4r'i. -4s'i. -4t'i. -4u'i. -4f'i. -4q'i. -4y'i. -4w'i. -4a'o. -4b'o. -4g'o. -4d'o. -4e'o. -4z'o. -4h'o. -4j'o. -4i'o. -4k'o. -4l'o. -4m'o. -4n'o. -4x'o. -4o'o. -4p'o. -4r'o. -4s'o. -4t'o. -4u'o. -4f'o. -4q'o. -4y'o. -4w'o. -4a'u. -4b'u. -4g'u. -4d'u. -4e'u. -4z'u. -4h'u. -4j'u. -4i'u. -4k'u. -4l'u. -4m'u. -4n'u. -4x'u. -4o'u. -4p'u. -4r'u. -4s'u. -4t'u. -4u'u. -4f'u. -4q'u. -4y'u. -4w'u. -4a'w. -4b'w. -4g'w. -4d'w. -4e'w. -4z'w. -4h'w. -4j'w. -4i'w. -4k'w. -4l'w. -4m'w. -4n'w. -4x'w. -4o'w. -4p'w. -4r'w. -4s'w. -4t'w. -4u'w. -4f'w. -4q'w. -4y'w. -4w'w. -4a~a. -4b~a. -4g~a. -4d~a. -4e~a. -4z~a. -4h~a. -4j~a. -4i~a. -4k~a. -4l~a. -4m~a. -4n~a. -4x~a. -4o~a. -4p~a. -4r~a. -4s~a. -4t~a. -4u~a. -4f~a. -4q~a. -4y~a. -4w~a. -4a~h. -4b~h. -4g~h. -4d~h. -4e~h. -4z~h. -4h~h. -4j~h. -4i~h. -4k~h. -4l~h. -4m~h. -4n~h. -4x~h. -4o~h. -4p~h. -4r~h. -4s~h. -4t~h. -4u~h. -4f~h. -4q~h. -4y~h. -4w~h. -4a~i. -4b~i. -4g~i. -4d~i. -4e~i. -4z~i. -4h~i. -4j~i. -4i~i. -4k~i. -4l~i. -4m~i. -4n~i. -4x~i. -4o~i. -4p~i. -4r~i. -4s~i. -4t~i. -4u~i. -4f~i. -4q~i. -4y~i. -4w~i. -4a~u. -4b~u. -4g~u. -4d~u. -4e~u. -4z~u. -4h~u. -4j~u. -4i~u. -4k~u. -4l~u. -4m~u. -4n~u. -4x~u. -4o~u. -4p~u. -4r~u. -4s~u. -4t~u. -4u~u. -4f~u. -4q~u. -4y~u. -4w~u. -4a~w. -4b~w. -4g~w. -4d~w. -4e~w. -4z~w. -4h~w. -4j~w. -4i~w. -4k~w. -4l~w. -4m~w. -4n~w. -4x~w. -4o~w. -4p~w. -4r~w. -4s~w. -4t~w. -4u~w. -4f~w. -4q~w. -4y~w. -4w~w. -} -\endinput - diff --git a/Master/texmf-dist/doc/plain/yannisgr/rgrpaper.tex b/Master/texmf-dist/doc/plain/yannisgr/rgrpaper.tex deleted file mode 100644 index 98aa8cd94e5..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/rgrpaper.tex +++ /dev/null @@ -1,763 +0,0 @@ -% -% ************ tb26haralambous.tex -\input tugboat.sty - -%\input mssymb -\font\cyr=mcyr10 -%\input cyracc.def - -\input rgreekmacros -\newcount\m \newcount\n \newcount\p \newdimen\dim -\chardef\other=12 -\def\oct#1{\hbox{\tenrm\'{}\kern-.2em\tenit#1\/\kern.05em}} % octal constant -\def\hex#1{\hbox{\tenrm\H{}\tentt#1}} % hexadecimal constant -\def\setdigs#1"#2{\gdef\h{#2}% \h=hex prefix; \0\1=corresponding octal - \m=\n \divide\m by 64 \xdef\0{\the\m}% - \multiply\m by-64 \advance\m by\n \divide\m by 8 \xdef\1{\the\m}} -\def\testrow{\setbox0=\hbox{\penalty 1\def\\{\char"\h}% - \\0\\1\\2\\3\\4\\5\\6\\7\\8\\9\\A\\B\\C\\D\\E\\F% - \global\p=\lastpenalty}} % \p=1 if none of the characters exist -\def\oddline{\cr - \noalign{\nointerlineskip} - \multispan{19}\hrulefill& - \setbox0=\hbox{\lower 2.3pt\hbox{\hex{\h x}}}\smash{\box0}\cr - \noalign{\nointerlineskip}} -\newif\ifskipping -\def\evenline{\loop\skippingfalse - \ifnum\n<128 \m=\n \divide\m 16 \chardef\next=\m - \expandafter\setdigs\meaning\next \testrow - \ifnum\p=1 \skippingtrue \fi\fi - \ifskipping \global\advance\n 16 \repeat - \ifnum\n=128 \let\next=\endchart\else\let\next=\morechart\fi - \next} -\def\morechart{\cr\noalign{\hrule} - \chartline \oddline \m=\1 \advance\m 1 \xdef\1{\the\m} - \chartline \evenline} -\def\chartline{&\oct{\0\1x}&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&} -\def\chartstrut{\lower4.5pt\vbox to14pt{}} -\def\table{$$\global\n=0 - \halign to\hsize\bgroup - \chartstrut##\tabskip0pt plus10pt& - &\hfil##\hfil&\vrule##\cr - \lower6.5pt\null - &&&\oct0&&\oct1&&\oct2&&\oct3&&\oct4&&\oct5&&\oct6&&\oct7&\evenline} -\def\endchart{\cr\noalign{\hrule} - \raise11.5pt\null&&&\hex 8&&\hex 9&&\hex A&&\hex B& - &\hex C&&\hex D&&\hex E&&\hex F&\cr\egroup$$\par} -\def\:{\setbox0=\hbox{\char\n}% - \ifdim\ht0>7.5pt\reposition - \else\ifdim\dp0>2.5pt\reposition\fi\fi - \box0\global\advance\n 1 } -\def\reposition{\setbox0=\vbox{\kern2pt\box0}\dim=\dp0 - \advance\dim 2pt \dp0=\dim} -\def\centerlargechars{ - \def\reposition{\setbox0=\hbox{$\vcenter{\kern2pt\box0\kern2pt}$}}} -\greekdelims -\font\ninergr=rgrrg10 scaled 900 - -\TBremark{Pick up fonts for Imagen. Make fonts for APS} - -\def\blash{\math\backslash\math} -\let\bs=\blash -\def\begineight{\smallskip\bgroup\eightpoint} -\def\endeight{\par\egroup\smallskip} -%\font\smallrg=rgrrg8 % commented out by rw -\def\QED.{\math\square\mah} -\def\O#1{\hbox{\rm\char'23\kern-.2em\it#1\/\kern.05em}} % octal constant -\def\refersto#1{\math{}^#1\math} -\def\referred#1{\par\hang\noindent#1.} % overwritten below -\newdimen\thehangindent -\setbox0=\hbox{0. } -\thehangindent=\wd0 -\def\referred#1{\par\hangindent\thehangindent\noindent - \hbox to \thehangindent{\hss#1.\ }\ignorespaces} - -\def\infoot{\baselineskip9.4pt\eightrm} -\def\@{@} -%\def\.#1{{\def\\{\backslash}\tentex#1}} % commented out by rfw -\font\qq=cmssqi8 -\def\mottoline#1{{\rightline{\qq #1}}} -\def\htb{\hskip2pt\relax} -\def\frak{\fam\euffam} -%\def\cyr{\cyracc\tencyr} - -% *********************************************************************** - -\title * Typesetting Modern Greek with\\ 128 Character Codes \\ version 1.1* - -\author * Yannis Haralambous * -\address * U.F.R. de Math\'ematiques\\ - Universit\'e de Lille--Flandres--Artois\\ - 59655 Villeneuve d'Ascq Cedex, France * -\netaddress[\network{Bitnet}] * yannis@frcitl81 * - -\author * Klaus Thull * -\address * Freie Universit\"at Berlin * -\netaddress[\network{Usenet}] * thull@fubinf.uucp * -\TBremark{Check Thull's network address; gateway didn't like "unido".} -\TBremark{this one generally works--kt} - -\article - -{\baselineskip11.3pt -\mottoline{``Ved dette v\ae ret,} -\mottoline{n\aa r det regner} -\mottoline{s\aa\ sn\o r det''} -\smallskip -\mottoline{--- Fr\o ydis Frosk} -} - -\vskip8pt\noindent -In european scripts where diacritical marks are common, -there are (at least) two reasons to avoid \TeX's accent mechanism -in favor of many accented characters. - -One is the possible misplacement of accents by |dvitype|'s rounding -algorithm;\TBremark{dvitype or a driver?} -\TBremark{really dvitype--kt} -the second is lack or invalidity of hyphenation. For -example, large portions of german text may be unhyphenatable, and, -given the german inclination to long words, may not be in shape to be -typeset at all. Thus, in Europe, the obvious thing to do is: let -$\MF$\ put the accents onto the letters, then access these characters -via \TeX's ligature mechanism. - -Accordingly, the greek fonts created by Silvio Levy\refersto1 have -256 characters each, and are a fine tool to typeset greek texts, -ancient as well as modern, except those containing the most recent -unique accent ``$\monotoniko '{}$'' (see below). But alas, there is -the commercial world, whose device drivers just cannot do 256-code -fonts (even |.pxl|-fonts were seen on the ``Big-Tech'' sales -exhibition in West Berlin last winter). The free drivers are in -better shape generally, but often the commercial ones cannot be -disposed of in a hurry. So we decided to reduce these fonts to 128 -characters. We kept only the ones strictly necessary for writing -modern greek without misusing the |\accent| primitive. At the same -time, we constructed some new fonts, which we describe below. - -\head * The Reduced Greek Fonts * - -In modern post-war greek, the use of the grave accent ``$\grave{}$'' -($bare'ia$) progressively faded, so that only two accents and the -breathings were left (this was the kind of greek the first author -learned at school). So the first reduction we did on Levy's fonts was -to omit all grave accents. Secondly, we made $s$ a free character -again, so that in the transliteration one has to type |s| for $s$, -and |c| for $c$. Thirdly, we omitted the iota subscribed letters. -All these, however, can still be accessed by macros if so wished. - -Let's recall now the procedure, most of which is due to Levy: to -typeset greek, you get into ``Greek mode'' by typing |\begingreek|. -Similarly, you get out by typing |\endgreek|, but if you have to do -this often, it is better to type |\greekdelims| at the beginning of -your file. In that case |$| is used to enter and leave greekmode, and -|\math| takes the former meaning of |$| (do not forget to type -``{\tt\bs\SP}''). The transliteration code is the following: -\display -\tabskip1.1pt -\hbox{\valign -{\hbox to -8pt{\null\hfil\strut$#$\hfil}&\hbox to 8pt{\null\hfil\strut\tt#\hfil}\cr -a&a\cr b&b\cr g&g\cr d&d\cr e&e\cr z&z\cr h&h\cr j&j\cr -i&i\cr k&k\cr l&l\cr m&m\cr n&n\cr x&x\cr o&o\cr p&p\cr -r&r\cr s&s\cr c&c\cr t&t\cr u&u\cr f&f\cr q&q\cr y&y\cr w&w\cr}} -\enddisplay -To get an acute ($>oxe'ia$), or circumflex ($perispwm'enh$) accent you -type |'|~(single quote), or |~|~(tilde) resp.\ in front of the vowel. -To get a rough ($dase'ia$) or smooth ($yil'h$) breathing you type |<| -or |>|, resp., in front of the vowel or the accent, if there is one. -A diaeresis ($dialutik'a$) is represented by |"|~(double quote), and -for a diaeresis with acute accent, just type |"'|~(double quote, -single quote). To get a vowel with a iota subscript -($<upogegramm'enh$) you have to use the macro |\I{...}|. - -If you need one of the omitted accents or combination of accents, -you can get it by a macro: -for example -\list[\unitemized] -$\grave{e}$ by |\grave{e}|, -$\breve{a}$ by |\breve{a}|, -$\macron{h}$ by |\macron{h}|, -$\roughgrave{i}$ by |\roughgrave{i}|, -$\smoothgrave{o}$ by |\smoothgrave{o}|, -$\diaeresisgrave{w}$ by |\diaeresisgrave{w}|, -$\diaeresiscircumflex{u}$ by |\diaeresiscircumflex{u}|, -$\rhorough$ by |\rhorough|, and -$\rhosmooth$ by |\rhosmooth|. -\endlist - -Finally, you have access to the following punctuation marks: -\display -\hbox{\tabskip1.5pt -\valign -{\hbox to 15pt{\hfil\strut$#$\hfil}&\hbox to 15pt{\hfil\strut\tt#\hfil}\cr -.&.\cr ,&,\cr ;&;\cr :&:\cr !&!\cr ?&?\cr ''&''\cr ((&((\cr -))&))\cr -}} -\enddisplay -as well as the ten digits, parentheses, hyphen, en-dash, slash, -percent sign, asterisk, plus and equal signs. - -\head * Some New Fonts * - -To write mathematics in greek one also needs slanted letters (for -statements of theorems, according to |amsppt| style) and small -capital letters (for titles and references). We have constructed -these fonts, in the same reduced way, so that, together with the -reduced Levy fonts, we obtain a complete family of greek fonts, -namely regular, boldface, slanted, and small caps. We have called -these fonts |rgrrg|, |rgrbf|, |rgrsl|, |rgrsc|. Inside of greek mode -you just write |\bf|, |\sl|, |\smc| as usual and |\rg| (instead of -|\rm|) to get the regular gree font. - -Here is an example of an alleged mathematical text, complete with -translation: -$ -\proclaim \smc {1.1.4.} Jewrhma. -Gi'a k'aje jetik'o >ak'eraio -\math n\math, -<up'arqei m'ia tri'ada m'h mhdenik~wn >akera'iwn \math(x,y,z)\math, t'etoia -<~wste\math\math x^n+y^n=z^n.\math\math - -\noindent{\smc Apodeixh tou 1.1.4.} Gi'a \math n=2\math, ft'anei n'a p'aroume -\math x=3,y=4,z=5\math. Gi'a \math n\gt 2\math, ->af'hnoume t'hn >ap'odeixh st'on >anagn'wsth s'an >'askhsh. -{\bf <'o.>'e.d.} -$ - -\proclaim \smc {1.1.4.} Theorem. -For each positive integer \math n\math, -there exists a triple of non-zero integers \math (x,y,z)\math\ such that -\math\math x^n+y^n=z^n.\math\math - -\noindent{\smc Proof of 1.1.4.} For \math n=2\math, we find -\math x=3,y=4,z=5\math. For \math n\gt 2\math, the proof -left to the reader as an exercise. {\bf q.e.d.} - -\head * Fonts for one-accent greek * - -Some years after the re-establishment of democracy in Greece in 1974, -a new system of accentuation has been introduced, omitting completely -breathings and subscript iota, and simplifying the two remaining -accents into one ``universal accent,'' $\monotoniko ' \polutoniko -(tonik'o shme~io).$ This system is currently taught at school and it -seems that any official document (including written examinations in -some high schools) written in the old fashion multi-accent system is -considered invalid (!). - -So we thought that perhaps people would like to write in the old -system and have a font to print the same text in fully official -one-accent greek. We created fonts analogous to the reduced regular, -boldface, and slanted which we have denoted by the prefix ``|m|'' -(for $monotonik'o$): |mrgrrg|, |mrgrbf|, |mrgrsl|. Note that the -small capitals font |rgrsc| doesn't have any accents at all, and so -may be used in any accent system. - -These new fonts are designed to work with the same input as the old -accent system. The printed text will follow the current -grammar\refersto2 (at least concerning the accent), with one -exception: monosyllables (like articles, prepositions and other -auxiliary words) don't take any accent at all. To solve this problem -we are working at a Pascal word processor program, based on Fred -M.~Liang's packed trie device, which will, once given the list of the -accented monosyllables, recognize them, and replace them by -non-accented words. According to the dictionary of -H.~Mihiotis\refersto3, there are 284 such words, to which we ust -add many new and foreign words. - -Of course, you can write your text in one-accent greek right away -(unfortunately there is no ``magic'' macro to transform it back into -multi-accent greek~\dots). With these new fonts you will get a nice -symmetric ``universal'' accent instead of an acute or a circumflex. - -To write in one-accent greek you get into ``Greek one-accent mode'', -by typing |\beginmgreek|. If you are in greek multi-accent mode -already, you must use the macro |\monotoniko|. There is also the -converse macro |\polutoniko|. So if you want to obtain -\display\vbox{$ -\centerline{\monotoniko O Hr'akleitoc 'elege \polutoniko -((t\grave{a} p'anta \rhorough e~i))} -\centerline{\monotoniko kai e'iqe d'ikio! \dots} -$}\enddisplay -you type -\verbatim -\beginmgreek O Hr'akleitoc 'elege -\polutoniko - ((t\grave{a} p'anta \rhorough e~i)) -\monotoniko - kai e'iqe d'ikio!...\endgreek -\endverbatim - -\head * The Greek Numeral Symbols * - -The so-called Ionian\refersto4 system of numeration (\math{\sim}\math -fifth century {\smc bc}) consisted of the following numerals: -\display -\hbox{\valign -{\hbox to 15pt{\hfil\strut$#$\hfil}&\hbox to 15pt{\hfil\strut\rm#\hfil}\cr -A&1\cr B&2\cr G&3\cr D&4\cr E&5\cr {\Digamma}&6\cr Z&7\cr H&8\cr J&9\cr}} -\enddisplay -\display -\hbox{\valign -{\hbox to 15pt{\hfil\strut$#$\hfil}&\hbox to 15pt{\hfil\strut\rm#\hfil}\cr -I&{10}\cr K&{20}\cr L&{30}\cr M&{40}\cr N&{50}\cr X&{60}\cr -O&{70}\cr P&{80}\cr {\Qoppa}&{90}\cr}} -\enddisplay -\display -\hbox{\valign -{\hbox to 20pt{\hfil\strut$#$\hfil}&\hbox to 20pt{\hfil\strut\rm#\hfil}\cr -R&{100}\cr S&{200}\cr T&{300}\cr U&{400}\cr F&{500}\cr Q&{600}\cr Y&{700}\cr -W&{800}\cr {\Sanpi}&{900}\cr}} -\enddisplay - -The letters $\Digamma, \Qoppa, \Sanpi$ are called digamma, qoppa, -sanpi. They belong to an older alphabet. Later on, as lowercase -letters were introduced and as the need for higher numbers grew, the -numerals became: -\display -\hbox{\tabskip1pt -\valign -{\hbox to 15pt{\hfil\strut$#\overstroke$\hfil}& - \hbox to 15pt{\hfil\strut\rm#\hfil}\cr -a&1\cr b&2\cr g&3\cr d&4\cr e&5\cr {\digamma}&6\cr z&7\cr h&8\cr -j&9\cr}} -\enddisplay -\display -\hbox{\tabskip1pt -\valign -{\hbox to 15pt{\hfil\strut$#\overstroke$\hfil}& - \hbox to 15pt{\hfil\strut\rm#\hfil}\cr -i&{10}\cr k&{20}\cr l&{30}\cr m&{40}\cr n&{50}\cr x&{60}\cr -o&{70}\cr p&{80}\cr {\qoppa}&{90}\cr}} -\enddisplay -\display -\hbox{\tabskip1pt -\valign -{\hbox to 20pt{\hfil\strut$#\overstroke$\hfil}& - \hbox to 20pt{\hfil\strut\rm#\hfil}\cr -r&{100}\cr s&{200}\cr t&{300}\cr u&{400}\cr f&{500}\cr q&{600}\cr y&{700}\cr -w&{800}\cr {\sanpi}&{900}\cr}} -\enddisplay -\display -\hbox{\tabskip2.5pt\valign -{\hbox to 30pt{\hfil\strut$\understroke#$\hfil}& - \hbox to 30pt{\hfil\strut\rm#000\hfil}\cr -a&1\cr b&2\cr g&3\cr d&4\cr e&5\cr {\digamma}&6\cr z&7\cr}} -\enddisplay -\display -\hbox{\valign -{\hbox to 30pt{\hfil\strut$#$\hfil}& - \hbox to 30pt{\hfil\strut\rm#000\hfil}\cr -h&8\cr j&9\cr M&{10}\cr}} -\enddisplay -So, for example, the date {\sl February 16th, 1989} would be written -$i\digamma\overstroke\ Febrouar'iou \understroke a\sanpi pj$ and the -following equality holds: -$ -\display\vbox{ -\centerline{sz\overstroke\math{} + {}\math ypj\overstroke\ = - \sanpi\qoppa\digamma\hskip1pt\overstroke.} -} -\enddisplay -$ - -Notice that there is no zero. Zero is, and has always been, the -cardinal of the empty set which in Ancient Greece was not considered -an entity in its own right. - -To express numbers greater than 10,000 there were many ways. One of -them was to use 10,000 as a base: thus, for example, 67,536,753 -(\math {}= 6753 \mathbin\cdot 10,000 + 6753\math) was written -$M\understroke\digamma yng\math\cdot\math \understroke\digamma yng$. - -\medskip -\noindent{\smc Exercise}: - {\sl If $-gwno$ means ``-gon'', which of the following -polygons can by constructed by rule and compasses?}\par -\smallskip -$\centerline{iz\overstroke -gwno, l\digamma\overstroke -gwno, \understroke -dtxj-gwno,} -\centerline{\understroke akd-gwno, Me\overstroke\math\cdot\math\understroke -eflz-gwno, \sanpi\qoppa\digamma\overstroke-gwno.}$ -\medskip - -Let's return now to \TeX: you can obtain these symbols by the following -macros: -|\digamma| for -$\digamma$, -|\vardigamma| for -$\vardigamma$, -|\Digamma| for -$\Digamma$, -|\qoppa| for -$\qoppa$, -|\Qoppa| for -$\Qoppa$, -|\sanpi| for -$\sanpi$, and -|\Sanpi| for -$\Sanpi$. -To get the tick marks which distinguish units and thousands, you can -use |\overstroke| after the numeral, or |\understroke| in front of -the numeral. - -\head * Symbols for cypriotic greek * - -The official language of Cyprus is greek. It is also the language -used in the mass-media and at school. But the language actually -spoken is a dialect, derived from byzantine greek (and as it seems, -far more faithful to ancient greek than the one spoken -in Greece). Some literature has been written in the dialect, and -since there are phonemes not available in the greek alphabet, -cypriotic writers use several conventions of new symbols to express -them. - -In the convention we followed,\refersto5 the symbols $\ssh$, $\SSH$ -stand for the sound ``sh'' (like ``shower'' in english, or ``{\cyr -shashka}'' in russian), $\dz$, $\DZ$ stand for ``j'' (like ``jazz'' -in english or ``{\cyr dzhungli}'' in russian), $\psh$, $\PSH$ stand -for a $y$ followed by a $\ssh$ (like ``{\cyr pshenitza}'' in russian) -and $\ksh$, $\KSH$ stand for a $k$ followed by a $\ssh$ (like in -hindi ``k\d setriya''). - -You can get these symbols by the macros |\ssh|, |\SSH|, |\dz|, |\DZ|, -|\psh|, |\PSH|, |\ksh|, |\KSH|. Here is an example of a small text -using these symbols: -\smallskip -$ -\ninergr -\frenchspacing -\parindent0pt -\advance\baselineskip1.0pt -\tolerance=5000 -\obeylines -Dki'alexec to'uc xer'orotsouc, dentr'on mou, n'a riz'wseic, -n'a f'aeic t'hn zwo'ullan sou, pott'e s>'on j'a sterk'wseic. -T\dz i >'en kane~i p>'on''xerokagi'ac t\dz i >'en >'e\ssh ei st'axhn % -q~wma -n'a \ssh\ssh iepasto~un o<i r'izec sou, plast~hkan t\dz i >'all''>a\-k'o\-ma. -O<i spalajki'ec t\dz a'i o<i bati'ec p~asin n'a s'e tul'ixoun, ->epki'asan se po'u t'on laim'on, sf'iggoun se n'a s'e pn'i\-xoun. -T\dz i >'an pp'esei mi'a sta\ksh i'a ner'on, >enn'a t'hn p'innoun >'alloi -t\dz i >enn'a skent\dz 'ereic t\dz eiaqama'i, <'enan xerodroump'a\-lin. ->'Ejja xort'wseic n'a \ssh\ssh iaste~ic pott'e to~u <'hliou >amm'a\-ti, -giat''>enn'a s'e qaski'azousin o<i spalajki'ec t\dz i o<i b'atoi. -T\dz i >eso'unh, kakor'izikon, >enn'a doule'ukeic gr'onouc -t\dz a'i n'a gure'ukeic ''pospa\ssh i'an po'u to'uc kako'uc geit'o\-nouc. -T\dz i o<i k'opoi e>ic t''>an'ajjeman. M'agkoumou m'en prok'a\-meic\dots -t\dz i >eso'unh t'o qa"'irin mou, ftwq'on mou, >'enna k'ameic. -$ -\rightline{\sevenrm From Ilias Georgiou's ``Geloklaman"} - -\smallskip - -\head * On hyphenation * - -There is still no greek hyphenation list, so one has to use -hyphenation from other languages. We have compared on an ordinary -text, the standard english (Liang), the german (Schwarz) and -portuguese (Rezende)\refersto6 hyphenation patterns. The results -were surprising: on 267 possible hyphens, these three patterns missed -199 (!!), 141 and 149 resp, found 46, 115, 111 correct ones and 22, -11, 7 bad ones (the portuguese mistakes were less embarrassing than -the german ones). So, for a temporary substitute, we would choose -either the german or the portuguese patterns. - -And since you will be forced to make corrections by hand, here are the -complete actual rules of greek hyphenation: - -{\sl Let \math c_1,c_2,\dots,c_n\math\ be consonants \math (n\geq2)\math\ -and \math v_1,v_2,v_3,v_4\math\ vowels. Then we have} -\list[\parindent0pt\leftskip0pt\sl][\def\tagform#1{{\smc #1\enspace}}] - -\item[\tag{Rule 1.}] The combination \math v_1c_1v_2\math\ is -separated as \math v_1-c_1v_2\math\ {\rm(ex. $pa-ra-ka-l~w$)} - -\item[\tag{Rule 2.}] The combination \math v_1c_1\dots c_nv_2\math\ -is separated as \math v_1-c_1\dots c_nv_2\math\ {\bf if }there -is a greek word starting with \math c_1c_2\math\ $(l'a-sph, -ko-fte-r'oc),$ {\bf else }\math v_1c_1-c_2\dots c_nv_2\math\ -$(j'ar-roc, >eq-jr'oc)$ - -\item[\tag{Rule 3.}] The combinations of vowels \math v_1v_2, -v_1v_2v_3\math\ or \math v_1v_2v_3v_4\math\ are not to be separated -if they are pronounced as one phoneme $(>ah-d'o-ni$ but -$>a-'ht-th-toc$, $pi'o$ but $p'u-o).$ -\endlist - -S.~Levy made in his fonts separate characters of all possible accented -letters, to prevent problems of hyphenation (\TeX\ doesn't yet -hyphenate words with accents). The only exceptions he made, were the -two combinations $ \roughgrave{}, \smoothgrave{}$ which occur only on -monosyllables. - -In our case, to be able to reduce the fonts, we were forced to make -accents also of $\char\rq134$, $\char\rq100$, $"{}$, $"'{}$, $\I{}$ -(and macros of $\grave{}$, $\smoothgrave{}$, $\roughgrave{}$, -$\breve{}$, $\macron{}$, $\diaeresisgrave{}$, -$\diaeresiscircumflex{}$, $\rhorough$, $\rhosmooth$ as already -mentioned). This of course adds problems to hyphenation. -Nevertheless, $\char\rq134$, $\char\rq100$ occur on one- and -2-syllable words only, $"{}$, $"'{}$ occur rarely and $\I{}$ depends -on the kind of language one is writing (to find it, you have to go -back to older versions of $kajare'uousa$ as for example in the -following lovely text: - -\medskip - -{\tolerance=5000 -$ \advance\baselineskip1pt >En\I{~w} <esp'eran tin\grave{a} ->exantl'hsac t\grave{a} murol'ogi'a tou >ekoim~ato <o Froum'entioc ->ep\grave{i} t~hc >'ammou t~hc paral'iac, katab\grave{a}c >ex -o>uran~wn <o >ap'ostoloc >eke~inoc t~wn Sa\-x'o\-nwn >'hnoixe -di\grave{a} maqa'irac t\grave{a} st'hjh to~u koimwm'enou, e>is'hgage -to\grave{u}c <iero\grave{u}c dakt'ulouc tou e>ic \def\hhh{\grave{h}} -t\hhh n >op\hhh n ka\grave{i} >exag\grave{w}n t\hhh n kard'ian ->eb'ujisen a>ut'hn e>ic l'akkon pl'hrh <'udatoc, <'oper <hg'iasen -prohgoum'enwc. <H fl'egousa >eke'inh kard'ia >'efrixen e>ic -t\grave{o} <'udwr <wc smar\grave{i}c -\def\ooo{\grave{o}}% -\def\aaa{\grave{a}}% -\def\uuu{\grave{u}}% -\def\iii{\grave{i}}% ->ent\ooo c to~u thgan'iou, >afo~u d\grave{e} >ekr'uwsen, ->'ejese p'alin a>ut\hhh n <o <'agioc e>ic t\ooo n t'opon thc ka\iii\ -kle'isac t\hhh n plhg\hhh n >ep'estreyen e>ic t\ooo n >idik'on tou. - ->'Etuq'e pote, >anagn~wst'a mou, n\aaa\ >apokoimhj\I{~h}c m\grave{e} ->anup'oforon b~hqa, koim'wmenoc n\aaa\ <idr'ws\I{h}c ka\iii\ >exu\-pn'h\-sac -n\aaa\ e<urej\I{~h}c >iatreum'enoc? >Agno~wn <'oti e>~isai kal\aaa\ ->ano'igeic mhqanik~wc t\ooo\ st'oma, <'ina plh\-r'w\-s\I{h}c e>ic t\ooo n ->epikat'araton b~hqa t\ooo n sun'hjh f'oron. >All\aaa\ p'oshn a>isj'anesai -qar'an, m\hhh\ e<ur'iskwn e>ic t\ooo n l'a\-rugga t\ooo\ >oqlhr\ooo n -jhr'ion! O<'utw <'ama >'hnoixe ka\iii\ <o Frou\-m'entioc to\uuu c ->ofjalmo'uc, <htoim'asjh n\aaa\ prosf'e\-r\I{h} e>ic t\hhh n >aq'a\-riston ->Iw'annan t\hhh n sun'hjh dakr'uwn spo\-nd'hn, >all\aaa\ par\aaa\ p~asan -prosdok'ian o<i >ofjalmo'i tou e<u\-r'e\-jhsan xhro\iii\ ka\iii\ n\aaa\ -progeumat'is\I{h} m~allon \smoothgrave{h} n\aaa\ kla'us\I{h} -\I{>h}sj'a\-ne\-to >'orexin met\aaa\ polu'hmeron nhste'i\-an <o kal\ooo c -Be\-ne\-de\-kt~i\-noc. -$ -} - -\rightline{\sevenrm From Emmanouil~Ro\"\i dis' ``The Popess Johanna (1866)''} -\medskip - -Note that in one-accent greek, all accented letters are represented -by separate characters in the code table, so that no hyphenation -problem arises. - -$ -\gdef\tttt{ -Kaj'otan mprost'a thc ka'i t'hn k'uttaze. Noi'w\-jo\-ntac mi'a >ap'eranth - e>uqar'isthsh n'a t'hn bl'epei >'etsi mprost'a tou ka'i <'ena >ap'eranto - >ani\-ka\-no\-po'i\-h\-to po'u d'en mpo\-ro~u\-se n'a t'hn - tra\-b'h\-xei st'hn >agka\-li'a tou ka'i n'a t'hn fi\-l'h\-sei - >eke~i st'on laim'o - po'u t'hn e>~iqe fi\-l'h\-sei t'hn m'ia ka'i mo\-na\-di\-k'h - for'a ka'i e>~iqe - noi'w\-sei m'esa tou t'hn pi'o >'omor\-fh stig\-m'h to~u ka\-lo\-kai\-rio~u - ki <'oti - t'o ka\-lo\-ka'i\-ri a>u\-t'o, ft'a\-no\-ntac st'o >apo\-ko\-r'u\-fw\-m'a - tou, e>~iqe ki'o\-lac pe\-r'a\-sei. >All'a d'en e>~iqe >ak'oma - pe\-r'a\-sei tele'iwc, giat'i >eke'inh bris\-k'o\-tan t'wra mpro\-st'a - tou. Ka'i d'en mpo\-ro~u\-se n'a k'anei t'i\-po\-ta. -} -$ - - -\head * Samples, Tables, and Remarks * - -\head * The font {\tt rgrrg10} * -$\tttt$ - -\head * The font {\tt rgrbf10} * -$\bf\tttt$ - -\head * The font {\tt rgrsl10} * -$\sl\tttt$ - -\figure[\top] -\raggedcenter -Layout for fonts |rgrrg|, |rgrbf|, |rgrsl| -$\table$ -\endfigure - -$\monotoniko -\gdef\ttttt -{ -Kaj'otan mprost'a thc kai thn k'uttaze. Noi'w\-jo\-ntac mia >ap'eranth - e>uqar'isthsh na thn bl'epei >'etsi mprost'a tou kai <'ena >ap'eranto - >ani\-ka\-no\-po'i\-h\-to pou den mpo\-ro~u\-se na thn - tra\-b'h\-xei sthn >agka\-li'a tou kai na thn fi\-l'h\-sei - >eke~i ston laim'o - pou thn e>~iqe fi\-l'h\-sei thn m'ia kai mo\-na\-di\-k'h - for'a kai e>~iqe - noi'w\-sei m'esa tou thn pio >'omor\-fh stig\-m'h tou ka\-lo\-kai\-rio~u - ki <'oti - to ka\-lo\-ka'i\-ri a>u\-t'o, ft'a\-no\-ntac sto >apo\-ko\-r'u\-fw\-m'a - tou, e>~iqe ki'o\-lac pe\-r'a\-sei. >All'a den e>~iqe >ak'oma - pe\-r'a\-sei tele'iwc, giat'i >eke'inh bris\-k'o\-tan t'wra mpro\-st'a - tou. Kai den mpo\-ro~u\-se na k'anei t'i\-po\-ta. -} -$ - - -\figure[\bot] -\raggedcenter -Layout for fonts |mrgrrg|, |mrgrbf|, |mrgrsl| -$\monotoniko\table$ -\endfigure - -\head * The font {\tt mrgrrg10} * -$\monotoniko\ttttt$ - -\head * The font {\tt mrgrbf10} * -$\monotoniko\bf\ttttt$ - -\head * The font {\tt mrgrsl10} * -$\monotoniko\sl\ttttt$ - - -\figure[\top] -\raggedcenter -Layout for font |rgrsc| -$\smc\table$ -\endfigure - - -We conclude with the following remark: people writing french, czech, -turkish or other languages with many diacritical marks complain that -there is no space left in Computer Modern to incorporate -already-accented letters. The solution (in the case of French) that -D\'esarm\'enien\refersto7 proposed, was to replace greek uppercase -letters by the french \'e, \`e, \^ e, \^ o, \^\i, \^ a, \^ u, \`a, -\`u. But then the question is: where to put the greek uppercase -letters, which are necessary for mathematical formulas. We answer: if -you have the greek |rgr| family of fonts, you already have all kinds -of greek uppercase letters. Just take them from there! Of course, -math families must be restructured in that case since math family~7 -cannot be used for those letters anymore. As Gariepy\refersto8 -pointed out already, the inconvenience with this solution is that for -every language with accents you will need another |cm| family of -fonts. That's why we still believe that the best once and for all -solution would be to be able to work with fonts of 256 characters. - - -\head * Improvements and changes -- version 1.1 (as of March 4, 1990) * - -(by the first author)\medskip - -\noindent An hyphenation list has been added. -Greek grammar has changed very often in -the last 20 years, mainly because greek is a very manifold language (some -people find it {\it chaotic}, I find it {\it beautiful\/}). I followed the -hyphenation rules of \refersto2\ as presented in section ``On hyphenation'' -of this paper. These rules -are very simple and hold as well for the multi-accent as for the one-accent -system. I found exactly 1168 patterns; many of them came simply from the -following fact: since |'|,|~|,|>|,|<| are of category 11 during hyphenation, -|<'o-so| could occur. This leaves $<'o$ alone, which is rather ugly. - -Italics fonts (|rgrti| and |mrgrti|) have been added. -Since in the |cm| family, -|cmti| has almost the same lowercase letters as |cmmi| and the same uppercase -ones as |cmsl|, I tried to do the same. Some changes were necessary: 1) the -handwritten modern greek alpha looks more like {\it a} and 2) tau's stem has a -hook. There is still some kerning to do. I call this version {\it -``experimental''}. Maybe in some later (1.2?) version there will be an entirely -new italics font. - -In the |rgrsc| font (as you can see in the table) the symbols $\rhorough, -\rhosmooth, \Digamma$ and $\vardigamma$ exist now in all styles: regular, -slanted, italic and boldface. \TeX\ will know which one to choose, depending on -the font you are using (inside |greekmode|). If you add some new style (for -example typewriter or sans-serif) 1) please let me know, 2) add these four -letters in |rgrsc|, 3) add the information in |greekmacros.tex|. - -There is |\smallDigamma| for the small capital digamma $\smallDigamma$. Some -people still persist in calling it {\it ``ef''}. Also there are two new -symbols: - -1) following an advice of my father, I added a variation $\varqoppa$ -of lowercase qoppa. This symbol is used in our days for the numeral 90 (the -current year is $\understroke a\sanpi\varqoppa$). The macro for $\varqoppa$ is -|\varqoppa|. - -2) a funny ``upside-down'' iota with circumflex $\inviota$ (the macro is -|\inviota|). This symbol was used in the last century for the sound of $i$ in -$gi'a$ (cf. ``$pi'o$'' in hyphenation {\smc rule 3}). Here is an example -of such a text, taken from a 1907 edition\refersto9: - -\let\w=\grave -$ -{\ninergr -\frenchspacing -\parindent0pt -\advance\baselineskip1.0pt -\tolerance=5000 -\obeylines -Kair\w oc f'ernei t\w a l'aqana, kair\w oc t\w a parapo'ul\inviota a, -M\w e t\w on kair\w o ka\w i t\w o dendr\w i k'anei karp\w o ka\w i f'ulla. ->'A"inte, >or'e, m\inviota\w a kopan\inviota\w a s>'an n>~atan qulop'hta, -N\w a ''p\inviota\I{~h}c t\w hn Gk'olfw j'arreuec? -D\w en e>~in'' mall\inviota\w a t\w a g'ene\inviota a. -J'el''<h >ag'ap'' >apomon\w h ki''>ahto~u grhgorws'unh. -J'elei lago~u pat'hmata, >allo\inviota ~wc <uge\inviota\w a s''>af'inei. -X'ereic t'i magar'oplash po~u e>~inai \I{<h} guna~ikec? -$ -\rightline{\sevenrm From Spyridon Peresiadis's ``I Golfo"} -} - -\smallskip - -Finally I inserted the logos $\grMF$ and $\MF$ in the |rgrsc| font (the macros -are |\grMF| and the usual |\MF|). There is still no PASCAL word processor -program to detect monosyllabes, volunteers are welcome. This upgrading has been -done on a Macintosh SE/30 using Andrew Trevorrow's Oz\TeX\ and Victor -Ostromoukhov's Mac$\MF$. - - -\setbox0=\hbox{22. } -\thehangindent=\wd0 -\def\referred#1{\par\hangindent\thehangindent\noindent - \hbox to \thehangindent{\hss#1.\ }\ignorespaces} -\raggedright - -\head * References * - -\referred1 {\smc S.Levi}: Using Greek Fonts with \TeX, {\sl TUGboat}, -{\bf 9} (1988) 20--24 -%\referred2 $\monotoniko {\smc M.Triantafullidh:} Grammatik'h -\referred2 $\monotoniko {\smc M.Triantafullidh:} -{\rg Neoellhnik'h Grammatik'h, } -{\sl Organism'oc 'Ek\-do\-shc Sqolik'wn Bibl'iwn}, -Aj'hna 1982$ -\referred3 {$\smc Q.Mhqiwth:$} $Ne'wtaton Lexik'on t~hc Neoellhnik~hc Gl'wsshc, -{\sl >Ek\-d'o\-seic Kastal'ia}, >Aj~hnai 1972$ -\referred4 {\smc C.B.Boyer}: A History of Mathematics, {J.\ Wiley \& -Sons,} New~York 1968 -\referred5 ${\smc H.Gewrgiou:} Gel'oklam'an, {\sl Seir'a Kupriak~hc -La"ik~hc Po'ihshc <Upourge'iou paide'iac\/} {\bf 4}, Leukws'ia 1980$ -\referred6 {\smc Unix} \TeX\ distribution tape, Seattle 1988 -\referred7 {\smc J.D\'esarm\'enien:} How to run \TeX\ in a French -environment: hyphenation, fonts, typography, {\sl TUGboat}, {\bf 5} (1984) -91--102 -\referred8 {\smc A.Gariepy:} French in \TeX, {\sl TUGboat}, {\bf 9} -(1988) 65--69 -\referred9 {$\smc S.Peresiadhc:$} $<H Gk'olfw. Dr'ama e>idulliak\w on e>ic -pr'axeic p'ente, {\sl >Ekdotik\w oc O>~ikoc Gewrg'iou F'exh,} >Aj~hnai 1907$ - - -\makesignature -\endarticle - -% version 19.6.1989 - -\hbox{Yannis Haralambous} -\hbox{Universit\'e de Lille--Flandres--Artois} -\smallskip -\hbox{Klaus Thull} -\hbox{Freie Universit\"at Berlin} -------- - diff --git a/Master/texmf-dist/doc/plain/yannisgr/rgrtestfont.tex b/Master/texmf-dist/doc/plain/yannisgr/rgrtestfont.tex deleted file mode 100644 index 4b4b770f71b..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/rgrtestfont.tex +++ /dev/null @@ -1,274 +0,0 @@ -% This file is based on Knuth's and Levy's "testfont"files -% -% The text is taken from the book of Kwsto'ula Mhtropo'ulou, Za'ar 19. -% -\tracinglostchars=0 -\tolerance=1000 -\raggedbottom -\nopagenumbers -\parindent=0pt -\newlinechar=`@ -\input rgreekmacros %not necessary if you have a greek format - -\newcount\m \newcount\n \newcount\p \newdimen\dim -\chardef\other=12 - -\def\today{\ifcase\month\or - January\or February\or March\or April\or May\or June\or - July\or August\or September\or October\or November\or December\fi - \space\number\day, \number\year} -\def\hours{\n=\time \divide\n 60 - \m=-\n \multiply\m 60 \advance\m \time - \twodigits\n\twodigits\m} -\def\twodigits#1{\ifnum #1\lt10 0\fi \number#1} - -{\catcode`\|=0 \catcode`\\=\other -|gdef|help{|message{% -\init switches to another font;@% -\end or \bye finishes the run;@% -\table prints the font layout in tabular format;@% -\text prints a sample text, assuming TeX text font conventions;@% -\sample combines \table and \text;@% -\mixture mixes a background character with a series of others;@% -\alternation interleaves a background character with a series;@% -\alphabet prints all lowercase letters within a given background;@% -\alphabets does one \alphabet for each lowercase background letter;@% -\ALPHABET prints all uppercase letters within a given background;@% -\ALPHABETs does one \ALPHABET for each uppercase background letter;@% -\accents prints all lowercase vowels with accents and breathings;@% -\series prints a series of letters withing a given background;@% -\lowers prints a comprehensive test of lowercase;@% -\uppers prints a comprehensive test of uppercase;@% -\digits prints a comprehensive test of numerals;@% -\math prints a comprehensive test of TeX math italic;@% -\names prints a text that mixes upper and lower case;@% -\punct prints a punctuation test;@% -\bigtest combines many of the above routines;@% -\help repeats this message;@% -and you can use ordinary TeX commands (e.g., to \input a file).}}} - -\def\setbaselineskip{\setbox0=\hbox{\n=0 -\loop\char\n \ifnum \n\lt255 \advance\n 1 \repeat} -\baselineskip=6pt \advance\baselineskip\ht0 \advance\baselineskip\dp0 } - -\def\setchar#1{{\escapechar-1\message{\string#1 character = }% - \def\do##1{\catcode`##1=\other}\dospecials - \read-1 to\next - \expandafter\finsetchar\next\next#1}} -\def\finsetchar#1#2\next#3{\global\chardef#3=`#1 - \ifnum #3=`\# \global\chardef#3=#2 \fi} -\def\promptthree{\setchar\background - \setchar\starting \setchar\ending} - -\def\init{\message{@Name of the font to test = } - \read-1 to\fontname - \font\testfont=\fontname - \headline={\sevenrm Test of \fontname\unskip\ on \today\ at \hours\hfil - Page \folio} - \testfont \setbaselineskip - \ifdim\fontdimen6\testfont\lt10pt \rightskip=0pt plus 20pt - \else\rightskip=0pt plus 2em \fi - \spaceskip=\fontdimen2\testfont % space between words (\raggedright) - \xspaceskip=\fontdimen2\testfont \advance\xspaceskip by\fontdimen7\testfont - \message{Now type a test command (\string\help\space for help):}} - -\def\mixture{\promptthree \domix\mixpattern} -\def\alternation{\promptthree \domix\altpattern} -\def\mixpattern{\0\1\0\0\1\1\0\0\0\1\1\1\0\1} -\def\altpattern{\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0} -\def\domix#1{\par\chardef\0=\background \n=\starting - \until\ifnum\n=\ending\do\chardef\1=\n #1\par\n=\count\n \repeat} - -\count`w=`a\count`a=`b\count`b=`g\count`g=`d\count`d=`e\count`e=`z -\count`z=`h\count`h=`j\count`j=`i\count`i=`k\count`k=`l\count`l=`m -\count`m=`n\count`n=`x\count`x=`o\count`o=`p\count`p=`r\count`r=`c -\count`c=`t\count`t=`u\count`u=`f\count`f=`q\count`q=`y\count`y=`w -\count`W=`A\count`A=`B\count`B=`G\count`G=`D\count`D=`E\count`E=`Z -\count`Z=`H\count`H=`J\count`J=`I\count`I=`K\count`K=`L\count`L=`M -\count`M=`N\count`N=`X\count`X=`O\count`O=`P\count`P=`R\count`R=`S -\count`S=`T\count`T=`U\count`U=`F\count`F=`Q\count`Q=`Y\count`Y=`W -\count`0=`1\count`1=`2\count`2=`3\count`3=`4\count`4=`5 -\count`5=`6\count`6=`7\count`7=`8\count`8=`9\count`9=`0 - -\long\def\until#1\do#2\repeat{\def\body{#2}\def\cond{#1}\etareti} -\def\etareti{\cond\let\next=\relax\else\let\next=\etareti\fi\body\next} - -\def\alphabet{\setchar\background \dosseries{`a}{`w}} -\def\ALPHABET{\setchar\background \doseries{`A}{`W}} -\def\series{\promptthree \doseries\starting\ending} -\def\doseries#1#2{\def\!{\discretionary{\background}{\background}{\background}} - \!\n=#1\until\ifnum\n=#2\do\char\n\!\n=\count\n \repeat\par} -\def\dosseries#1#2{\def\!{\discretionary{\background}{\background}{\background}} - \!\n=#1\until\ifnum\n=#2\do\char\n\!\n=\count\n \repeat s\par} - -\def\lowers{\docomprehensive hs{`a}{`w}} -\def\uppers{\docomprehensive HO{`A}{`W}} -\def\digits{\docomprehensive H0{`0}{`9}} -\def\docomprehensive#1#2#3#4{\par\n=#3 - \until\ifnum\n=#4\do\line{\altr#1\hfil\altr#2}\n=\count\n\repeat} -\def\altr#1{\setbox0=\hbox{#1}\setbox2=\hbox{#1\char\n}% - \dim=.5\hsize \advance\dim-\wd0 \divide\dim\wd2 \multiply\dim\wd2 - \xleaders\box2\hskip\dim\box0} -\def\alphabets{\m=`a\until\ifnum\m=`w - \do\chardef\background=\m{\dosseries{`a}{`w}}\m=\count\m \repeat} -\def\ALPHABETS{\m=`A\until\ifnum\m=`W - \do\chardef\background=\m{\doseries{`A}{`W}}\m=\count\m \repeat} - -\def\separator{\vfil\penalty-100\vfilneg - \medskip\leaders\hrule height.4pt\vskip.4pt\medskip} - -\def\bigtest{% -\sample\vfil\break -\accents\separator -\names\separator -\punct\separator -\alphabets\separator -\lowers\separator -\uppers\separator -\digits} - -\def\math{\message{(Sorry, that's not here yet.)}} - -\def\oct#1{\hbox{\tenrm\'{}\kern-.2em\tenit#1\/\kern.05em}} % octal constant -\def\hex#1{\hbox{\tenrm\H{}\tentt#1}} % hexadecimal constant -\def\setdigs#1"#2{\gdef\h{#2}% \h=hex prefix; \0\1=corresponding octal - \m=\n \divide\m by 64 \xdef\0{\the\m}% - \multiply\m by-64 \advance\m by\n \divide\m by 8 \xdef\1{\the\m}} -\def\testrow{\setbox0=\hbox{\penalty 1\def\\{\char"\h}% - \\0\\1\\2\\3\\4\\5\\6\\7\\8\\9\\A\\B\\C\\D\\E\\F% - \global\p=\lastpenalty}} % \p=1 if none of the characters exist -\def\oddline{\cr - \noalign{\nointerlineskip} - \multispan{19}\hrulefill& - \setbox0=\hbox{\lower 2.3pt\hbox{\hex{\h x}}}\smash{\box0}\cr - \noalign{\nointerlineskip}} -\newif\ifskipping -\def\evenline{\loop\skippingfalse - \ifnum\n\lt128 \m=\n \divide\m 16 \chardef\next=\m - \expandafter\setdigs\meaning\next \testrow - \ifnum\p=1 \skippingtrue \fi\fi - \ifskipping \global\advance\n 16 \repeat - \ifnum\n=128 \let\next=\endchart\else\let\next=\morechart\fi - \next} -\def\morechart{\cr\noalign{\hrule} - \chartline \oddline \m=\1 \advance\m 1 \xdef\1{\the\m} - \chartline \evenline} -\def\chartline{&\oct{\0\1x}&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&} -\def\chartstrut{\lower4.5pt\vbox to14pt{}} -\def\table{$$\global\n=0 - \halign to\hsize\bgroup - \chartstrut##\tabskip0pt plus10pt& - &\hfil##\hfil&\vrule##\cr - \lower6.5pt\null - &&&\oct0&&\oct1&&\oct2&&\oct3&&\oct4&&\oct5&&\oct6&&\oct7&\evenline} -\def\endchart{\cr\noalign{\hrule} - \raise11.5pt\null&&&\hex 8&&\hex 9&&\hex A&&\hex B& - &\hex C&&\hex D&&\hex E&&\hex F&\cr\egroup$$\par} -\def\:{\setbox0=\hbox{\char\n}% - \ifdim\ht0>7.5pt\reposition - \else\ifdim\dp0>2.5pt\reposition\fi\fi - \box0\global\advance\n 1 } -\def\reposition{\setbox0=\vbox{\kern2pt\box0}\dim=\dp0 - \advance\dim 2pt \dp0=\dim} -\def\centerlargechars{ - \def\reposition{\setbox0=\hbox{$\vcenter{\kern2pt\box0\kern2pt}$}}} - -\begingreek - -\def\accents{\longseries a\shortseries e\longseries h\mediumseries i -\shortseries o\mediumseries u\longseries w \rseries} -\def\longseries#1{#1 `#1 '#1 ~#1 #1| `#1| '#1| ~#1| <#1 <`#1 <'#1 <~#1 <#1| - <`#1| <'#1| <~#1| >#1 >`#1 >'#1 >~#1 >#1| >`#1| >'#1| >~#1| \par} -\def\shortseries#1{#1 `#1 '#1 <#1 <`#1 <'#1 >#1 >`#1 >'#1 \par} -\def\mediumseries#1{#1 `#1 '#1 ~#1 % - <#1 <`#1 <'#1 <~#1 >#1 >`#1 >'#1 >~#1 "#1 "`#1 "'#1 "~#1 \par} -\def\rseries{r <r >r\par} -\def\names{ >Afrod'ith Beatr'ikh Gi'annhc Dhm'htrhc E>ugen'ia - Zw'h <Hrakl~hc Je'ofiloc >Iw'anna Kl'aouc Louk~ac - Mar'ia N'ikh Xanjo'ula O>id'ipouc Pl'atwn Rox'anh S'ilbio - Ter'eza <Upat'ia F'ilippoc Qar'a Yuq'h >Wrig'enhc \par} -\def\punct{{\hyphenpenalty=10000\par\dopunct{ka'i}\dopunct{t~hs}\dopunct{<'ena} - \dopunct{<ELLAS}\par}} -\def\dopunct#1{#1, #1: #1; ''#1'' #1? #1! ((#1)) (#1) [#1] #1* #1.\par} -\def\from#1{{\sevenrm\unskip\nobreak\hfil\penalty50\hskip2em\hbox{} - \nobreak\hfil (From #1)\parfillskip=0pt\finalhyphendemerits=0 \par}} - -\def\text{{\advance\baselineskip-4pt -\setbox0=\hbox{abcdefghijklmnopqrstuvwxyz} -\ifdim\hsize\gt2\wd0 \ifdim 15pc\gt2\wd0 \hsize=15pc \else \hsize=2\wd0 \fi\fi -((T'o br~hka!)) f'wnaxe. ((T'o br~hka! E>~isai <'ena pr'oswpo m'esa >ap'o -<'ena bibl'io po'u pot'e d'en gr'afthke, giat'i >eg'w prosp'ajhsa, >eg'w -m'ono, ka'i m''a>ut'h t'h nekr'h gl'wssa ka'i d'en mp'oresa n'a t'o p~w, n'a -t'o fti'axw, d'en mp'oresa pot'e, giat'i <h gl'wssa e>~inai nekr'h, ->endi'amesh, mi'a gl'wssa gi'a poiht'ec, gi'a >anjr'wpouc po'u >oneire'uontai -s'an a>ut'o t'o paid'i, t'on >Ast'erh po'u to~u f'ortwsan >'adika du'o -jan'atouc ka'i d'en m'ilhse. D'en e>~inai mi'a gl'wssa gi'a >emp'orio to'uth ->ed~w <h dik'h mou ka'i gi''a>ut'o d'en s'e >anagn'wrise kan'enac <'otan -milo~usa gi'a s'ena. D'en j'a mporo~use pot'e n'a e>~inai s'ugqronh <h pr'axh -m'e t'h fantas'ia. Pot'e >'idia <h pragmatik'h <istor'ia m'e t'h nekr'h -gl'wssa. Pot'e. T'a pr'oswpa <up'hrxane, na'i, e>~inai >al'hjeia, <up'hrxane ->all'a pot'e s'e sq'esh m'e t'hn pragmatik'othta po'u dihg'hjhka m'e t'h -nekr'h, >'aqrhsth gl'wssa t~wn qam'enwn >Etro'uskwn. <Up'hrxane s'e qr'ono -ka'i q~wro parwqhm'eno, >'asqeto, qr'ono mhd'en, pr'oswpa po'u <h -pragmatik'othta <h dik'h mac t'a e>~iqe de~i >alli~wc. Ka'i m'ono >es'u, -m'ono >es'u e>~isai mis'oc, e>~isai KANENAS, giat'i >eg'w d'en pr'oftasa -n'a s'e k'anw >al'hjeia, >eg'w d'en mp'oresa n'a s'e k'anw pr'oswpo -<uparkt'o m'esa >ap'o t'h fjor'a. E>~isai <'ena pr'oswpo m'esa >ap'o <'ena -mujist'orhma po'u pot'e d'en gr'afthke giat'i <h gl'wssa a>ut'h e>~inai -m'ono gi'a t'oso, t'oso l'igo, <'oso >~htan o<i 19 m'erec s'e ke~ino t'o -Sept'embrh ka'i >'etsi >~htan po'u s''>'afhsa mis'o, s''<'ena trago'udi -m'esa, s'e mi'a l'exh pali'a, s''<'ena >anastenagm'o, s'e mis'o >'oneiro -spasm'eno. S''>'afhsa >'etsi ka'i d'en >'eginec pot'e mi'a >al'hjeia gi'a -to'uc >'allouc, gi'a to'uc tr'itouc, gi'a to'uc logiko'uc, gi'a <'osouc -rwto~usan gi'a s'ena, gi'a t'h guna'ika sou >ak'oma po'u nom'izei p'wc s'e -x'erei ka'i d'en x'erei t'ipota >ap'o s'ena. >Eg'w fta'iw >ag'aph mou ka'i -p'ali >ag'aph j'a so~u''dina ka'i l'exeic nekr'ec, >'aqrhstec ka'i -m''a>ut'ec j'a prospajo~usa, j'a >'hjela n'a g'ineic <'ena >ast'eri ka'i mi'a -ter'astia fwtein'h gramm'h st'hn >'akrh to~u k'osmou, >en~w >es'u mo~u -mil~ac gi'a qrus'afi ka'i p'wc gi''a>ut'o t'o mis'o qrus'afi, mis'o ka'i -klemm'eno, sk'otwsec du'o >aj'wouc, du'o x'enouc, du'o zw'ec, >es'u, t'o ->'astro mou ka'i t'o f~wc mou. M'ilhs'e mou loip'on, p'ec mou p'wc >'eqw ->'adiko ka'i p'wc d'en e>~inai gi'a s'ena <'ola to~uta, p'ec mou t'hn ->al'hjeia >'h <'ena y'ema, p'ec mou, p'ec mou Za'ar >ag'aph mou...)) - -Logik'oc. M'e t'ic l'exeic metrhm'enec. Du'o, t'esseric, >oqt'w, d'wdeka. <O ->'erwt'ac tou kr'athse <'oso krat~ane o<i >epoq'ec. Mi'a >epoq'h. M'e broq'ec -ka'i ke~ino t'o jamp'o k'itrino <'hlio. Sept'embrhc. <'Enac. M'ono. Met'a -xanag'urise st'o sp'iti tou. X'enoc. Ka'i m'onoc. Ka'i >'emeine >eke~i. -X'eqase. >'H o>'ute ki a>ut'o. P'erase st'hn >'allh >'oqjh, st'o pot'ami, -p'anta t'o''lege p'wc <h >'allh >'oqjh e>~inai <h pi'o e>'ukolh. >'Oqi a>ut'h ->ed~w po'u t'hn perpat~ame. <H >'allh. A>ut'h po'u d'en t'hn x'eroume >ak'oma. -Za'ar, t'o d'eqthke n'a t'on l'eei m'ono >eke'inh. Na'i e>~iqe skot'wsei. Du'o ->aj'wouc. >'Enoqouc. D'en e>~iqe shmas'ia. >'Afhse n'a <upoyiasto~un t'on ->Ast'erh. >Eke~inoc >'agnwstoc. Ka'i m'ono gi'a t'o qrus'afi milo~use. <O ->Ast'erhc j'a pono~use. <'Opwc p'onese >eke'inh. >'Oqi, d'en >'hjele n'a -pon~ane o<i >'anjrwpoi. >'Oqi po'u noiaz'otan. >'Oqi po'u d'en t'o >'anteqe. -<'Omwc fob'otan. Fob'otan pol'u k'aje for'a po'u >'emene m'onoc m'e t'on -<eaut'o tou. Ka'i <h logik'h d'en >'eftane. T'ote, d'en >'eftane <h logik'h. ->'Htane gi'a to'uc pol'u >aj'wouc a>ut'h <h logik'h. A>ut'oc tetrag'wnize to'uc -k'uklouc. T'esseric gwn'iec. M'ia, d'uo, tre~ic, t'esseric. Gwn'ies. <'Olec. -Ka'i <h logik'h tou. <O >'erwt'ac tou m'ono mi'a >epoq'h. - -((>Eg'w d'en >erwte'uomai)) e>~iqe pe~i. D'en t'on e>~iqe pist'eyei. >~Htan <o -k'itrinoc jamp'oc Sept'embrhc ka'i <h l'imnh ka'i o<i stajmo'i ka'i o<i n'uqtec -m'e t'on >'erwta. D'en t'on e>~iqe pist'eyei. - -((T'i >'eqeic n'a mo~u pe~ic t'wra? S''t'o e>~iqa pe~i. <H gl'wssa po'u ->epim'eneic n'a mil~ac, <h dik'h sou <h gl'wssa e>~inai >'aqrhsth >entel~wc -ka'i d'en mpore~i kan'enac n'a t'hn zwntan'eyei. >Eg'w >'emeina p'anta <o -x'enoc, t'o e>~idec, t'o x'ereic, t'o''majec pi'a. Giat'i >epim'eneic? T'i -zht~ac >ap'o m'ena? >Eg'w >'etsi <'opwc e>~imai ftiagm'enoc d'en qwr'aw s'e -kan'ena >'oneiro, d'en qwr'aw s'e kami'a nekr'h di'alekto. E>~imai <o x'enoc -ka'i d'en j'a s''>anagnwr'izw s'e l'igo. D'en j'a x'erw giat'i ka'i p~wc ka'i -p'oso m''>ag'aphsec. Ka'i j'a''jela st''>al'hjeia n'a mo~u t'o pe~ic a>ut'o: -Nom'izeic <'oti m''>ag'amhsec? >Es'u, >em'ena!! M'a poi'a sq'esh j'a mporo~use -n'a <up'arqei >an'ames'a mac? M'ila mou. S'>ako'uw. E>~imai <o x'enoc. >'Emeina -<o x'enoc. K'anenac d'en kat'alabe t'hn >erhmi'a mou. Pot'e. M'onoc ka'i -x'enoc. Ka'i s'e koit'azw st'a m'atia. P~wc s'e l'ene? Poi'a e>~isai? Giat'i -s''>ar'esei n'a >epim'eneic <'oti m''>ag'aphsec? T'i x'ereic >es'u >ap'o -m'ena?))}} - -\def\sample{\names\table\text} - -\init - diff --git a/Master/texmf-dist/doc/plain/yannisgr/tomakeformat.txt b/Master/texmf-dist/doc/plain/yannisgr/tomakeformat.txt deleted file mode 100644 index b2f85c8fdcf..00000000000 --- a/Master/texmf-dist/doc/plain/yannisgr/tomakeformat.txt +++ /dev/null @@ -1,26 +0,0 @@ -% Hyphenation, miscellaneous macros, and initial values for standard layout -\message{hyphenation} - -\def\lt{<}\def\gt{>} -\catcode`\<=11 -\catcode`\>=11 -\catcode`\'=11 -\catcode`\~=11 -\catcode`\"=11 -\lccode`\<=`\<% -\lccode`\>=`\>% -\lccode`\'=`\'% -\lccode`\~=`\~% -\lccode`\"=`\"% - -\input grhypha - -\catcode`\<=12 -\catcode`\>=12 -\catcode`\'=12 -\catcode`\~=13 -\catcode`\"=12 - -\message{greekmacros v1.1} -\input rgreekmacros - |