put_diag Interface

public interface put_diag

Contents

Module Procedures

put_diag_rv put_diag_r

Module Procedures

public subroutine put_diag_rv(diagv, mat)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(in),		DIMENSION(:)	::	diagv
real(kind=SP),	intent(inout),		DIMENSION(:,:)	::	mat

public subroutine put_diag_r(scal, mat)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(in)			::	scal
real(kind=SP),	intent(inout),		DIMENSION(:,:)	::	mat