alareq()

subroutine alareq	(	character*3	PATH,
		integer	NMATS,
		logical, dimension( * )	DOTYPE,
		integer	NTYPES,
		integer	NIN,
		integer	NOUT
	)

ALAREQ

Purpose:

 ALAREQ handles input for the LAPACK test program.  It is called
 to evaluate the input line which requested NMATS matrix types for
 PATH.  The flow of control is as follows:

 If NMATS = NTYPES then
    DOTYPE(1:NTYPES) = .TRUE.
 else
    Read the next input line for NMATS matrix types
    Set DOTYPE(I) = .TRUE. for each valid type I
 endif

Parameters

[in]	PATH	PATH is CHARACTER*3 An LAPACK path name for testing.
[in]	NMATS	NMATS is INTEGER The number of matrix types to be used in testing this path.
[out]	DOTYPE	DOTYPE is LOGICAL array, dimension (NTYPES) The vector of flags indicating if each type will be tested.
[in]	NTYPES	NTYPES is INTEGER The maximum number of matrix types for this path.
[in]	NIN	NIN is INTEGER The unit number for input. NIN >= 1.
[in]	NOUT	NOUT is INTEGER The unit number for output. NOUT >= 1.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.