Index: TECH/ListUtils.cls.xml
===================================================================
diff -u -r122 -r166
--- TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 122)
+++ TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 166)
@@ -202,24 +202,24 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Union">
+<Method name="Doorsnede">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>List1:%ListOfDataTypes,List2:%ListOfDataTypes</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
 	Set ListIt1 = ##class(TECH.ListIterator).%New(List1)
 	Set ListIt2 = ##class(TECH.ListIterator).%New(List2)
 	
-	Quit ..UnionVanIterators(ListIt1,ListIt2)
+	Quit ..DoorsnedeVanIterators(ListIt1,ListIt2)
 ]]></Implementation>
 </Method>
 
-<Method name="UnionVanIterators">
+<Method name="DoorsnedeVanIterators">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Iterator1:TECH.Iterator,Iterator2:TECH.Iterator</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
-	Set Union = ##class(%ListOfDataTypes).%New()
+	Set Doorsnede = ##class(%ListOfDataTypes).%New()
 	Set List1Ar = ##class(%ArrayOfDataTypes).%New()
 	While Iterator1.HasNext()
 	{
@@ -230,27 +230,27 @@
 	{
 		#dim ListItem As %CacheString = Iterator2.Next()
 		If List1Ar.IsDefined(ListItem){
-			Do Union.Insert(ListItem)
+			Do Doorsnede.Insert(ListItem)
 		}
 	}
-	Quit Union
+	Quit Doorsnede
 ]]></Implementation>
 </Method>
 
-<Method name="Intersect">
+<Method name="Unie">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>List1:%ListOfDataTypes,List2:%ListOfDataTypes</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
-<Implementation><![CDATA[	Quit ..IntersectionVanIterators(##class(TECH.ListIterator).%New(List1),##class(TECH.ListIterator).%New(List2))
+<Implementation><![CDATA[	Quit ..UnieVanIterators(##class(TECH.ListIterator).%New(List1),##class(TECH.ListIterator).%New(List2))
 ]]></Implementation>
 </Method>
 
-<Method name="IntersectionVanIterators">
+<Method name="UnieVanIterators">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>Iterator1:TECH.Iterator,Iterator2:TECH.Iterator</FormalSpec>
 <ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
-	Set Intersection = ##class(%ListOfDataTypes).%New()
+	Set Unie = ##class(%ListOfDataTypes).%New()
 	Set Array = ##class(%ArrayOfDataTypes).%New()
 	While Iterator1.HasNext()
 	{
@@ -264,10 +264,10 @@
 	Set Iterator = ##class(TECH.KeyListIterator).%New(Array)
 	While (Iterator.HasNext())
 	{
-		Do Intersection.Insert(Iterator.Next())
+		Do Unie.Insert(Iterator.Next())
 	}
 	
-	Quit Intersection
+	Quit Unie
 ]]></Implementation>
 </Method>