[cig-commits] [commit] rajesh-petsc-schur: Corrected the signature of velocities_conform_bcs (2ff7a48)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Wed Nov 5 19:10:47 PST 2014
Repository : https://github.com/geodynamics/citcoms
On branch : rajesh-petsc-schur
Link : https://github.com/geodynamics/citcoms/compare/464e1b32299b15819f93efd98d969cddb84dfe51...f97ae655a50bdbd6dac1923a3471ee4dae178fbd
>---------------------------------------------------------------
commit 2ff7a4827a74b2309095261e106f6ec0defb1ba8
Author: Rajesh Kommu <rajesh.kommu at gmail.com>
Date: Fri Sep 19 10:06:44 2014 -0700
Corrected the signature of velocities_conform_bcs
>---------------------------------------------------------------
2ff7a4827a74b2309095261e106f6ec0defb1ba8
lib/BC_util.c | 9 ++++-----
lib/prototypes.h | 2 +-
2 files changed, 5 insertions(+), 6 deletions(-)
diff --git a/lib/BC_util.c b/lib/BC_util.c
index 76f43bc..0e90603 100644
--- a/lib/BC_util.c
+++ b/lib/BC_util.c
@@ -162,7 +162,7 @@ void temperatures_conform_bcs2(E)
void velocities_conform_bcs(E,U)
struct All_variables *E;
- double **U;
+ double *U;
{
int node,m;
@@ -175,13 +175,12 @@ void velocities_conform_bcs(E,U)
for(node=1;node<=nno;node++) {
if (E->node[CPPR][node] & typex)
- U[CPPR][E->id[node].doff[1]] = E->sphere.cap[CPPR].VB[1][node];
+ U[E->id[node].doff[1]] = E->sphere.cap[CPPR].VB[1][node];
if (E->node[CPPR][node] & typey)
- U[CPPR][E->id[node].doff[2]] = E->sphere.cap[CPPR].VB[2][node];
+ U[E->id[node].doff[2]] = E->sphere.cap[CPPR].VB[2][node];
if (E->node[CPPR][node] & typez)
- U[CPPR][E->id[node].doff[3]] = E->sphere.cap[CPPR].VB[3][node];
+ U[E->id[node].doff[3]] = E->sphere.cap[CPPR].VB[3][node];
}
-
}
/*
diff --git a/lib/prototypes.h b/lib/prototypes.h
index 3e22fa4..03f341c 100644
--- a/lib/prototypes.h
+++ b/lib/prototypes.h
@@ -48,7 +48,7 @@ void internal_horizontal_bc(struct All_variables *, float *[], int, int, float,
void strip_bcs_from_residual(struct All_variables *, double *, int);
void temperatures_conform_bcs(struct All_variables *);
void temperatures_conform_bcs2(struct All_variables *);
-void velocities_conform_bcs(struct All_variables *, double **);
+void velocities_conform_bcs(struct All_variables *, double *);
void assign_internal_bc(struct All_variables *);
/* Checkpoints.c */
void output_checkpoint(struct All_variables *);
More information about the CIG-COMMITS
mailing list