multiply_transpose Subroutine

public subroutine multiply_transpose(A, B)

Multiplies a matrix with its transpose:

Arguments

Type IntentOptional Attributes Name
real(kind=rp), intent(in), dimension(:,:) :: A

(m,n) array

real(kind=rp), intent(out), dimension(:,:) :: B

(m,m) array