Бинарные деревья1 / BINTREE

#include"globalbt.h"
#include<stdio.h>
#include<stdlib.h>

struct Node // 㧥«:
{ Elem Info; // = ᮤҐа¦Ё¬®Ґ
Node *LSub; // = «Ґў®Ґ Ї®¤¤ҐаҐў®
Node *RSub; // = Їа ў®Ґ Ї®¤¤ҐаҐў®
};// Node
typedef Node *BinT;
void Otkaz ( int n )
// ўлўҐбвЁ б®®ЎйҐ­ЁҐ ЇаЁ Ї®ЇлвЄҐ ўлЇ®«­Ґ­Ёп
// ­Ґ¤®ЇгбвЁ¬ле ®ЇҐа жЁ© Ё § ўҐаиЁвм а Ў®вг Їа®Ја ¬¬л
{
printf("\n");
switch (n)
{case 1 : printf( "Ћ’ЉЂ‡ : RootBT( Null_Bin_Tree ) !");break;
case 2 : printf( "Ћ’ЉЂ‡ : LeftBT( Null_Bin_Tree ) !");break;
case 3 : printf( "Ћ’ЉЂ‡ : RightBT( Null_Bin_Tree ) !");break;
case 4 : printf( "Ћ’ЉЂ‡ : ЁбзҐаЇ ­  Ї ¬пвм !");break;
case 5 : printf( "Ћ’ЉЂ‡ : SetLeft( Null_Bin_Tree )");break;
case 6 : printf( "Ћ’ЉЂ‡ : SetLeft( Not ( Null_Bin_Tree ( LeftBT ) ) )");break;
case 7 : printf( "Ћ’ЉЂ‡ : SetRight( Null_Bin_Tree )");break;
case 8 : printf( "Ћ’ЉЂ‡ : SetRight( Not ( Null_Bin_Tree ( RightBT ) ) )");break;
default: printf( "Ћ’ЉЂ‡ : ?");
}
//exit(1);гЎа ­ ¤«п вҐбвЁа®ў ­Ёп!!!!
}// Otkaz

BinT CreateBT()
//ᮧ¤ вм Їгб⮥ ¤ҐаҐў®
{ return 0; }//CreateBT

int NullBT ( BinT t )
//а®ўҐаЁвм ¤ҐаҐў® ­  Їгбв®вг
{ return ( t==0 );}// NullBT

Elem RootBT ( BinT t )
// ўл¤Ґ«Ёвм Є®аҐ­м ¤ҐаҐў 
// ®вЄ § - Null
// Pred: not Null(t)
{ if ( t ) return( t->Info ); else Otkaz(1); return 0; }// RootBT

BinT LeftBT ( BinT t )
/* ўл¤Ґ«Ёвм «Ґў®Ґ Ї®¤¤ҐаҐў®
®вЄ § - Null}
Pred: not Null(t) */
{ if ( t ) return( t->LSub ); else Otkaz(2); return 0; }// LeftBT

BinT RightBT ( BinT t )
/* ўл¤Ґ«Ёвм Їа ў®Ґ Ї®¤¤ҐаҐў®
®вЄ § - Null
Pred: not Null(t) */
{ if ( t ) return( t->RSub ); else Otkaz(3); return 0;}// RightBT


BinT ConsBT ( Elem e, BinT LS, BinT RS )
/* Є®­бвагЄв®а
®вЄ § - ­Ґ еў в Ґв Ї ¬пвЁ ¤«п ­®ў®Ј® н«Ґ¬Ґ­в */

{ BinT b=new( Node );
b->Info=e; b->LSub=LS; b->RSub=RS;
return ( b );
//else Otkaz(4);
}// ConsBT

void DestroyBT ( BinT &b )
//®зЁбвЁвм Ї ¬пвм § ­Ё¬ Ґ¬го н«Ґ¬Ґ­в ¬Ё ¤ҐаҐў }
{if ( b )
{ DestroyBT ( b->LSub );
DestroyBT ( b->RSub );
delete ( b );
}
}//DestroyBT

//----------------„®Ї®«­ЁвҐ«м­лҐ дг­ЄжЁЁ-----------------------------------
BinT MakeRoot ( Elem e )
/* ᮧ¤ вм Є®аҐ­м ¤ҐаҐў 
®вЄ § - ­Ґ еў в Ґв Ї ¬пвЁ ¤«п ­®ў®Ј® н«Ґ¬Ґ­в */
{ BinT b=new( Node );
b->Info=e; b->LSub=0; b->RSub=0;
return b;
// else Otkaz(4);
}// MakeRoot

void SetLeft ( Elem e, BinT b )
/* Ї®¤ўҐбЁвм ­®ўл© 㧥« ў «Ґў®Ґ Ї®¤¤ҐаҐў®
®вЄ § - not Null, not Null(LeftBT) */
{ if ( !b ) Otkaz(5);
else if ( !LeftBT( b ) ) b->LSub=MakeRoot ( e );
else Otkaz(6);
}// SetLeft

void SetRight ( Elem e, BinT b )
// { Ї®¤ўҐбЁвм ­®ўл© 㧥« ў Їа ў®Ґ Ї®¤¤ҐаҐў®
// ®вЄ § - not Null, not Null(RightBT) }
{ if ( !b ) Otkaz(7);
else if ( !RightBT( b ) ) b->RSub=MakeRoot ( e );
else Otkaz(8);
}// SetRight