第九周 项目四 【广义表算法库及应用 2】

/* 
Copyright (c)2016,烟台大学计算机与控制工程学院 
All rights reserved. 
文件名称：项目4-2.cbp 
作    者：李潇 
完成日期：2016年11月3日 
版 本 号：v1.0 
 
问题描述：（1）设计一个算法，求出给定广义表g中的原子个数。 
          （2）设计一个算法，求出给定广义表g中的最大原子。 
输入描述：无 
程序输出：测试数据 
*/

//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

//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;
}

// 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;
}

运行结果：