第八周 【项目9-广义表算法库及应用】

广义算法库采用程序的多文件组织形式，包括两个文件：

　　1.头文件：glist.h，包含定义广义表数据结构的代码、宏定义、要实现算法的函数的声明；

#ifndef GLIST_H_INCLUDED#define GLIST_H_INCLUDEDtypedef char ElemType;typedef struct lnode{    int tag;                    //节点类型标识    union    {        ElemType data;          //原子值        struct lnode *sublist;  //指向子表的指针    } val;    struct lnode *link;         //指向下一个元素} GLNode;                       //广义表节点类型定义int GLLength(GLNode *g);        //求广义表g的长度int GLDepth(GLNode *g);     //求广义表g的深度GLNode *CreateGL(char *&s);     //返回由括号表示法表示s的广义表链式存储结构void DispGL(GLNode *g);                 //输出广义表g#endif // GLIST_H_INCLUDED
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

2.源文件：glist.cpp，包含实现各种算法的函数的定义

#include <stdio.h>#include <malloc.h>#include "glist.h"int GLLength(GLNode *g)     //求广义表g的长度{    int n=0;    GLNode *g1;    g1=g->val.sublist;      //g指向广义表的第一个元素    while (g1!=NULL)    {        n++;                //累加元素个数        g1=g1->link;    }    return n;}int GLDepth(GLNode *g)      //求广义表g的深度{    GLNode *g1;    int max=0,dep;    if (g->tag==0)          //为原子时返回0        return 0;    g1=g->val.sublist;      //g1指向第一个元素    if (g1==NULL)           //为空表时返回1        return 1;    while (g1!=NULL)        //遍历表中的每一个元素    {        if (g1->tag==1)     //元素为子表的情况        {            dep=GLDepth(g1);    //递归调用求出子表的深度            if (dep>max)    //max为同一层所求过的子表中深度的最大值                max=dep;        }        g1=g1->link;            //使g1指向下一个元素    }    return(max+1);          //返回表的深度}GLNode *CreateGL(char *&s)      //返回由括号表示法表示s的广义表链式存储结构{    GLNode *g;    char ch=*s++;                       //取一个字符    if (ch!='\0')                      //串未结束判断    {        g=(GLNode *)malloc(sizeof(GLNode));//创建一个新节点        if (ch=='(')                    //当前字符为左括号时        {            g->tag=1;                   //新节点作为表头节点            g->val.sublist=CreateGL(s); //递归构造子表并链到表头节点        }        else if (ch==')')            g=NULL;                     //遇到')'字符,g置为空        else if (ch=='#')               //遇到'#'字符，表示为空表            g=NULL;        else                            //为原子字符        {            g->tag=0;                   //新节点作为原子节点            g->val.data=ch;        }    }    else                                 //串结束,g置为空        g=NULL;    ch=*s++;                            //取下一个字符    if (g!=NULL)                        //串未结束，继续构造兄弟节点    {        if (ch==',')                    //当前字符为','            g->link=CreateGL(s);        //递归构造兄弟节点        else                            //没有兄弟了,将兄弟指针置为NULL            g->link=NULL;    }    return g;                           //返回广义表g}void DispGL(GLNode *g)                  //输出广义表g{    if (g!=NULL)                        //表不为空判断    {        //先处理g的元素        if (g->tag==0)                  //g的元素为原子时            printf("%c", g->val.data);  //输出原子值        else                            //g的元素为子表时        {            printf("(");                //输出'('            if (g->val.sublist==NULL)   //为空表时                printf("#");            else                        //为非空子表时                DispGL(g->val.sublist); //递归输出子表            printf(")");                //输出')'        }        if (g->link!=NULL)        {            printf(",");            DispGL(g->link);            //递归输出后续表的内容        }    }}
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98

3.在同一项目（project）中建立一个源文件(如main.cpp)，编制main函数，完成相关的测试工作。 例：

#include <stdio.h>#include "glist.h"int main(){    GLNode *g;    char *s="(b,(b,a,(#),d),((a,b),c((#))))";    g = CreateGL(s);    DispGL(g);    printf("广义表长度:%d\n", GLLength(g));    printf("广义表深度:%d\n", GLDepth(g));    return 0;}
【项目 -广义表的原子统计】 
设计算法，求出给定广义表g中的原子个数和最大原子
[参考解答] （头文件glist.h是广义表算法库建设的成果，见链接…）
#include <stdio.h>#include "glist.h"int atomnum(GLNode *g)  //求广义表g中的原子个数{    if (g!=NULL)    {        if (g->tag==0)            return 1+atomnum(g->link);        else            return atomnum(g->val.sublist)+atomnum(g->link);    }    else        return 0;}ElemType maxatom(GLNode *g)             //求广义表g中最大原子{    ElemType max1,max2;    if (g!=NULL)    {        if (g->tag==0)        {            max1=maxatom(g->link);            return(g->val.data>max1?g->val.data:max1);        }        else        {            max1=maxatom(g->val.sublist);            max2=maxatom(g->link);            return(max1>max2?max1:max2);        }    }    else        return 0;}int main(){    GLNode *g;    char *s="(b,(b,a,(#),d),((a,b),c((#))))";    g = CreateGL(s);    DispGL(g);    printf("\n");    printf("原子个数 :%d\n", atomnum(g));    printf("最大原子 :%c\n", maxatom(g));    return 0;}