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

Don't expose a (presently) internal function.

Browse Source
This commit is contained in:
Bård Skaflestad 2012-05-09 18:58:17 +02:00
parent d23c93e661
commit 323914eaba
2 changed files with 7 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
opm/core/pressure/tpfa/ifs_tpfa.c
View File

@ -11,8 +11,12 @@
#include <opm/core/pressure/tpfa/ifs_tpfa.h> #include <opm/core/pressure/tpfa/ifs_tpfa.h>
void mult_csr_matrix(const struct CSRMatrix* A, const double* u, double* v) { static void
size_t i,j; mult_csr_matrix(const struct CSRMatrix* A,
const double* u,
double* v)
{
size_t i, j;
for (j = 0; j < A->m; ++j) { for (j = 0; j < A->m; ++j) {
v[j] = 0; v[j] = 0;
for (i = (size_t) (A->ia[j]); i < (size_t) (A->ia[j+1]); ++i) { for (i = (size_t) (A->ia[j]); i < (size_t) (A->ia[j+1]); ++i) {
@ -761,7 +765,7 @@ ifs_tpfa_assemble_comprock_increment(struct UnstructuredGrid *G ,
mult_csr_matrix(h->A, prev_pressure, v); mult_csr_matrix(h->A, prev_pressure, v);
/* We want to solve a Newton step for the residual /* We want to solve a Newton step for the residual
* (porevol(pressure)-porevol(initial_pressure))/dt + residual_for_imcompressible * (porevol(pressure)-porevol(initial_pressure))/dt + residual_for_imcompressible
* *
*/ */

3
opm/core/pressure/tpfa/ifs_tpfa.h
View File

@ -62,9 +62,6 @@ ifs_tpfa_construct(struct UnstructuredGrid *G,
struct Wells *W); struct Wells *W);
void mult_csr_matrix(const struct CSRMatrix* A, const double* u, double* v);
int int
ifs_tpfa_assemble(struct UnstructuredGrid *G , ifs_tpfa_assemble(struct UnstructuredGrid *G ,
const struct ifs_tpfa_forces *F , const struct ifs_tpfa_forces *F ,