Added print_matrix_mathematica routine