第九周 项目4--广义表算法库及应用（2）

/*
*Copyright （c）2016，烟台大学计算机学院
*All rights reserved.
*文件名称：传写.cpp
*作者：李欣
*完成日期：2016年12月15日
*版本号：v1.0

*/

main.cpp

#include "glist.h"  
#include "stdio.h"  
int main()  
{  
    GLNode *g;  
    char *s="(a,(b,c,(#),d),((e,f),g((#))))";  
    g = CreateGL(s);  
    DispGL(g);  
    printf("\n");  
    printf("原子个数 :%d\n", atomnum(g));  
    printf("最大原子 :%c\n", maxatom(g));  
    return 0;  
}  

glist.cpp

#include <malloc.h>  
#include "stdio.h"  
#include "glist.h"  
int GLLength(GLNode *g)//求广义表g的长度  
{  
    int  n=0;  
    GLNode *g1;  
    g1=g->val.sublist;//g1指向广义表的第一个元素  
    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=NULL;  
    ch= * s++;//取下一个字符  
    if(g!=NULL)//串末结束,继续构造兄弟节点  
    {  
        if(ch ==',')//当前字符为","  
         g->link=CreateGL(s);//递归构造兄弟节点  
        else   //没有兄弟了，将兄弟指针置为NULL  
          g->link=NULL;  
    }  
    return 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);  
        }  
    }  
}  
  
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;  
}  

glist.h

#ifndef GLIST_H_INCLUDED  
#define GLIST_H_INCLUDED  
  
#include "stdio.h"  
#include <malloc.h>  
typedef  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  
int atomnum(GLNode *g);  //求广义表g中的原子个数  
ElemType maxatom(GLNode *g);             //求广义表g中最大原子  
  
#endif // GLIST_H_INCLUDED  

运行结果：