Index: TECH/Math.cls.xml
===================================================================
diff -u -r1748 -r1755
--- TECH/Math.cls.xml	(.../Math.cls.xml)	(revision 1748)
+++ TECH/Math.cls.xml	(.../Math.cls.xml)	(revision 1755)
@@ -115,13 +115,29 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Pow">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Grondtal:%Double,Exponent:%Integer</FormalSpec>
+<ReturnType>%Double</ReturnType>
+<Implementation><![CDATA[	Quit $zPower(Grondtal, Exponent)
+]]></Implementation>
+</Method>
+
 <Method name="Subdivide">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>TotalLength:%Numeric,NumberOfSubdivisions:TECH.Integer,Length:%Numeric</FormalSpec>
 <ReturnType>%Numeric</ReturnType>
 <Implementation><![CDATA[	Quit ..Ceil(Length*NumberOfSubdivisions/TotalLength)
 ]]></Implementation>
 </Method>
+
+<Method name="Pow2">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Grondtal:%Double</FormalSpec>
+<ReturnType>%Double</ReturnType>
+<Implementation><![CDATA[	Quit ..Pow(Grondtal, 2)
+]]></Implementation>
+</Method>
 </Class>