Annotation of OpenXM_contrib/PHC/Ada/Root_Counts/Symmetry/symmetry_group_io.ads, Revision 1.1
1.1 ! maekawa 1: with text_io; use text_io;
! 2: with Permutations,Symmetry_Group; use Permutations,Symmetry_Group;
! 3:
! 4: package Symmetry_Group_io is
! 5:
! 6: -- DESCRIPTION :
! 7: -- This package contains routines for input and output of
! 8: -- permutations and groups of permutations.
! 9:
! 10: procedure get ( p : out Permutation );
! 11: procedure get ( file : in file_type; p : out Permutation );
! 12:
! 13: -- DESCRIPTION :
! 14: -- Reads a permutation from standard input or from file.
! 15:
! 16: procedure get ( l : in out List_of_Permutations; n,nb : in natural );
! 17: procedure get ( file : in file_type;
! 18: l : in out List_of_Permutations; n,nb : in natural );
! 19:
! 20: -- DESCRIPTION :
! 21: -- Reads a list of permutations from standard in put or from file.
! 22: -- Vectors that do not represent permutations are ignored.
! 23:
! 24: -- ON ENTRY :
! 25: -- n the number of elements in the permutations;
! 26: -- nb the total number of permutations that must be read.
! 27:
! 28: procedure put ( p : in Permutation );
! 29: procedure put ( file : in file_type; p : in Permutation );
! 30:
! 31: -- DESCRIPTION :
! 32: -- Writes a permutation on standard output or on file.
! 33:
! 34: procedure put ( l : in List_of_Permutations );
! 35: procedure put ( file : in file_type; l : in List_of_Permutations );
! 36:
! 37: -- DESCRIPTION :
! 38: -- Writes a list of permutations on standard output or on file.
! 39:
! 40: end Symmetry_Group_io;
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>