OpenMath XML (source)
<OMOBJ xmlns="http://www.openmath.org/OpenMath">
<OMA>
<OMS cd="logic1" name="and"/>
<OMA>
<OMS cd="set1" name="in"/>
<OMS cd="alg1" name="one"/>
<OMS cd="setname2" name="H"/>
</OMA>
<OMBIND>
<OMS cd="quant1" name="exists"/>
<OMBVAR>
<OMV name="i"/>
<OMV name="j"/>
<OMV name="k"/>
</OMBVAR>
<OMA>
<OMS cd="logic1" name="and"/>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="i"/>
<OMS cd="setname2" name="H"/>
</OMA>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="j"/>
<OMS cd="setname2" name="H"/>
</OMA>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="k"/>
<OMS cd="setname2" name="H"/>
</OMA>
<OMA>
<OMS cd="relation1" name="eq"/>
<OMA>
<OMS cd="arith1" name="power"/>
<OMV name="i"/>
<OMI> 2 </OMI>
</OMA>
<OMA>
<OMS cd="arith1" name="unary_minus"/>
<OMS cd="alg1" name="one"/>
</OMA>
</OMA>
<OMA>
<OMS cd="relation1" name="eq"/>
<OMA>
<OMS cd="arith1" name="power"/>
<OMV name="j"/>
<OMI> 2 </OMI>
</OMA>
<OMA>
<OMS cd="arith1" name="unary_minus"/>
<OMS cd="alg1" name="one"/>
</OMA>
</OMA>
<OMA>
<OMS cd="relation1" name="eq"/>
<OMA>
<OMS cd="arith1" name="power"/>
<OMV name="k"/>
<OMI> 2 </OMI>
</OMA>
<OMA>
<OMS cd="arith1" name="unary_minus"/>
<OMS cd="alg1" name="one"/>
</OMA>
</OMA>
<OMA>
<OMS cd="relation1" name="eq"/>
<OMA>
<OMS cd="arith1" name="times"/>
<OMV name="i"/>
<OMV name="j"/>
<OMV name="k"/>
</OMA>
<OMA>
<OMS cd="arith1" name="unary_minus"/>
<OMS cd="alg1" name="one"/>
</OMA>
</OMA>
<OMA>
<OMS cd="relation1" name="neq"/>
<OMA>
<OMS cd="arith1" name="abs"/>
<OMV name="i"/>
</OMA>
<OMS cd="alg1" name="one"/>
</OMA>
<OMA>
<OMS cd="relation1" name="neq"/>
<OMA>
<OMS cd="arith1" name="abs"/>
<OMV name="j"/>
</OMA>
<OMS cd="alg1" name="one"/>
</OMA>
<OMA>
<OMS cd="relation1" name="neq"/>
<OMA>
<OMS cd="arith1" name="abs"/>
<OMV name="k"/>
</OMA>
<OMS cd="alg1" name="one"/>
</OMA>
<OMBIND>
<OMS cd="quant1" name="forall"/>
<OMBVAR>
<OMV name="q"/>
</OMBVAR>
<OMA>
<OMS cd="logic1" name="implies"/>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="q"/>
<OMS cd="setname2" name="H"/>
</OMA>
<OMBIND>
<OMS cd="quant1" name="exists"/>
<OMBVAR>
<OMV name="r0"/>
<OMV name="r1"/>
<OMV name="r2"/>
<OMV name="r3"/>
</OMBVAR>
<OMA>
<OMS cd="logic1" name="and"/>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="r0"/>
<OMS cd="setname1" name="R"/>
</OMA>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="r1"/>
<OMS cd="setname1" name="R"/>
</OMA>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="r2"/>
<OMS cd="setname1" name="R"/>
</OMA>
<OMA>
<OMS cd="set1" name="in"/>
<OMV name="r3"/>
<OMS cd="setname1" name="R"/>
</OMA>
<OMA>
<OMS cd="relation1" name="eq"/>
<OMV name="q"/>
<OMA>
<OMS cd="arith1" name="plus"/>
<OMV name="r0"/>
<OMA>
<OMS cd="arith1" name="times"/>
<OMV name="r1"/>
<OMV name="i"/>
</OMA>
<OMA>
<OMS cd="arith1" name="times"/>
<OMV name="r2"/>
<OMV name="j"/>
</OMA>
<OMA>
<OMS cd="arith1" name="times"/>
<OMV name="r3"/>
<OMV name="k"/>
</OMA>
</OMA>
</OMA>
</OMA>
</OMBIND>
</OMA>
</OMBIND>
</OMA>
</OMBIND>
</OMA>
</OMOBJ>
Strict Content MathML
<math xmlns="http://www.w3.org/1998/Math/MathML">
<apply><csymbol cd="logic1">and</csymbol>
<apply><csymbol cd="set1">in</csymbol>
<csymbol cd="alg1">one</csymbol>
<csymbol cd="setname2">H</csymbol>
</apply>
<bind><csymbol cd="quant1">exists</csymbol>
<bvar><ci>i</ci></bvar>
<bvar><ci>j</ci></bvar>
<bvar><ci>k</ci></bvar>
<apply><csymbol cd="logic1">and</csymbol>
<apply><csymbol cd="set1">in</csymbol><ci>i</ci><csymbol cd="setname2">H</csymbol></apply>
<apply><csymbol cd="set1">in</csymbol><ci>j</ci><csymbol cd="setname2">H</csymbol></apply>
<apply><csymbol cd="set1">in</csymbol><ci>k</ci><csymbol cd="setname2">H</csymbol></apply>
<apply><csymbol cd="relation1">eq</csymbol>
<apply><csymbol cd="arith1">power</csymbol><ci>i</ci><cn>2</cn></apply>
<apply><csymbol cd="arith1">unary_minus</csymbol><csymbol cd="alg1">one</csymbol></apply>
</apply>
<apply><csymbol cd="relation1">eq</csymbol>
<apply><csymbol cd="arith1">power</csymbol><ci>j</ci><cn>2</cn></apply>
<apply><csymbol cd="arith1">unary_minus</csymbol><csymbol cd="alg1">one</csymbol></apply>
</apply>
<apply><csymbol cd="relation1">eq</csymbol>
<apply><csymbol cd="arith1">power</csymbol><ci>k</ci><cn>2</cn></apply>
<apply><csymbol cd="arith1">unary_minus</csymbol><csymbol cd="alg1">one</csymbol></apply>
</apply>
<apply><csymbol cd="relation1">eq</csymbol>
<apply><csymbol cd="arith1">times</csymbol><ci>i</ci><ci>j</ci><ci>k</ci></apply>
<apply><csymbol cd="arith1">unary_minus</csymbol><csymbol cd="alg1">one</csymbol></apply>
</apply>
<apply><csymbol cd="relation1">neq</csymbol>
<apply><csymbol cd="arith1">abs</csymbol><ci>i</ci></apply>
<csymbol cd="alg1">one</csymbol>
</apply>
<apply><csymbol cd="relation1">neq</csymbol>
<apply><csymbol cd="arith1">abs</csymbol><ci>j</ci></apply>
<csymbol cd="alg1">one</csymbol>
</apply>
<apply><csymbol cd="relation1">neq</csymbol>
<apply><csymbol cd="arith1">abs</csymbol><ci>k</ci></apply>
<csymbol cd="alg1">one</csymbol>
</apply>
<bind><csymbol cd="quant1">forall</csymbol>
<bvar><ci>q</ci></bvar>
<apply><csymbol cd="logic1">implies</csymbol>
<apply><csymbol cd="set1">in</csymbol><ci>q</ci><csymbol cd="setname2">H</csymbol></apply>
<bind><csymbol cd="quant1">exists</csymbol>
<bvar><ci>r0</ci></bvar>
<bvar><ci>r1</ci></bvar>
<bvar><ci>r2</ci></bvar>
<bvar><ci>r3</ci></bvar>
<apply><csymbol cd="logic1">and</csymbol>
<apply><csymbol cd="set1">in</csymbol><ci>r0</ci><csymbol cd="setname1">R</csymbol></apply>
<apply><csymbol cd="set1">in</csymbol><ci>r1</ci><csymbol cd="setname1">R</csymbol></apply>
<apply><csymbol cd="set1">in</csymbol><ci>r2</ci><csymbol cd="setname1">R</csymbol></apply>
<apply><csymbol cd="set1">in</csymbol><ci>r3</ci><csymbol cd="setname1">R</csymbol></apply>
<apply><csymbol cd="relation1">eq</csymbol>
<ci>q</ci>
<apply><csymbol cd="arith1">plus</csymbol>
<ci>r0</ci>
<apply><csymbol cd="arith1">times</csymbol><ci>r1</ci><ci>i</ci></apply>
<apply><csymbol cd="arith1">times</csymbol><ci>r2</ci><ci>j</ci></apply>
<apply><csymbol cd="arith1">times</csymbol><ci>r3</ci><ci>k</ci></apply>
</apply>
</apply>
</apply>
</bind>
</apply>
</bind>
</apply>
</bind>
</apply>
</math>
Popcorn
set1.in(alg1.one, setname2.H) and quant1.exists[$i, $j, $k -> set1.in($i, setname2.H) and set1.in($j, setname2.H) and set1.in($k, setname2.H) and $i ^ 2 = -(alg1.one) and $j ^ 2 = -(alg1.one) and $k ^ 2 = -(alg1.one) and $i * $j * $k = -(alg1.one) and arith1.abs($i) != alg1.one and arith1.abs($j) != alg1.one and arith1.abs($k) != alg1.one and quant1.forall[$q -> set1.in($q, setname2.H) ==> quant1.exists[$r0, $r1, $r2, $r3 -> set1.in($r0, setname1.R) and set1.in($r1, setname1.R) and set1.in($r2, setname1.R) and set1.in($r3, setname1.R) and $q = $r0 + $r1 * $i + $r2 * $j + $r3 * $k]]]
Rendered Presentation MathML
1
∈
H
∧
∃
i
,
j
,
k
.
i
∈
H
∧
j
∈
H
∧
k
∈
H
∧
i
2
=
-
1
∧
j
2
=
-
1
∧
k
2
=
-
1
∧
i
j
k
=
-
1
∧
|
i
|
≠
1
∧
|
j
|
≠
1
∧
|
k
|
≠
1
∧
∀
q
.
q
∈
H
⇒
∃
r
0
,
r
1
,
r
2
,
r
3
.
r
0
∈
R
∧
r
1
∈
R
∧
r
2
∈
R
∧
r
3
∈
R
∧
q
=
r
0
+
r
1
i
+
r
2
j
+
r
3
k