trans_rank_2 Subroutine

public subroutine trans_rank_2(A, A_T)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(in)			::	A(:,:)
real(kind=8),	intent(out),		allocatable	::	A_T(:,:)