fp_invert_mat Subroutine

public subroutine fp_invert_mat(ax, xx)

Calculate the inverse "xx" for the matrix "ax" (from STPK)

Arguments

Type	Intent	Optional	Attributes		Name
double precision,	intent(in)			::	ax(:,:)	Input matrix
double precision,	intent(inout)			::	xx(size(ax,1),size(ax,2))	Inverse