Return to generic_matrices_io.ads CVS log

Up to [local] / OpenXM_contrib / PHC / Ada / Math_Lib / Matrices

Annotation of OpenXM_contrib/PHC/Ada/Math_Lib/Matrices/generic_matrices_io.ads, Revision 1.1

1.1     ! maekawa     1: with text_io;                            use text_io;
        !             2: with Abstract_Ring_io;
        !             3: with Generic_Vectors;
        !             4: with Generic_Matrices;
        !             5:
        !             6: generic
        !             7:
        !             8:   with package Ring_io is new Abstract_Ring_io(<>);  use Ring_io.Ring;
        !             9:   with package Vectors is new Generic_Vectors(Ring_io.Ring);
        !            10:   with package Matrices is new Generic_Matrices(Ring_io.Ring,Vectors);
        !            11:
        !            12: package Generic_Matrices_io is
        !            13:
        !            14: -- DESCRIPTION :
        !            15: --   Provides input/output routines for matrices with any entries.
        !            16:
        !            17:   use Matrices;
        !            18:
        !            19:   procedure get ( m : out Matrix );
        !            20:   procedure get ( file : in file_type; m : out Matrix );
        !            21:
        !            22:   procedure get ( m : out Matrix; rw1,rw2 : in integer );
        !            23:   procedure get ( file : in file_type; m : out Matrix; rw1,rw2 : in integer );
        !            24:
        !            25:   -- DESCRIPTION :
        !            26:   --   Reads an integer matrix m or m(rw1..rw2,m'range(2))
        !            27:   --   from standard input or on file.
        !            28:
        !            29:   procedure put ( m : in Matrix );
        !            30:   procedure put ( file : in file_type; m : in Matrix );
        !            31:
        !            32:   procedure put ( m : in Matrix; rw1,rw2 : in integer );
        !            33:   procedure put ( file : in file_type; m : in Matrix; rw1,rw2 : in integer );
        !            34:
        !            35:   -- DESCRIPTION :
        !            36:   --   Writes a matrix m or submatrix m(rw1..rw2,m'range(2))
        !            37:   --   on standard output or on file.
        !            38:
        !            39:   procedure put ( m : in Matrix; dp : in natural );
        !            40:   procedure put ( file : in file_type; m : in Matrix; dp : in natural );
        !            41:
        !            42:   procedure put ( m : in Matrix; rw1,rw2 : in integer; dp : in natural );
        !            43:   procedure put ( file : in file_type;
        !            44:                   m : in Matrix; rw1,rw2 : in integer; dp : in natural );
        !            45:
        !            46:   -- DESCRIPTION :
        !            47:   --   Writes a matrix m or submatrix m(rw1..rw2,m'range(2))
        !            48:   --   on standard output or on file, with dp decimal places.
        !            49:
        !            50: end Generic_Matrices_io;