summaryrefslogtreecommitdiff
path: root/biblio/tib/inputs/intext.ttx
diff options
context:
space:
mode:
Diffstat (limited to 'biblio/tib/inputs/intext.ttx')
-rw-r--r--biblio/tib/inputs/intext.ttx139
1 files changed, 139 insertions, 0 deletions
diff --git a/biblio/tib/inputs/intext.ttx b/biblio/tib/inputs/intext.ttx
new file mode 100644
index 0000000000..337c6462dc
--- /dev/null
+++ b/biblio/tib/inputs/intext.ttx
@@ -0,0 +1,139 @@
+%intext format macros
+%[author, title, etc., volume (date) pages gov't no., other]
+
+\def\journalarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc%
+ \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
+ \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup\fi%
+ \if\ztest\present\zstr\fi%
+ \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
+ \if\etest\present\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
+ \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
+ \if\Vtest\present\if\Jtest\present\hskip.16667em\else\Comma\fi\bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
+ \if\Dtest\present\hskip.16667em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
+ \if\Ptest\present\bgroup, \Pstr\egroup\def\Comma{, }\fi%
+ \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
+ \if\jtest\present\Comma\bgroup\Tomefont\jstr\/\egroup\def\Comma{, }\fi%
+ \if\vtest\present\if\jtest\present\hskip.16667em\else\Comma\fi\bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
+ \if\dtest\present\hskip.16667em(\bgroup\dstr\egroup)\def\Comma{, }\fi%
+ \if\ptest\present\bgroup, \pstr\egroup\def\Comma{, }\fi%
+ \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
+ \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
+ \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
+ \gdef\Comma{\unskip; }\gdef\zstr{}}%
+
+\def\conferencereportformat{\Reffont\let\uchyph=1\parindent=1.25pc%
+ \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
+ \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup\fi%
+ \if\ztest\present\zstr\fi%
+ \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
+ \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
+ \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
+ \if\Dtest\present\hskip.16667em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
+ \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
+ \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
+ \gdef\Comma{\unskip; }\gdef\zstr{}}%
+
+\def\bookarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc%
+ \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
+ \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup\fi%
+ \if\ztest\present\zstr\fi%
+ \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
+ \if\etest\present\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
+ \if\Btest\present\Comma in \bgroup\Tomefont\Bstr\/\egroup\def\Comma{\unskip, }\fi%
+ \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
+ \if\Etest\present\Comma\bgroup\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }\fi%
+ \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
+ \if\Vtest\present\bgroup\hskip.16667em\#\Volfont\Vstr\egroup\def\Comma{, }\fi%
+ \if\Ntest\present\bgroup\hskip.16667em\#\Volfont\Nstr\egroup\def\Comma{, }\fi%
+ \if\Itest\present\Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
+ \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
+ \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
+ \if\Ptest\present\Comma\Pstr\def\Comma{, }\fi%
+ \if\ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
+ \if\btest\present\Comma in \bgroup\Tomefont\bstr\egroup\def\Comma{, }\fi%
+ \if\atest\present\Comma\bgroup\astr\egroup\unskip, \if\acnt\present eds.\else ed.\fi\def\Comma{, }\fi%
+ \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
+ \if\vtest\present\bgroup\hskip.16667em\#\Volfont\vstr\egroup\def\Comma{, }\fi%
+ \if\ntest\present\bgroup\hskip.16667em\#\Volfont\nstr\egroup\def\Comma{, }\fi%
+ \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
+ \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
+ \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
+ \if\ptest\present\Comma\pstr\def\Comma{, }\fi%
+ \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
+ \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
+ \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
+ \gdef\Comma{\unskip; }\gdef\zstr{}}%
+
+\def\bookformat{\Reffont\let\uchyph=1\parindent=1.25pc%
+ \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
+ \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup%
+ \else\if\Etest\present\bgroup\Comma\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi%
+ \else\if\Itest\present\Comma\bgroup\Authfont\Istr\egroup\fi\fi\fi%
+ \if\ztest\present\zstr\fi%
+ \if\Ttest\present\Comma\bgroup\Tomefont\Tstr\/\egroup\def\Comma{\unskip, }%
+ \else\if\Btest\present\Comma\bgroup\Tomefont\Bstr\/\egroup\def\Comma{\unskip, }\fi\fi%
+ \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
+ \if\etest\present\hskip.16667em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
+ \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
+ \if\Vtest\present\bgroup\hskip.16667em\#\Volfont\Vstr\egroup\def\Comma{, }\fi%
+ \if\Ntest\present\bgroup\hskip.16667em\#\Volfont\Nstr\egroup\def\Comma{, }\fi%
+ \if\Atest\present\if\Itest\present
+ \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi%
+ \else\if\Etest\present\if\Itest\present
+ \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi\fi\fi%
+ \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
+ \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
+ \if\ttest\present\Comma\bgroup\Tomefont\tstr\egroup\def\Comma{, }%
+ \else\if\btest\present\Comma\bgroup\Tomefont\bstr\egroup\def\Comma{, }\fi\fi%
+ \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
+ \if\vtest\present\bgroup\hskip.16667em\#\Volfont\vstr\egroup\def\Comma{, }\fi%
+ \if\ntest\present\bgroup\hskip.16667em\#\Volfont\nstr\egroup\def\Comma{, }\fi%
+ \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
+ \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
+ \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
+ \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
+ \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
+ \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
+ \gdef\Comma{\unskip; }\gdef\zstr{}}%
+
+\def\technicalreportformat{\Reffont\let\uchyph=1\parindent=1.25pc%
+ \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
+ \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup%
+ \else\if\Etest\present\bgroup\Comma\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi%
+ \else\if\Itest\present\Comma\bgroup\Authfont\Istr\egroup\fi\fi\fi%
+ \if\ztest\present\zstr\fi%
+ \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
+ \if\Atest\present\if\Itest\present
+ \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
+ \else\if\Etest\present\if\Itest\present
+ \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
+ \if\Rtest\present\Comma\bgroup\Rstr\egroup\def\Comma{, }\fi%
+ \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
+ \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
+ \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
+ \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
+ \if\rtest\present\Comma\bgroup\rstr\egroup\def\Comma{, }\fi%
+ \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
+ \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
+ \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
+ \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
+ \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
+ \gdef\Comma{\unskip; }\gdef\zstr{}}%
+
+\def\otherformat{\Reffont\let\uchyph=1\parindent=1.25pc%
+ \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
+ \if\Atest\present\Comma\bgroup\Authfont\Astr\egroup%
+ \else\if\Etest\present\Comma\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi%
+ \else\if\Itest\present\Comma\bgroup\Authfont\Istr\egroup\fi\fi\fi%
+ \if\ztest\present\zstr\fi%
+ \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
+ \if\Atest\present\if\Itest\present
+ \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
+ \else\if\Etest\present\if\Itest\present
+ \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
+ \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
+ \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
+ \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
+ \if\Otest\present{\Comma\bgroup\Ostr\egroup}\fi%
+ \if\Ztest\present\bgroup\ignorespaces\Zstr\egroup\gdef\Ztest{}\fi%
+ \gdef\Comma{\unskip; }\gdef\zstr{}}%