Annotation of OpenXM_contrib/PHC/Ada/Schubert/brackets_io.ads, Revision 1.1.1.1
1.1 maekawa 1: with text_io,Brackets; use text_io,Brackets;
2:
3: package Brackets_io is
4:
5: -- DESCRIPTION :
6: -- This package provides input/output operations for brackets.
7:
8: procedure get ( b : in out Bracket );
9: procedure get ( file : in file_type; b : in out Bracket );
10: procedure get ( b : in out Bracket; sign : out integer );
11: procedure get ( file : in file_type; b : in out Bracket; sign : out integer );
12:
13: -- DESCRIPTION :
14: -- Expects as many natural number as the length of b,
15: -- either from Standard_Input or from file if specified.
16: -- Optionally, the sign of the permutation to order the entries
17: -- is returned.
18:
19: procedure put ( b : in Bracket );
20: procedure put ( file : in file_type; b : in Bracket );
21:
22: -- DESCRIPTION :
23: -- Writes down the entries in the bracket, either on
24: -- Standard_Output or on file if specified.
25:
26: end Brackets_io;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>