From 85b7bc695629926641c7cb752fd478adfdf374f3 Mon Sep 17 00:00:00 2001
From: Marius <mariausol@gmail.com>
Date: Sun, 4 Jul 2010 15:32:09 +0300
Subject: stable 2010-05-24 13:10

---
 tex/context/base/xtag-pml.tex | 85 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 85 insertions(+)
 create mode 100644 tex/context/base/xtag-pml.tex

(limited to 'tex/context/base/xtag-pml.tex')

diff --git a/tex/context/base/xtag-pml.tex b/tex/context/base/xtag-pml.tex
new file mode 100644
index 000000000..53d22c52a
--- /dev/null
+++ b/tex/context/base/xtag-pml.tex
@@ -0,0 +1,85 @@
+%D \module
+%D   [       file=xtag-pml,
+%D        version=2001.09.04,
+%D          title=\CONTEXT\ XML Support,
+%D       subtitle=Physics ML,
+%D         author=Hans Hagen,
+%D           date=\currentdate,
+%D      copyright={PRAGMA / 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.
+
+\writestatus{loading}{ConTeXt XML Macros / PhysML}
+
+%D This is a reimplmentation of the old filter. This module
+%D runs on top of the mathml and units modules.
+
+\useXMLfilter[map]
+\useXMLfilter[mml,mmp,mmc]
+
+\defineXMLargument [phys]  \doXMLphys
+\defineXMLargument [iphys] \doXMLiphys
+\defineXMLargument [dphys] \doXMLdphys
+
+\unprotect
+
+\unexpanded\def\doXMLphys {\ifhmode\@EA\doXMLiphys\else\@EA\doXMLdphys\fi}
+\unexpanded\def\doXMLiphys{\XMLremapdata[mml]{$\ignorespaces}{\unskip$}}
+\unexpanded\def\doXMLdphys{\XMLremapdata[mml]{\dostartformula{}}{\dostopformula}}
+
+\protect
+
+\doifnotmode{demo}{\endinput}
+
+\usemodule[units]
+
+\starttext
+
+\startXMLdata
+<phys>
+  <apply> <times/>
+    <cn> 10 </cn>
+    <ci><unit><Milli/><Sec/><Per/><Square/><Kilo/><Meter/></unit> </ci>
+  </apply>
+</phys>
+\stopXMLdata
+
+\startXMLdata
+<phys>
+  <apply> <divide/>
+    <cn> 10 </cn>
+    <ci> <unit><Unit/><Milli/><Sec/><Per/><Square/><Kilo/><Meter/></unit> </ci>
+  </apply>
+</phys>
+\stopXMLdata
+
+\startXMLdata
+<phys>
+  <apply> <times/>
+    <cn> 10 </cn>
+    <ci> <unit> <Milli/> <Sec/> <Per/> <Square/> <Kilo/> <Meter/> </unit> </ci>
+  </apply>
+</phys>
+\stopXMLdata
+
+\startXMLdata
+<phys>
+  <apply> <times/>
+    <cn> 10 </cn>
+    <ci> <unit><Milli/><Sec/><Per/><Square/><Kilo/><Meter/></unit> </ci>
+  </apply>
+</phys>
+\stopXMLdata
+
+\startXMLdata
+<phys>
+  <apply> <times/>
+    <cn> 10 </cn>
+    <ci> <unit> <Milli/> <Sec/> <Per/> <Square/> <Kilo/> <Meter/> </unit> </ci>
+  </apply>
+</phys>
+\stopXMLdata
+
+\stoptext
-- 
cgit v1.2.3

