subtract_transpose Subroutine

public subroutine subtract_transpose(mat)

Calculates the difference of a square matrix and its transpose in place:

Arguments

Type IntentOptional Attributes Name
real(kind=rp), intent(inout), dimension(:,:) :: mat