Annotation of OpenXM_contrib/PHC/Ada/Schubert/pieri_trees_io.ads, Revision 1.1
1.1 ! maekawa 1: with text_io; use text_io;
! 2: with Pieri_Trees; use Pieri_Trees;
! 3:
! 4: package Pieri_Trees_io is
! 5:
! 6: -- DESCRIPTION :
! 7: -- This package provides output operations for Pieri trees.
! 8:
! 9: procedure put ( nd : in Pieri_Node );
! 10: procedure put ( file : in file_type; nd : in Pieri_Node );
! 11:
! 12: -- DESCRIPTION :
! 13: -- Writes the bracket and the triplet (c,i,h).
! 14:
! 15: procedure put ( lnd : in Link_to_Pieri_Node );
! 16: procedure put ( file : in file_type; lnd : in Link_to_Pieri_Node );
! 17:
! 18: -- DESCRIPTION :
! 19: -- Writes the Pieri node and the whole chain down in the tree.
! 20:
! 21: procedure put ( t : in Pieri_Tree );
! 22: procedure put ( file : in file_type; t : in Pieri_Tree );
! 23:
! 24: -- DESCRIPTION :
! 25: -- Writes all nodes of the Pieri tree, level by level.
! 26:
! 27: procedure put ( t : in Pieri_Tree; level : in natural );
! 28: procedure put ( file : in file_type; t : in Pieri_Tree; level : in natural );
! 29:
! 30: -- DESCRIPTION :
! 31: -- Writes all nodes of the Pieri tree at the indicated level.
! 32:
! 33: procedure Write_Tree ( t : in Pieri_Tree );
! 34: procedure Write_Tree ( file : in file_type; t : in Pieri_Tree );
! 35:
! 36: -- DESCRIPTION :
! 37: -- Writes the Pieri tree in a formatted way.
! 38:
! 39: end Pieri_Trees_io;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>