gram_real Subroutine

public subroutine gram_real(m, n, mat_v, mat_v_out)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	m
integer,	intent(in)			::	n
real(kind=8),	intent(in)			::	mat_v(1:m,1:n)
real(kind=8),	intent(out)			::	mat_v_out(1:m,1:n)