将两个线性表合并

A=A交B

分析:扩大线性表A,将存在于线性表B中而不存在于线性表A中的数据元素插入线性表A中。
只要重线性表B中依次取得每个数据元素，并依次在线性表A中进行查访，若不存在，则插入之。

伪码描述：
Void union(List &La,List Lb)
{
 La_len=Listlength(La);
 Lb_len=Listlength(Lb);
 For(i=1;I<=Lb_len;i++)
  {
   GetElem(Lb,I,e);
   If(!LocateElem(La,e,equal))
ListInsert(La,++La_len,e);
  }
}