Add utility functions for retrieving phase transmissibilities.

This commit is contained in:
Bård Skaflestad 2010-11-22 12:17:14 +01:00
parent 08e2e9c1a3
commit a8f831be6c
2 changed files with 38 additions and 0 deletions

View File

@ -655,6 +655,32 @@ cfs_tpfa_fpress(grid_t *G,
}
/* ---------------------------------------------------------------------- */
void
cfs_tpfa_retrieve_masstrans(grid_t *G,
int np,
struct cfs_tpfa_data *h,
double *masstrans_f)
/* ---------------------------------------------------------------------- */
{
memcpy(masstrans_f, h->pimpl->masstrans_f,
np * G->number_of_faces * sizeof *masstrans_f);
}
/* ---------------------------------------------------------------------- */
void
cfs_tpfa_retrieve_gravtrans(grid_t *G,
int np,
struct cfs_tpfa_data *h,
double *gravtrans_f)
/* ---------------------------------------------------------------------- */
{
memcpy(gravtrans_f, h->pimpl->gravtrans_f,
np * G->number_of_faces * sizeof *gravtrans_f);
}
/* ---------------------------------------------------------------------- */
void
cfs_tpfa_destroy(struct cfs_tpfa_data *h)

View File

@ -74,6 +74,18 @@ cfs_tpfa_fpress(grid_t *G,
const double *fflux,
double *fpress);
void
cfs_tpfa_retrieve_masstrans(grid_t *G,
int np,
struct cfs_tpfa_data *h,
double *masstrans_f);
void
cfs_tpfa_retrieve_gravtrans(grid_t *G,
int np,
struct cfs_tpfa_data *h,
double *gravtrans_f);
void
cfs_tpfa_destroy(struct cfs_tpfa_data *h);