invert_transpose_flag Subroutine

private subroutine invert_transpose_flag(trans_flag)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(inout)			::	trans_flag