summaryrefslogtreecommitdiff
path: root/tex/context/base/x-chemml.tex
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/x-chemml.tex')
-rw-r--r--tex/context/base/x-chemml.tex68
1 files changed, 34 insertions, 34 deletions
diff --git a/tex/context/base/x-chemml.tex b/tex/context/base/x-chemml.tex
index 8475fe81a..68b52cdd1 100644
--- a/tex/context/base/x-chemml.tex
+++ b/tex/context/base/x-chemml.tex
@@ -2,19 +2,19 @@
%D [ file=m-chemml,
%D version=2001.09.12,
%D title=\CONTEXT\ XML Modules,
-%D subtitle=Loading \CHEMML\ Filters,
+%D subtitle=Loading CHEMML Filters,
%D author=Hans Hagen,
%D date=\currentdate,
%D copyright={PRAGMA ADE / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
-%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
-%C details.
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
-\useXMLfilter[cml]
+\useXMLfilter[cml]
-%D Structural formulas are codes in a \PPCHTEX\ way; this
-%D will change -)
+%D Structural formulas are codes in a \PPCHTEX\ way; this
+%D will change -)
%D
%D \startbuffer
%D <dchem>
@@ -60,23 +60,23 @@
%D
%D \typebuffer
-% \ifx\XMLgtoks\undefined \newtoks\XMLgtoks \fi
-% \ifx\XMLttoks\undefined \newtoks\XMLttoks \fi
-%
+% \ifx\XMLgtoks\undefined \newtoks\XMLgtoks \fi
+% \ifx\XMLttoks\undefined \newtoks\XMLttoks \fi
+%
% \defineXMLenvironment [structure]
% {\startchemical\ignorespaces}
% {\relax\stopchemical}
-%
-% \def\chemicalXMLg#1% \defineXMLcollect [graphic] \XMLgtoks
+%
+% \def\chemicalXMLg#1% \defineXMLcollect [graphic] \XMLgtoks
% {\doifelsenothing{\the\XMLgtoks}
% {\doglobal\appendtoks #1\to\XMLgtoks\ignorespaces}
% {\doglobal\appendtoks,#1\to\XMLgtoks\ignorespaces}}
-%
+%
% \def\chemicalXMLt#1%
% {\doifelsenothing{\the\XMLttoks}
% {\doglobal\appendtoks #1\to\XMLttoks\ignorespaces}
% {\doglobal\appendtoks,#1\to\XMLttoks\ignorespaces}}
-%
+%
% \defineXMLenvironment [component] [type=]
% {\global\XMLgtoks\emptytoks
% \global\XMLttoks\emptytoks
@@ -85,21 +85,21 @@
% \ignorespaces}
% {\expanded{\chemical[\the\XMLgtoks][\the\XMLttoks]}%
% \ignorespaces}
-%
-% \defineXMLargument [oxidation] [sign=,n=1] \chemicalXMLo % +/- 1..7
-%
+%
+% \defineXMLargument [oxidation] [sign=,n=1] \chemicalXMLo % +/- 1..7
+%
% \def\chemicalXMLo#1%
% {\expanded{\chemicalXMLt
% {\noexpand\chemicaloxidation{\XMLop{sign}}{\XMLop{n}}{#1}}}%
% \ignorespaces}
-%
-% \defineXMLenvironment [annotation] [location=]
+%
+% \defineXMLenvironment [annotation] [location=]
% {\bgroup
% \defineXMLenvironmentsave[text]{\ignorespaces}{\ignorespaces}%
% \defineXMLenvironmentsave[caption]{\ignorespaces}{\ignorespaces}%
% \ignorespaces}
% {\scratchtoks{\chemicalright}%
-% \processaction
+% \processaction
% [\XMLop{location}]
% [ t=>\scratchtoks{\chemicaltop},
% b=>\scratchtoks{\chemicalbottom},
@@ -115,29 +115,29 @@
% lb=>\scratchtoks{\chemicalleftbottom},
% rt=>\scratchtoks{\chemicalrighttop},
% rb=>\scratchtoks{\chemicalrightbottom},
-% x=>\scratchtoks{\chemicaltighttext},
+% x=>\scratchtoks{\chemicaltighttext},
% sl=>\scratchtoks{\chemicalsmashedleft},
% sm=>\scratchtoks{\chemicalsmashedmiddle},
-% sr=>\scratchtoks{\chemicalsmashedright}]%
+% sr=>\scratchtoks{\chemicalsmashedright}]%
% \expanded{\chemicalXMLt
% {\the\scratchtoks{\XMLflush{text}}{\XMLflush{caption}}}}%
% \egroup
% \ignorespaces}
-%
+%
% \defineXMLenvironment [forever]
-% {\chemicalXMLt{\[}\ignorespaces}
-% {\chemicalXMLt{\]}\ignorespaces}
+% {\chemicalXMLt{\[}\ignorespaces}
+% {\chemicalXMLt{\]}\ignorespaces}
-\ifx\XMLgtoks\undefined \newtoks\XMLgtoks \fi
-\ifx\XMLttoks\undefined \newtoks\XMLttoks \fi
+\ifx\XMLgtoks\undefined \newtoks\XMLgtoks \fi
+\ifx\XMLttoks\undefined \newtoks\XMLttoks \fi
\startXMLmapping [cml]
-% this will be a more natural method; this also triggers it
+% this will be a more natural method; this also triggers it
-\installXMLunknownremapping
+\installXMLunknownremapping
-% extensions
+% extensions
\remapXMLsequence [structure] [CPA] \doCMLstructure
\remapXMLsequence [component] [CPA] \doCMLcomponent
@@ -152,7 +152,7 @@
\def\doCMLstructure#1#2%
{\startchemical\ignorespaces#2\unskip\stopchemical}
-\def\doCMLgraphic#1#2%
+\def\doCMLgraphic#1#2%
{\doifelsenothing{\the\XMLgtoks}
{\uppercase{\doglobal\appendtoks #2\to\XMLgtoks\ignorespaces}}
{\uppercase{\doglobal\appendtoks,#2\to\XMLgtoks\ignorespaces}}%
@@ -173,11 +173,11 @@
\def\doCMLannotation#1#2%
{\getXMLarguments{cml}{location="" #1}%
- \def\dodoCMLannotation##1%
+ \def\dodoCMLannotation##1%
{\doCMLtext\empty{##1%
{\let\doCMLtext \secondoftwoarguments\processXMLRchild{text}{#2}}%
{\let\doCMLcaption\unmapXMLdata \processXMLRchild{caption}{#2}}}}%
- \processaction
+ \processaction
[\XMLpar{cml}{location}{r}]
[ t=>\dodoCMLannotation\chemicaltop,
b=>\dodoCMLannotation\chemicalbottom,
@@ -193,7 +193,7 @@
lb=>\dodoCMLannotation\chemicalleftbottom,
rt=>\dodoCMLannotation\chemicalrighttop,
rb=>\dodoCMLannotation\chemicalrightbottom,
- x=>\dodoCMLannotation\chemicaltighttext,
+ x=>\dodoCMLannotation\chemicaltighttext,
sl=>\dodoCMLannotation\chemicalsmashedleft,
sm=>\dodoCMLannotation\chemicalsmashedmiddle,
sr=>\dodoCMLannotation\chemicalsmashedright]%
@@ -209,4 +209,4 @@
\stopXMLmapping
-\endinput
+\endinput