Index: vhUnitTest/TECH/Svg/BasisElementFactory/Test.cls.xml
===================================================================
diff -u -r3656 -r3658
--- vhUnitTest/TECH/Svg/BasisElementFactory/Test.cls.xml	(.../Test.cls.xml)	(revision 3656)
+++ vhUnitTest/TECH/Svg/BasisElementFactory/Test.cls.xml	(.../Test.cls.xml)	(revision 3658)
@@ -96,6 +96,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test Properties Coordinaat">
+<Implementation><![CDATA[
+	Set Coordinaat =##class(TECH.Svg.BasisElementFactory).%New().MaakCoordinaat(15,15)
+	Do $$$AssertEquals(Coordinaat.X,15)
+	Do $$$AssertEquals(Coordinaat.Y,15)
+]]></Implementation>
+</Method>
+
 <Method name="AssertSvg">
 <FormalSpec>SvgObject:TECH.Svg.Basis.DomElement,VerwachteXml:%String</FormalSpec>
 <Private>1</Private>