顺序合并两个线性链表及其测试函数

/*-------------------------------------
  函数说明：顺序合并两个线性链表
  日期：    2006.11.5
  作者：    DarrylFu
----------------------------------------*/
void MergeSqList(SqList La,SqList Lb,SqList &Lc)
{
 int ai,
  bj,
  i=0,
  j=0,  
  La_len=ListLength(La),
  Lb_len=ListLength(Lb);
 InitList(Lc);
 while(i<La_len&&j<Lb_len)
 {
  GetElem(La,i,ai);
  GetElem(Lb,j,bj);
  if(ai<bj)
  {
   ListInsert(Lc,i+j,ai);
   i++;
  }
  else
  {
   ListInsert(Lc,i+j,bj);
   j++;
  }

 }
 for(int m=i;m<La_len;m++)
 {
  GetElem(La,m,ai);
  ListInsert(Lc,j+m,ai);
 }
 for(int n=j;n<Lb_len;n++)
 {
  GetElem(Lb,m,bj);
  ListInsert(Lc,i+n,bj);
 }

}

/*-------------------------------------
  函数说明：测试顺序合并两个线性链表函数
  日期：    2006.11.5
  作者：    DarrylFu
----------------------------------------*/
void MergeSqListTest()
{
 SqList La,Lb,Lc;
 InitList(La);
 InitList(Lb);
 ListInsert(La,0,0);
 ListInsert(La,1,3);
 ListInsert(La,2,11);
 ListInsert(Lb,0,1);
 ListInsert(Lb,1,2);
 ListInsert(Lb,2,5);
 ListInsert(Lb,3,9);
 MergeSqList(La,Lb,Lc);
 ListTraverse(Lc,visit);
}