CFD/hypre
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Changed a few fprintf statements to hypre_fprintf.

Browse Source
This commit is contained in:
falgout 2012-06-05 16:27:05 +00:00
parent 42e8999940
commit 65e423461b
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
seq_mv/csr_matrix.c
View File

@ -319,15 +319,17 @@ hypre_CSRMatrixPrintHB( hypre_CSRMatrix *matrix_input,
fp = fopen(file_name, "w"); fp = fopen(file_name, "w");
fprintf(fp, "%-70s Key \n", "Title"); hypre_fprintf(fp, "%-70s Key \n", "Title");
ptrcrd = num_rows; ptrcrd = num_rows;
indcrd = matrix_i[num_rows]; indcrd = matrix_i[num_rows];
valcrd = matrix_i[num_rows]; valcrd = matrix_i[num_rows];
rhscrd = 0; rhscrd = 0;
totcrd = ptrcrd + indcrd + valcrd + rhscrd; totcrd = ptrcrd + indcrd + valcrd + rhscrd;
fprintf (fp, "%14d%14d%14d%14d%14d\n", totcrd, ptrcrd, indcrd, valcrd, rhscrd); hypre_fprintf (fp, "%14d%14d%14d%14d%14d\n",
fprintf (fp, "%-14s%14i%14i%14i%14i\n", "RUA", num_rows, num_rows, valcrd, 0); totcrd, ptrcrd, indcrd, valcrd, rhscrd);
fprintf (fp, "%-16s%-16s%-16s%26s\n", "(1I8)", "(1I8)", "(1E16.8)", ""); hypre_fprintf (fp, "%-14s%14i%14i%14i%14i\n", "RUA",
num_rows, num_rows, valcrd, 0);
hypre_fprintf (fp, "%-16s%-16s%-16s%26s\n", "(1I8)", "(1I8)", "(1E16.8)", "");
for (j = 0; j <= num_rows; j++) for (j = 0; j <= num_rows; j++)
{ {