deye Interface

public interface deye

Module Procedures

private pure function deye_matrix(n) result(A)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	n

Return Value real(kind=8), (n,n)

private pure function deye_indices(i, j) result(a)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	i
integer,	intent(in)			::	j

Return Value real(kind=8)