数据结s构课件c语言描述第5章.pptVIP

switch ( ls-utype ) { case 0: q-value.ref = ls-value.ref; break; case 1: q-value.intgrinfo = ls-value.intgrinfo; break; case 2: q-value.charinfo = ls-value.charinfo; break; case 3: q-value.hlink = Copy (ls-value.hlink); } q-tlink = Copy (ls-tlink); } return q; } ? ? ? 求广义表的深度 例如，对于广义表 E (B (a, b), D (B (a, b), C (u, (x, y, z)), A ( ) ) ) 1 1 1 1 2 3 4 int GenList :: depth ( GenListNode *ls ) { if ( ls-tlink == NULL ) return 1; //空表 GenListNode * temp = ls-tlink; int m = 0; while ( temp != NULL ) { //在表顶层横扫 if ( temp-utype == 3 ) { //结点为表结点 int n = depth ( temp-value.hlink ); if ( m n ) m = n; //m记最大深度 } temp = temp-tlink; } return m+1; } int GenList :: depth ( ) { return depth ( first ); } 广义表的删除算法 0 1 1 5 3 3 1 2 ? 0 1 2 ‘x’ ? 0 1 0 1 2 ‘y’ ls 3 2 ‘x’ ? ? 扫描子链表 若结点数据为‘x’, 删除。可能做循环连续删。 若结点数据不为‘x’，不执行删除。 若结点为子表，递归在子表执行删除。 扫描子链表 若结点数据为‘x’, 删除。可能做循环连续删。 若结点数据不为‘x’，不执行删除。 若结点为子表，递归在子表执行删除。 void delvalue(GenListNode * ls, const value x) { //在广义表中删除所有含 x 的结点 if ( ls-tlink != NULL ) { //非空表 GenListNode * p = ls-tlink; while ( p != NULL //横扫链表 ( ( p-utype == 1 p-value.intinfo == x ) || ( p-utype == 2 p-value.charinfo == x ) ) { ls-tlink = p-tlink; delete p; //删除 p = ls-tlink; //指向同一层后继结点 } if ( p != NULL ) { if ( p-utype == 3 ) //在子表中删除 delvalue ( p-value.hlink, x ); delvalue ( p, x ); //在后续链表中删除 } } } GenList :: ~GenList ( ) { //析构函数 Remove ( first ); delete (first); } void GenList :: Remove ( GenListNode *ls ) { //私有函数：释放以 ls 为表头指针的广义表 ls-value.ref --; //引用计数减1 if (