summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/wnri-latex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex/contrib/wnri-latex
Initial commit
Diffstat (limited to 'macros/latex/contrib/wnri-latex')
-rw-r--r--macros/latex/contrib/wnri-latex/README20
-rw-r--r--macros/latex/contrib/wnri-latex/wnri.def164
-rw-r--r--macros/latex/contrib/wnri-latex/wnri.dtx260
-rw-r--r--macros/latex/contrib/wnri-latex/wnri.ins38
-rw-r--r--macros/latex/contrib/wnri-latex/wnri.pdfbin0 -> 197774 bytes
-rw-r--r--macros/latex/contrib/wnri-latex/wnritest.tex63
6 files changed, 545 insertions, 0 deletions
diff --git a/macros/latex/contrib/wnri-latex/README b/macros/latex/contrib/wnri-latex/README
new file mode 100644
index 0000000000..880dbd1b10
--- /dev/null
+++ b/macros/latex/contrib/wnri-latex/README
@@ -0,0 +1,20 @@
+Washington Roman Indic for LaTeX2e (wnri-latex)
+(package is currently unmaintained)
+
+Anshuman Pandey 19 February 1998
+
+This package contains the source files:
+
+ wnri.def Alternative (?) definitions
+ wnri.dtx Documentation and file notes
+ wnri.ins Installation script
+ wnritest.tex Example of WNRI fonts using 8-bit text
+
+ot1wn*.fd and wnri.sty files are generated from the dtx.
+
+This package provides the style package and the font
+definition file to enable the Washington Roman Indic
+fonts to be used with LaTeX2e.
+
+The entire package is released under the GNU GPL, either version 2, or
+(at your option) any later version.
diff --git a/macros/latex/contrib/wnri-latex/wnri.def b/macros/latex/contrib/wnri-latex/wnri.def
new file mode 100644
index 0000000000..5fcf60262c
--- /dev/null
+++ b/macros/latex/contrib/wnri-latex/wnri.def
@@ -0,0 +1,164 @@
+% Washington Romanized Indic character definition file
+% 19 February 1998
+% Released under GNU GPLv2+.
+
+
+ \ProvidesFile{wnri.def}
+\ProvideTextCommandDefault{\textregistered}{\textcircled{\textsc r}}
+\ProvideTextCommandDefault{\textonequarter}{$\frac14$}
+\ProvideTextCommandDefault{\textonehalf}{$\frac12$}
+\ProvideTextCommandDefault{\textthreequarters}{$\frac34$}
+\ProvideTextCommandDefault{\textflorin}{\textit{f}}
+\providecommand{\mathdegree}{{{}^\circ}}
+\providecommand{\mathonesuperior}{{{}^1}}
+\providecommand{\mathtwosuperior}{{{}^2}}
+\providecommand{\maththreesuperior}{{{}^3}}
+\providecommand{\mathordmasculine}{{{}^o}}
+\providecommand{\mathordfeminine}{{{}^a}}
+
+% \diatop[] macro (c) Christina Thiele, Ottawa. (from TeXniques 5)
+% Tested by Peter J. Olivier. Last change: 4th August 1988.
+
+\def\diatop[#1|#2]{{\leavevmode\setbox1=\hbox{{#1{}}}\setbox2=\hbox{{#2{}}}%
+ \dimen0=\ifdim\wd1>\wd2\wd1\else\wd2\fi%
+ \dimen1=\ht2\advance\dimen1by-1ex%
+ \setbox1=\hbox to1\dimen0{\hss#1\hss}%
+ \rlap{\raise1\dimen1\box1}%
+ \hbox to1\dimen0{\hss#2\hss}}}%
+
+\DeclareInputText{"080}{\c C} % 128 €
+\DeclareInputText{"081}{\"u} % 129 
+\DeclareInputText{"082}{\'e} % 130 ‚
+\DeclareInputText{"083}{\^a} % 131 ƒ
+\DeclareInputText{"084}{\"a} % 132 „
+\DeclareInputText{"085}{\`a} % 133 …
+\DeclareInputText{"086}{\aa} % 134 †
+\DeclareInputText{"087}{\c c} % 135 ‡
+\DeclareInputText{"088}{\^e} % 136 ˆ
+\DeclareInputText{"089}{\"e} % 137 ‰
+\DeclareInputText{"08A}{\`e} % 138 Š
+\DeclareInputText{"08B}{\"\i} % 139 ‹
+\DeclareInputText{"08C}{\^\i} % 140 Œ
+\DeclareInputText{"08D}{\`\i} % 141 
+\DeclareInputText{"08E}{\"A} % 142 Ž
+\DeclareInputText{"08F}{\AA} % 143 
+
+\DeclareInputText{"090}{\'E} % 144 
+\DeclareInputText{"091}{\ae} % 145 ‘
+\DeclareInputText{"092}{\AE} % 146 ’
+\DeclareInputText{"093}{\^o} % 147 “
+\DeclareInputText{"094}{\"o} % 148 ”
+\DeclareInputText{"095}{\`o} % 149 •
+\DeclareInputText{"096}{\^u} % 150 –
+\DeclareInputText{"097}{\`u} % 151 —
+\DeclareInputText{"098}{\"y} % 152 ˜
+\DeclareInputText{"099}{\"O} % 153 ™
+\DeclareInputText{"09A}{\"U} % 154 š
+\DeclareInputText{"09B}{\=e} % 155 ›
+\DeclareInputText{"09C}{\=E} % 156 œ
+\DeclareInputText{"09D}{\=o} % 157 
+\DeclareInputMath{"09E}{\=O} % 158 ž
+\DeclareInputText{"09F}{\b{r}} % 159 (CSX) Ÿ
+\DeclareInputText{"0A0}{\'a} % 160  
+\DeclareInputText{"0A1}{\'\i} % 161 Ą
+\DeclareInputText{"0A2}{\'o} % 162 ĸ
+\DeclareInputText{"0A3}{\'u} % 163 Ŗ
+\DeclareInputText{"0A4}{\~n} % 164 ¤
+\DeclareInputText{"0A5}{\~N} % 165 Ĩ
+\DeclareInputMath{"0A6}{\~l} % 166 (CSX) Ļ
+\DeclareInputMath{"0A7}{\.m} % 167 (CSX) §
+\DeclareInputText{"0A8}{\diatop[\symbol{"08}|\=a]} % 168 (CSX) ¨
+\DeclareInputText{"0A9}{\diatop[\symbol{"08}|\=\i]} % 169 (CSX) Š
+\DeclareInputText{"0AA}{\diatop[\symbol{"08}|\=u]} % 170 (CSX) Ē
+\DeclareInputText{"0AB}{\v{z}} % 171 (WNR) Ģ
+\DeclareInputText{"0AC}{\v{Z}} % 172 (WNR) Ŧ
+\DeclareInputText{"0AD}{\b{n}} % 173 (CSX) ­
+\DeclareInputText{"0AE}{\d{k}} % 174 (WNR)
+\DeclareInputText{"0AF}{\d{K}} % 175 (WNR)
+
+\DeclareInputText{"0B0}{\v{c}} % 176 (WNR) °
+\DeclareInputText{"0B1}{\v{C}} % 177 (WNR) ą
+\DeclareInputText{"0B2}{\v{s}} % 178 (WNR) ˛
+\DeclareInputText{"0B3}{\up{$|$}} % 179 (WNR) ŗ
+\DeclareInputText{"0B4}{ } % 180 (WNR)
+\DeclareInputText{"0B5}{ } % 181 (WNR) ĩ
+\DeclareInputText{"0B6}{ } % 182 (WNR) ļ
+\DeclareInputText{"0B7}{ } % 183 (WNR) ˇ
+\DeclareInputText{"0B8}{ } % 184 (WNR) ¸
+\DeclareInputText{"0B9}{ } % 185 (WNR)
+\DeclareInputText{"0BA}{\up{$\|$}} % 186 (WNR) ē
+\DeclareInputText{"0BB}{\b{M}} % 187 (WNR)
+\DeclareInputText{"0BC}{\b{L}} % 188 (WNR)
+\DeclareInputText{"0BD}{\.y} % 189 (WNR) Ŋ
+\DeclareInputText{"0BE}{\b{R}} % 190 (WNR) ž
+\DeclareInputText{"0BF}{ } % 191 (WNR)
+
+\DeclareInputText{"0C0}{ } % 192 (WNR) Ā
+\DeclareInputText{"0C1}{ } % 193 (WNR) Á
+\DeclareInputText{"0C2}{ } % 194 (WNR) Â
+\DeclareInputText{"0C3}{ } % 195 (WNR)
+\DeclareInputText{"0C4}{\v{S}} % 196 (WNR)
+\DeclareInputText{"0C5}{\v{j}} % 197 (WNR)
+\DeclareInputText{"0C6}{ } % 198 (WNR) Æ
+\DeclareInputText{"0C7}{\b l} % 199 (WNR) Į
+\DeclareInputText{"0C8}{ } % 200 (WNR)
+\DeclareInputText{"0C9}{ } % 201 (WNR)
+\DeclareInputText{"0CA}{ } % 202 (WNR)
+\DeclareInputText{"0CB}{\b{M}} % 203 (WNR)
+\DeclareInputText{"0CC}{\b{L}} % 204 (WNR)
+\DeclareInputText{"0CD}{\.y} % 205 (WNR)
+\DeclareInputText{"0CE}{\b{R}} % 206 (WNR)
+\DeclareInputText{"0CF}{ } % 207 (WNR) Ī
+
+\DeclareInputText{"0D0}{\~a} % 208 (WNR) Đ
+\DeclareInputText{"0D1}{\~{\i}} % 209 (WNR) Ņ
+\DeclareInputText{"0D2}{\~u} % 210 (WNR) Ō
+\DeclareInputText{"0D3}{\~e} % 211 (WNR) Ķ
+\DeclareInputText{"0D4}{\~o} % 212 (WNR) Ô
+\DeclareInputText{"0D5}{\u{e}} % 213 (WNR) Õ
+\DeclareInputText{"0D6}{\u{o}} % 214 (WNR) Ö
+\DeclareInputText{"0D7}{\b{l}} % 215 (CSX) ×
+\DeclareInputText{"0D8}{ } % 216 (WNR)
+\DeclareInputText{"0D9}{\.a} % 217 (WNR)
+\DeclareInputText{"0DA}{\d{z}} % 218 (WNR)
+\DeclareInputText{"0DB}{\v{S}} % 219 (WNR) Û
+\DeclareInputText{"0DC}{\v{j}} % 220 (WNR) Ü
+\DeclareInputText{"0DD}{\d{Z}} % 221 (WNR)
+\DeclareInputText{"0DE}{ } % 222 (WNR)
+\DeclareInputText{"0DF}{\v{J}} % 223 (WNR) ß
+
+\DeclareInputText{"0E0}{\=a} % 224 (CSX) ā
+\DeclareInputText{"0E1}{\ss{}} % 225 (WNR) á
+\DeclareInputText{"0E2}{\=A} % 226 (CSX) â
+\DeclareInputText{"0E3}{\={\i}} % 227 (CSX) ã
+\DeclareInputText{"0E4}{\=I} % 228 (CSX) ä
+\DeclareInputText{"0E5}{\=u} % 229 (CSX) å
+\DeclareInputText{"0E6}{\=U} % 230 (CSX) æ
+\DeclareInputText{"0E7}{\d{r}} % 231 (CSX) į
+\DeclareInputText{"0E8}{\d{R}} % 232 (CSX) č
+\DeclareInputText{"0E9}{\diatop[\=|\d{r}]} % 233 (CSX) é
+\DeclareInputText{"0EA}{\diatop[\=|\d{R}]} % 234 (CSX) ę
+\DeclareInputText{"0EB}{\d{l}} % 235 (CSX) ë
+\DeclareInputText{"0EC}{\d{L}} % 236 (CSX) ė
+\DeclareInputText{"0ED}{\diatop[\=|\d{l}]} % 237 (CSX) í
+\DeclareInputText{"0EE}{\diatop[\=|\d{L}]} % 238 (CSX) î
+\DeclareInputText{"0EF}{\.n} % 239 (CSX) ī
+
+\DeclareInputText{"0F0}{\.N} % 240 (CSX) đ
+\DeclareInputText{"0F1}{\d{t}} % 241 (CSX) ņ
+\DeclareInputText{"0F2}{\d{T}} % 242 (CSX) ō
+\DeclareInputText{"0F3}{\d{d}} % 243 (CSX) ķ
+\DeclareInputText{"0F4}{\d{D}} % 244 (CSX) ô
+\DeclareInputText{"0F5}{\d{n}} % 245 (CSX) õ
+\DeclareInputText{"0F6}{\d{N}} % 246 (CSX) ö
+\DeclareInputText{"0F7}{\'s} % 247 (CSX) ÷
+\DeclareInputText{"0F8}{\'S} % 248 (CSX) ø
+\DeclareInputText{"0F9}{\d{s}} % 249 (CSX) ų
+\DeclareInputText{"0FA}{\d{S}} % 250 (CSX) ú
+\DeclareInputText{"0FB}{ } % 251 (WNR) û
+\DeclareInputText{"0FC}{\d{m}} % 252 (CSX) ü
+\DeclareInputText{"0FD}{\d{M}} % 253 (CSX) ũ
+\DeclareInputText{"0FE}{\d{h}} % 254 (CSX) ū
+\DeclareInputText{"0FF}{\d{H}} % 255 (WNR) ˙
+
+\endinput
diff --git a/macros/latex/contrib/wnri-latex/wnri.dtx b/macros/latex/contrib/wnri-latex/wnri.dtx
new file mode 100644
index 0000000000..7fbe6d9ea7
--- /dev/null
+++ b/macros/latex/contrib/wnri-latex/wnri.dtx
@@ -0,0 +1,260 @@
+%
+% \CheckSum{27}
+%
+% \iffalse
+% File: wnri.dtx
+% Copyright (C) 1998, 2011 by Anshuman Pandey.
+% Released under GPLv2+.
+%
+%<package>\NeedsTeXFormat{LaTeX2e}
+%<package>\ProvidesPackage{wnri}
+%<wnr>\ProvidesFile{ot1wnr.fd}
+%<wnss>\ProvidesFile{ot1wnss.fd}
+%<wntt>\ProvidesFile{ot1wntt.fd}
+%<-driver> [2011/05/03 v1.0b
+%<package> WNRI style package]
+%<wnr> WNRI roman font definitions]
+%<wnss> WNRI san serif font definitions]
+%<wntt> WNRI typewriter font definitions]
+%
+%<*driver>
+\documentclass{ltxdoc}
+\usepackage{mflogo}
+\providecommand\dst{\expandafter{\normalfont\scshape docstrip}}
+\title{Washington Romanized Indic for \LaTeXe}
+\author{Anshuman Pandey}
+\date{19 February 1998}
+\begin{document}
+\maketitle
+ \DocInput{wnri.dtx}
+\end{document}
+%</driver>
+%
+% \fi
+%
+% \changes{v1.0b}{2011/05/03}{clarify license, downcase filenames}
+% \changes{v1.0a}{1998/02/19}{Updated for use with \LaTeXe{}}
+% \changes{v1.0}{1993/06/19}{Original fonts released}
+%
+%
+% \section{Introduction}
+%
+% The Washington Romanized (WNRI) Indic package enables texts encoded
+% in the 8-bit Classical Sanskrit/Classical Sanskrit eXtended (CS/CSX)
+% encoding to be typeset in \TeX{} without modification of the input
+% scheme.
+%
+% This package defines the font shape groups for the WNRI fonts and
+% adapts them for use with \LaTeXe{}. These fonts were designed by
+% Thomas Ridgeway in 1993 at the Humanities Academic Computing Center
+% (HACC), University of Washington, Seattle, WA. I took the liberty on
+% behalf of the successor to HACC, the Center for Advanced Research
+% Technology in the Arts and Humanities (CARTAH), to update the package.
+%
+% The Washington Romanized Indic family of fonts is based on the
+% Computer Modern Roman fonts. The fonts retain the CMR encoding in
+% positions 0 to 127. The `upper ASCII' (positions 128-255) contain
+% characters of the CS/CSX encoding for transliterated Indic languages.
+% CS/CSX is a system used by scholars of Indology to facilitate the
+% exchange of data via a stable medium. This convention is well on its
+% way to becoming a standard
+%
+% Although WNRI is based on the CS/CSX character set, these fonts were
+% developed to contain other characters of which all are not recognized
+% in the CS/CSX standard. Some of these are drawn from the IBM-PC
+% character set, other transliteration systems, and other languages which
+% might be encountered in an Indic context, and which, as Ridgeway
+% remarked, may be useful to someone working in ``east-of-Suez contexts.''
+%
+% However, as the International Standards Organization Working Group for
+% the Transliteration of Indic Scripts (ISO/TC46/SC2/WG12) is currently
+% developing a standard transliteration (which will seems like a further
+% extension of CS/CSX), most of the anomolous and unused characters in the
+% inventory of WNRI will be replaced by attested and accepted `standardized'
+% counterparts. Therefore, please be advised that the current WNRI font
+% encoding will change as a result of this standardization. The changes,
+% however, will definitely reflect current practice.
+%
+% Ridgeway originally made these fonts available on a `need-to-know'
+% basis; that those interested may obtain and use them to their needs.
+% However, it has been more than five years since these fonts appear to
+% be last touched. I feel that these fonts deserve a larger audience and
+% so have updated them for use with \LaTeXe{}. In keeping with Ridgeway's
+% original wishes for the font, you are welcome to circulate the fonts and
+% information about them to other individuals you feel might be able
+% to benefit from or contribute to the enterprise with their suggestions.
+%
+% Some of these have had little or no real world testing, so evaluate
+% before committing to their use, particularly any san serif and
+% typewriter faces. Also, the WNRI characters still do not have kerning
+% values applied to them. Additionally, as the WNRI fonts do not place
+% the correct information about their heights and depths in the metric
+% files, \TeX{}'s native accent operations will not work on these fonts.
+%
+% I don't know whether Thomas Ridgeway is still working on these fonts
+% or not. The {\sc WNRI} fonts were originally stored on the infamous,
+% but sadly, now defunct, Blackbox\footnote{{\tt blackbox.hacc.washington.edu}}
+% server.
+%
+% The original release of WNRI contained two other fonts called
+% Washington Gerald Barnett Old English and Washington Puget Sound
+% Salish. These have been removed from the package as support for
+% them was non-existent. Any previous releases of WNRI are obsolete
+% as of this release. Numerous files have been removed and the
+% structure of the fonts have been slightly rearranged. The
+% Postscript and TrueType versions of WNRI are also obsolete as of
+% this release due to the modification of certain glyphs.
+%
+% \section{The Fonts}
+%
+% \begin{center}
+% \begin{tabular}{ll}
+% \multicolumn{2}{c}{\it Washington Romanized Indic} \\
+% \hline
+% {\tt wnrib8.mf} & bold 8pt \\
+% {\tt wnrib10.mf} & bold 10pt \\
+% {\tt wnribi10.mf} & bold italic 10pt \\
+% {\tt wnrii8.mf} & italic 8pt \\
+% {\tt wnrii10.mf} & italic 10pt \\
+% {\tt wnrir8.mf} & roman 8pt \\
+% {\tt wnrir10.mf} & roman 10pt \\
+% {\tt wnris8.mf} & sans serif 8pt \\
+% {\tt wnris10.mf} & sans serif 10pt \\
+% {\tt wnrit8.mf} & typewriter 8pt \\
+% {\tt wnrit10.mf} & typewriter 10pt \\
+% \hline
+% \end{tabular}
+% \end{center}
+%
+% \section{Modifications and Updates}
+% The \MF{} files have been modified to account for minor changes
+% in centering of accents and distance of accents from base character.
+%
+% The next update will be a revision of the characters in the font.
+% The unused and obsolete glyphs will be replaced by commonly
+% used characters which are not represented in {\sc WNRI}. Such
+% characters are r-underring and l-underring.
+%
+% \section{Implementation}
+% This update package consists simply of a style package which redefines
+% the |\rmfamily|, |\sffamily|, and |\ttfamily| fonts, and provides two
+% font definition files which setup the {\sc WNRI} Roman, San Serif, and
+% Typewriter fonts.
+%
+% To specify {\sc WNRI} as the primary font invoke \texttt{wnri} through
+% the |\usepackage| command.
+%
+% \subsection{Style Code}
+%
+% The style file specifies |OT1| as the default encoding and also
+% changes the substitution defaults for this encoding. If
+% |\familydefault| is not changed directly, then the change to
+% |\rmdefault| will automatically change the main font too.
+%
+% Default for |\rmfamily| will be Washington Roman Indic Regular
+% and for |\ttfamily| Washington Roman Indic Typewriter. Also,
+% assume that for \LaTeX{} the standard magnifications are
+% available.
+%
+% \begin{macrocode}
+%<*package>
+\renewcommand{\encodingdefault}{OT1}
+\DeclareFontSubstitution{OT1}{wnr}{m}{n}
+\renewcommand{\rmdefault}{wnr}
+\renewcommand{\sfdefault}{wnss}
+\renewcommand{\ttdefault}{wntt}
+%</package>
+% \end{macrocode}
+%
+%
+% \subsection{The Font-Definition Files}
+%
+% The Washington Roman Indic family exists in medium, bold, italic,
+% sans serif, and typewriter series. All of the other shapes will be
+% given substitution shapes.
+%
+% \begin{macrocode}
+%<*wnr>
+\DeclareFontFamily{OT1}{wnr}{}
+\DeclareFontShape{OT1}{wnr}{m}{n}{
+ <5> <6> <7> wnrir8
+ <8> <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnrir10 }{}
+\DeclareFontShape{OT1}{wnr}{bx}{n}{
+ <5> <6> <7> wnrib8
+ <8> <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnrib10 }{}
+\DeclareFontShape{OT1}{wnr}{bx}{it}{
+ <5> <6> <7> <8> <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnribi10 }{}
+\DeclareFontShape{OT1}{wnr}{b}{n}{ <-> ssub * wnr/bx/n }{}
+\DeclareFontShape{OT1}{wnr}{b}{it}{ <-> ssub * wnr/bx/it }{}
+\DeclareFontShape{OT1}{wnr}{m}{it}{
+ <5> <6> <7> wnrii8
+ <8> <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnrii10}{}
+\DeclareFontShape{OT1}{wnr}{m}{sl}{ <-> ssub * wnr/m/it }{}
+\DeclareFontShape{OT1}{wnr}{m}{sc}{ <-> ssub * wnr/m/n }{}
+\DeclareFontShape{OT1}{wnr}{m}{sf}{
+ <5> <6> <7> wnris8
+ <8> <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnris10 }{}
+%</wnr>
+% \end{macrocode}
+%
+% The Washington Roman Indic San Serif family has only the medium series.
+%
+% \begin{macrocode}
+%<*wnss>
+\DeclareFontFamily{OT1}{wnss}{}
+\DeclareFontShape{OT1}{wnss}{m}{n}{
+ <5> <6> <7> <8> wnris8
+ <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnris10 }{}
+\DeclareFontShape{OT1}{wnss}{b}{n}{ <-> ssub * wnss/m/n }{}
+\DeclareFontShape{OT1}{wnss}{bx}{n}{ <-> ssub * wnss/m/n }{}
+\DeclareFontShape{OT1}{wnss}{m}{sl}{ <-> ssub * wnss/m/n }{}
+\DeclareFontShape{OT1}{wnss}{m}{it}{ <-> ssub * wnss/m/n }{}
+%</wnss>
+% \end{macrocode}
+%
+% The Washington Roman Indic Typewriter family has only the medium series.
+%
+% \begin{macrocode}
+%<*wntt>
+\DeclareFontFamily{OT1}{wntt}{}
+\DeclareFontShape{OT1}{wntt}{m}{n}{
+ <5> <6> <7> <8> wnrit8
+ <9> <10> <10.95> <12>
+ <14.4> <17.28> <20.74> <24.88> wnrit10 }{}
+\DeclareFontShape{OT1}{wntt}{m}{it}{ <-> ssub * wntt/m/n }{}
+\DeclareFontShape{OT1}{wntt}{m}{sl}{ <-> ssub * wntt/m/n }{}
+\DeclareFontShape{OT1}{wntt}{m}{sc}{ <-> ssub * wntt/m/n }{}
+\DeclareFontShape{OT1}{wntt}{m}{ui}{ <-> ssub * wntt/m/n }{}
+\DeclareFontShape{OT1}{wntt}{bx}{n}{ <-> ssub * wntt/m/n }{}
+\DeclareFontShape{OT1}{wntt}{bx}{it}{ <-> ssub * wntt/m/n }{}
+\DeclareFontShape{OT1}{wntt}{bx}{ui}{ <-> ssub * wntt/m/n }{}
+%</wntt>
+% \end{macrocode}
+%
+% \begin{macrocode}
+\endinput
+% \end{macrocode}
+%
+% \Finale
+%
+%% \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 \~}
diff --git a/macros/latex/contrib/wnri-latex/wnri.ins b/macros/latex/contrib/wnri-latex/wnri.ins
new file mode 100644
index 0000000000..879e7d28d7
--- /dev/null
+++ b/macros/latex/contrib/wnri-latex/wnri.ins
@@ -0,0 +1,38 @@
+\def\batchfile{wnri.ins}
+\input docstrip.tex
+
+\keepsilent
+\askforoverwritefalse
+
+\preamble
+
+This is a generated file in the wnri-latex package.
+
+Copyright (C) 1998, 2011 by Anshuman Pandey.
+
+The entire package is released under the GNU GPL, either version 2, or
+(at your option) any later version.
+
+\endpreamble
+
+
+\generateFile{wnri.sty}{t}{\from{wnri.dtx}{package}}
+\generateFile{ot1wnr.fd}{t}{\from{wnri.dtx}{fd,wnr}}
+\generateFile{ot1wnss.fd}{t}{\from{wnri.dtx}{fd,wnss}}
+\generateFile{ot1wntt.fd}{t}{\from{wnri.dtx}{fd,wntt}}
+
+\Msg{***********************************************************}
+\Msg{*}
+\Msg{* Move the following files into a directory searched by TeX:}
+\Msg{*}
+\Msg{* \space\space wnri.sty}
+\Msg{* \space\space ot1wnr.fd}
+\Msg{* \space\space ot1wnss.fd}
+\Msg{* \space\space ot1wntt.fd}
+\Msg{*}
+\Msg{* To produce the documentation run wnri.dtx through LaTeX.}
+\Msg{*}
+\Msg{* Happy TeXing}
+\Msg{***********************************************************}
+
+\endinput
diff --git a/macros/latex/contrib/wnri-latex/wnri.pdf b/macros/latex/contrib/wnri-latex/wnri.pdf
new file mode 100644
index 0000000000..e812d6d4aa
--- /dev/null
+++ b/macros/latex/contrib/wnri-latex/wnri.pdf
Binary files differ
diff --git a/macros/latex/contrib/wnri-latex/wnritest.tex b/macros/latex/contrib/wnri-latex/wnritest.tex
new file mode 100644
index 0000000000..cef3f37444
--- /dev/null
+++ b/macros/latex/contrib/wnri-latex/wnritest.tex
@@ -0,0 +1,63 @@
+\documentclass[11pt]{article}
+\usepackage{wnri}
+\parindent=0pt
+
+% This document is encoded in the 8-bit Classical Sanskrit/
+% Classical Sanskrit eXtended input convention.
+% Released under GPLv2+.
+
+\begin{document}
+
+\centerline{\bf Nalopākhyāna, Mahābhārata III.4.a}
+\bigskip
+
+\centerline{\it atha nalopākhyānam}
+\medskip
+
+\centerline{Roman}
+āsãd rājā nalo nāma vãrasenasuto balã . \\
+upapanno guõair iųņai råpavān a÷vakovidaū .. 1 \\
+atiųņhan manujendrāõāü mårdhni devapatir yathā . \\
+upary upari sarveųām āditya iva tejasā .. 2 \\
+
+\centerline{Italics}
+{\it
+āsãd rājā nalo nāma vãrasenasuto balã . \\
+upapanno guõair iųņai råpavān a÷vakovidaū .. 1 \\
+atiųņhan manujendrāõāü mårdhni devapatir yathā . \\
+upary upari sarveųām āditya iva tejasā .. 2 \\
+}
+
+\centerline{Bold}
+{\bf
+āsãd rājā nalo nāma vãrasenasuto balã . \\
+upapanno guõair iųņai råpavān a÷vakovidaū .. 1 \\
+atiųņhan manujendrāõāü mårdhni devapatir yathā . \\
+upary upari sarveųām āditya iva tejasā .. 2 \\
+}
+
+\centerline{Bold Italics}
+{\bfseries \itshape
+āsãd rājā nalo nāma vãrasenasuto balã . \\
+upapanno guõair iųņai råpavān a÷vakovidaū .. 1 \\
+atiųņhan manujendrāõāü mårdhni devapatir yathā . \\
+upary upari sarveųām āditya iva tejasā .. 2 \\
+}
+
+\centerline{San Serif}
+{\sf
+āsãd rājā nalo nāma vãrasenasuto balã . \\
+upapanno guõair iųņai råpavān a÷vakovidaū .. 1 \\
+atiųņhan manujendrāõāü mårdhni devapatir yathā . \\
+upary upari sarveųām āditya iva tejasā .. 2 \\
+}
+
+\centerline{Typewriter}
+{\tt
+āsãd rājā nalo nāma vãrasenasuto balã . \\
+upapanno guõair iųņai råpavān a÷vakovidaū .. 1 \\
+atiųņhan manujendrāõāü mårdhni devapatir yathā . \\
+upary upari sarveųām āditya iva tejasā .. 2 \\
+}
+
+\end{document}