OilfieldToolsNet/opm-simulators
4
0
Fork 0
mirror of https://github.com/OPM/opm-simulators.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

Avoid signed/unsigned problem.

Browse Source
This commit is contained in:
Bård Skaflestad 2011-05-27 23:17:44 +02:00
parent 809763f333
commit bfc50ea14b
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/sparse_sys.c
View File

@ -203,14 +203,14 @@ void
csrmatrix_write(const struct CSRMatrix *A, const char *fn)
/* ---------------------------------------------------------------------- */
{
int i, j;
FILE *fp;
size_t i, j;
FILE *fp;
fp = fopen(fn, "wt");
if (fp != NULL) {
for (i = j = 0; i < A->m; i++) {
for (; j < A->ia[i + 1]; j++) {
for (; j < (size_t) (A->ia[i + 1]); j++) {
fprintf(fp, "%lu %lu %26.18e\n",
(unsigned long) (i + 1),
(unsigned long) (A->ja[j] + 1),