rmatstr Subroutine

public subroutine rmatstr(str, lstr, a, n, m, mlin, mcol, tolp, nfil)

Writes structure of real(kind=dp) $N\times N$ matrix $A$

Arguments

Type	Intent	Optional	Attributes		Name
character(len=lstr)				::	str
integer,	intent(in)			::	lstr
real(kind=dp)				::	a(m,m)
integer,	intent(in)			::	n
integer,	intent(in)			::	m
integer,	intent(in)			::	mlin
integer,	intent(in)			::	mcol
real(kind=dp),	intent(in)			::	tolp
integer,	intent(in)			::	nfil