// bo2-1.cpp 順序表示的線(xiàn)性表(存儲(chǔ)結(jié)構(gòu)由c2-1.h定義)的基本操作(12個(gè))
 Status InitList(SqList &L) // 算法2.3
 { // 操作結(jié)果：構(gòu)造一個(gè)空的順序線(xiàn)性表
   L.elem=(ElemType*)malloc(LIST_INIT_SIZE*sizeof(ElemType));
   if(!L.elem)
     exit(OVERFLOW); // 存儲(chǔ)分配失敗
   L.length=0; // 空表長(zhǎng)度為0
   L.listsize=LIST_INIT_SIZE; // 初始存儲(chǔ)容量
   return OK;
 }

 Status DestroyList(SqList &L)
 { // 初始條件：順序線(xiàn)性表L已存在。操作結(jié)果：銷(xiāo)毀順序線(xiàn)性表L
   free(L.elem);
   L.elem=NULL;
   L.length=0;
   L.listsize=0;
   return OK;
 }

 Status ClearList(SqList &L)
 { // 初始條件：順序線(xiàn)性表L已存在。操作結(jié)果：將L重置為空表
   L.length=0;
   return OK;
 }

 Status ListEmpty(SqList L)
 { // 初始條件：順序線(xiàn)性表L已存在。操作結(jié)果：若L為空表，則返回TRUE，否則返回FALSE
   if(L.length==0)
     return TRUE;
   else
     return FALSE;
 }

 int ListLength(SqList L)
 { // 初始條件：順序線(xiàn)性表L已存在。操作結(jié)果：返回L中數(shù)據(jù)元素個(gè)數(shù)
   return L.length;
 }

 Status GetElem(SqList L,int i,ElemType &e)
 { // 初始條件：順序線(xiàn)性表L已存在，1≤i≤ListLength(L)
   // 操作結(jié)果：用e返回L中第i個(gè)數(shù)據(jù)元素的值
   if(i<1||i>L.length)
     exit(ERROR);
   e=*(L.elem+i-1);
   return OK;
 }

 int LocateElem(SqList L,ElemType e,Status(*compare)(ElemType,ElemType))
 { // 初始條件：順序線(xiàn)性表L已存在，compare()是數(shù)據(jù)元素判定函數(shù)(滿(mǎn)足為1,否則為0)
   // 操作結(jié)果：返回L中第1個(gè)與e滿(mǎn)足關(guān)系compare()的數(shù)據(jù)元素的位序。
   //           若這樣的數(shù)據(jù)元素不存在，則返回值為0。算法2.6
   ElemType *p;
   int i=1; // i的初值為第1個(gè)元素的位序
   p=L.elem; // p的初值為第1個(gè)元素的存儲(chǔ)位置
   while(i<=L.length&&!compare(*p++,e))
     ++i;
   if(i<=L.length)
     return i;
   else
     return 0;
 }

 Status PriorElem(SqList L,ElemType cur_e,ElemType &pre_e)
 { // 初始條件：順序線(xiàn)性表L已存在
   // 操作結(jié)果：若cur_e是L的數(shù)據(jù)元素，且不是第一個(gè)，則用pre_e返回它的前驅(qū)，
   //           否則操作失敗，pre_e無(wú)定義
   int i=2;
   ElemType *p=L.elem+1;
   while(i<=L.length&&*p!=cur_e)
   {
     p++;
     i++;
   }
   if(i>L.length)
     return INFEASIBLE;
   else
   {
     pre_e=*--p;
     return OK;
   }
 }

 Status NextElem(SqList L,ElemType cur_e,ElemType &next_e)
 { // 初始條件：順序線(xiàn)性表L已存在
   // 操作結(jié)果：若cur_e是L的數(shù)據(jù)元素，且不是最后一個(gè)，則用next_e返回它的后繼，
   //           否則操作失敗，next_e無(wú)定義
   int i=1;
   ElemType *p=L.elem;
   while(i<L.length&&*p!=cur_e)
   {
     i++;
     p++;
   }
   if(i==L.length)
     return INFEASIBLE;
   else
   {
     next_e=*++p;
     return OK;
   }
 }

 Status ListInsert(SqList &L,int i,ElemType e) // 算法2.4
 { // 初始條件：順序線(xiàn)性表L已存在，1≤i≤ListLength(L)+1
   // 操作結(jié)果：在L中第i個(gè)位置之前插入新的數(shù)據(jù)元素e，L的長(zhǎng)度加1
   ElemType *newbase,*q,*p;
   if(i<1||i>L.length+1) // i值不合法
     return ERROR;
   if(L.length>=L.listsize) // 當(dāng)前存儲(chǔ)空間已滿(mǎn),增加分配
   {
     if(!(newbase=(ElemType *)realloc(L.elem,(L.listsize+LISTINCREMENT)*sizeof(ElemType))))
       exit(OVERFLOW); // 存儲(chǔ)分配失敗
     L.elem=newbase; // 新基址
     L.listsize+=LISTINCREMENT; // 增加存儲(chǔ)容量
   }
   q=L.elem+i-1; // q為插入位置
   for(p=L.elem+L.length-1;p>=q;--p) // 插入位置及之后的元素右移
     *(p+1)=*p;
   *q=e; // 插入e
   ++L.length; // 表長(zhǎng)增1
   return OK;
 }

 Status ListDelete(SqList &L,int i,ElemType &e) // 算法2.5
 { // 初始條件：順序線(xiàn)性表L已存在，1≤i≤ListLength(L)
   // 操作結(jié)果：刪除L的第i個(gè)數(shù)據(jù)元素，并用e返回其值，L的長(zhǎng)度減1
   ElemType *p,*q;
   if(i<1||i>L.length) // i值不合法
     return ERROR;
   p=L.elem+i-1; // p為被刪除元素的位置
   e=*p; // 被刪除元素的值賦給e
   q=L.elem+L.length-1; // 表尾元素的位置
   for(++p;p<=q;++p) // 被刪除元素之后的元素左移
     *(p-1)=*p;
   L.length--; // 表長(zhǎng)減1
   return OK;
 }

 Status ListTraverse(SqList L,void(*vi)(ElemType&))
 { // 初始條件：順序線(xiàn)性表L已存在
   // 操作結(jié)果：依次對(duì)L的每個(gè)數(shù)據(jù)元素調(diào)用函數(shù)vi()。一旦vi()失敗，則操作失敗
   //           vi()的形參加'&'，表明可通過(guò)調(diào)用vi()改變?cè)氐闹?   ElemType *p;
   int i;
   p=L.elem;
   for(i=1;i<=L.length;i++)
     vi(*p++);
   cout<<endl;
   return OK;
 }