# -*- CPERL -*-
package LaTeXML::Package::Pool;
use strict;
use LaTeXML::Package;
RequirePackage('keyval');
DefKeyVal('mi','lbrack','Semiverbatim');
DefKeyVal('mi','rbrack','Semiverbatim');
DefKeyVal('mi','p','Semiverbatim');
DefKeyVal('mi','pi','Semiverbatim');
DefConstructor('\mixfixi OptionalKeyVals:mi {}{}{}',
                "<omdoc:prototype>"
       .  "<om:OMA>"
       .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
       .    "<omdoc:expr name='arg'/>"
       .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
       .  "<m:mrow>"
       .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
       .    "<ltx:Math><ltx:XMath>#4</ltx:XMath></ltx:Math>"
       .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefConstructor('\mixfixa OptionalKeyVals:mi {}{}{}{}',
                "<omdoc:prototype>"
       .  "<om:OMA>"
       .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
       .    "<omdoc:exprlist name='args'>"
       .      "<omdoc:expr name='arg'/>"
       .    "</omdoc:exprlist>"
       .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
       .  "<m:mrow>"
       .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
       .    "<omdoc:iterate name='args' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .      "<omdoc:separator>"
       .        "<ltx:Math><ltx:XMath>#5</ltx:XMath></ltx:Math>"
       .      "</omdoc:separator>"
       .      "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .    "</omdoc:iterate>"
       .    "<ltx:Math><ltx:XMath>#4</ltx:XMath></ltx:Math>"
       .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefKeyVal('mii','lbrack','Semiverbatim');
DefKeyVal('mii','rbrack','Semiverbatim');
DefKeyVal('mii','p','Semiverbatim');
DefKeyVal('mii','pi','Semiverbatim');
DefKeyVal('mii','pii','Semiverbatim');
DefConstructor('\mixfixii OptionalKeyVals:mi {}{}{}{}{}',
                "<omdoc:prototype>"
       .  "<om:OMA>"
       .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
       .    "<omdoc:expr name='arg1'/>"
       .    "<omdoc:expr name='arg2'/>"
       .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
       .  "<m:mrow>"
       .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg1' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
       .    "<ltx:Math><ltx:XMath>#4</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg2' ?&KeyVal(#1,'pii')(precedence='&KeyVal(#1,'pii')')/>"
       .    "<ltx:Math><ltx:XMath>#6</ltx:XMath></ltx:Math>"
       .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefConstructor('\mixfixia OptionalKeyVals:mi {}{}{}{}{}{}',
                "<omdoc:prototype>"
       .  "<om:OMA>"
       .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
       .    "<omdoc:expr name='arg1'/>"
       .    "<omdoc:exprlist name='args'>"
       .      "<omdoc:expr name='arg'/>"
       .    "</omdoc:exprlist>"
       .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
       .  "<m:mrow>"
       .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg1' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
       .    "<ltx:Math><ltx:XMath>#4</ltx:XMath></ltx:Math>"
       .    "<omdoc:iterate name='args' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .      "<omdoc:separator>"
       .        "<ltx:Math><ltx:XMath>#7</ltx:XMath></ltx:Math>"
       .      "</omdoc:separator>"
       .      "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .    "</omdoc:iterate>"
       .    "<ltx:Math><ltx:XMath>#6</ltx:XMath></ltx:Math>"
       .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefConstructor('\mixfixai OptionalKeyVals:mi {}{}{}{}{}{}',
                "<omdoc:prototype>"
       .  "<om:OMA>"
       .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
       .    "<omdoc:exprlist name='args'>"
       .      "<omdoc:expr name='arg'/>"
       .    "</omdoc:exprlist>"
       .    "<omdoc:expr name='arg2'/>"
       .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
       .  "<m:mrow>"
       .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
       .    "<omdoc:iterate name='args' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .      "<omdoc:separator>"
       .        "<ltx:Math><ltx:XMath>#7</ltx:XMath></ltx:Math>"
       .      "</omdoc:separator>"
       .      "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .    "</omdoc:iterate>"
       .    "<ltx:Math><ltx:XMath>#4</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg2' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
       .    "<ltx:Math><ltx:XMath>#6</ltx:XMath></ltx:Math>"
       .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefKeyVal('miii','lbrack','Semiverbatim');
DefKeyVal('miii','rbrack','Semiverbatim');
DefKeyVal('miii','p','Semiverbatim');
DefKeyVal('miii','pi','Semiverbatim');
DefKeyVal('miii','pii','Semiverbatim');
DefKeyVal('miii','piii','Semiverbatim');
DefConstructor('\mixfixiii OptionalKeyVals:mi {}{}{}{}{}{}{}',
                "<omdoc:prototype>"
       .  "<om:OMA>"
       .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
       .    "<omdoc:expr name='arg1'/>"
       .    "<omdoc:expr name='arg2'/>"
       .    "<omdoc:expr name='arg3'/>"
       .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
       .  "<m:mrow>"
       .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg1' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
       .    "<ltx:Math><ltx:XMath>#4</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg2' ?&KeyVal(#1,'pii')(precedence='&KeyVal(#1,'pii')')/>"
       .    "<ltx:Math><ltx:XMath>#6</ltx:XMath></ltx:Math>"
       .    "<omdoc:render name='arg3' ?&KeyVal(#1,'piii')(precedence='&KeyVal(#1,'piii')')/>"
       .    "<ltx:Math><ltx:XMath>#8</ltx:XMath></ltx:Math>"
       .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefConstructor('\prefix OptionalKeyVals:mi {}{}',
                "<omdoc:prototype>"
               .  "<om:OMA>"
               .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
               .    "<omdoc:expr name='arg1'/>"
               .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
               .  "<m:mrow>"
               .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
               .    "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefConstructor('\postfix OptionalKeyVals:mi {}{}',
                "<omdoc:prototype>"
               .  "<om:OMA>"
               .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
               .    "<omdoc:expr name='arg1'/>"
               .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
               .  "<m:mrow>"
               .    "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .    "<ltx:Math><ltx:XMath>#2</ltx:XMath></ltx:Math>"
               .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
DefMacro('\infix []{}{}{}','\mixfixii[#1]{}{#3}{#2}{#4}{}');
DefConstructor('\assoc OptionalKeyVals:mi {}{}',
                "<omdoc:prototype>"
               .  "<om:OMA>"
               .    "<om:OMS cd='' name=''/>"##### need to get $cd and $name here.
               .    "<omdoc:exprlist name='args'>"
               .      "<omdoc:expr name='arg'/>"
               .    "</omdoc:exprlist>"
               .  "</om:OMA>"
               ."</omdoc:prototype>"
               ."<omdoc:rendering ?&KeyVal(#1,'p')(precedence='&KeyVal(#1,'p')')>"
               .  "<m:mrow>"
               .    "<omdoc:iterate name='args' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .      "<omdoc:separator>"
               .        "<ltx:Math><ltx:XMath>#3</ltx:XMath></ltx:Math>"
               .      "</omdoc:separator>"
               .      "<omdoc:render name='arg' ?&KeyVal(#1,'pi')(precedence='&KeyVal(#1,'pi')')/>"
               .    "</omdoc:iterate>"
               .  "</m:mrow>"
               ."</omdoc:rendering>",
       mode=>'inline_math');
1;