广义表实验报告.docVIP

数据结构实验报告

题目：广义表抽象数据类型的实现

学院计算机学院

专业计算机科学与技术

年级班别2010级7班

学号

学生姓名

指导教师

成绩____________________

2012年6月

1.题目

实现广义表抽象数据类型GList

ADTGList{

数据对象：D＝{ei|i=1,2,...,n;n≥0;ei∈AtomSet或ei∈GList，AtomSet为某个数据对象}

数据关系：R1＝{ei-1,ei|ei-1,ei∈D,2=i=n}

基本操作：

InitGlist(L);

操作结果:创建空的广义表L

CreateGList(L,S);

初始条件:S是广义表的书写形式串

操作结果:由S创建广义表L

DestroyGlist(L);

初始条件:广义表L存在

操作结果:销毁广义表L

CopyGlist(T,L);

初始条件:广义表L存在

操作结果:由广义表L复制得到广义表T

GListLength(L);

初始条件:广义表L存在

操作结果:求广义表L的长度,即元素个数

GListDepth(L);

初始条件:广义表L存在

操作结果:求广义表L的深度

GlistEmpty(L);

初始条件:广义表L存在

操作结果:判断广义表L是否为空

GetHead(L);

初始条件:广义表L存在

操作结果:取广义表L的头

GetTail(L)

初始条件:广义表L存在

操作结果:取广义表L的尾

InsertFirst_GL(L,e)

初始条件:广义表L存在

操作结果:插入元素e作为广义表L的第一元素

DeleteFirst_GL(GListL,e)

初始条件:广义表L存在

操作结果:删除广义表L的第一元素，并用e返回其值

Traverse_GL(GListL,void(*v)(AtomType))

初始条件:广义表L存在

操作结果:遍历广义表L，用函数Visit处理每个元素

p=L;

if(p-tag==LIST!p-ptr.hp)

return0;

elseif(p-tag==ATOM)

return1;

else{

p=L-ptr.hp;

for(i=0;p;p=p-ptr.tp,i++);

returni;

}

}

-

intGListDepth(GListL) //求广义表深度

{

intmax,dep;

GListp;

p=L;

if(!L||p-tag==LISTp-ptr.hp==NULL)

return1;

elseif(p-tag==ATOM)

return0;

else

{

for(max=0,p=L-ptr.hp;p;p=p-ptr.tp)

{

dep=GListDepth(p);

if(depmax)

max=dep;

}

}

returnmax+1;

}

intGListEmpty(GListL) //判断广义表是否为空

{

if(!L||L-tag==LIST!L-ptr.hp)

return1;

return0;

}

GListGetHead(GListL) //取广义表表头

{

GListp,h;

if(!L||L-tag==LIST!L-ptr.hp)

{

printf(\nEmptyGList-NoGListhead!\n);

returnNULL;

}

p=(GList)malloc(sizeof(structGLNode));

h=L-ptr.hp;

p-tag=h-tag;

p-ptr.tp=NULL;

if(p-tag==ATOM)

p-atom=L-ptr.hp-atom;

else

CopyGList(p-ptr.hp,L-ptr.hp-ptr.hp);

returnp;

}

GListGetTail(GListL) //取广义表表尾

{

GListp;

if(!L)

{

printf(\nEmptyGList-NoGListtail!\n);

returnNULL;

}

p=(GList)malloc(sizeof(structGLNode));

p-tag=LIST;

p-ptr.tp=NULL