function r8mat_transpose_print ( m, n, a, title ) %% R8MAT_TRANSPOSE_PRINT prints an R8MAT, transposed. % % Modified: % % 10 August 2004 % % Author: % % John Burkardt % % Parameters: % % Input, integer M, N, the number of rows and columns. % % Input, real A(M,N), an M by N matrix to be printed. % % Input, string TITLE, an optional title. % r8mat_transpose_print_some ( m, n, a, 1, 1, m, n, title );