inverse Subroutine

private subroutine inverse(nmat, mat)

Helper routine here only for host since mod_rllsllutils does not exsist in the host code

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nmat
complex(kind=dp)				::	mat(nmat,nmat)