function r8mat_print ( m, n, a, title ) %% R8MAT_PRINT prints an R8MAT, with an optional title. % % Modified: % % 06 September 2004 % % Author: % % John Burkardt % % Parameters: % % Input, integer M, the number of rows in A. % % Input, integer N, the number of columns in A. % % Input, real A(M,N), the matrix. % % Input, character ( len = * ) TITLE, a title to be printed. % r8mat_print_some ( m, n, a, 1, 1, m, n, title );