Cloned SEACAS for EXODUS library with extra build files for internal package management.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

28 lines
735 B

2 years ago
/*
* Copyright(C) 1999-2020 National Technology & Engineering Solutions
* of Sandia, LLC (NTESS). Under the terms of Contract DE-NA0003525 with
* NTESS, the U.S. Government retains certain rights in this software.
*
* See packages/seacas/LICENSE for details
*/
void makev2cv(
/* Construct mapping from original graph vtxs to coarsened graph vtxs. */
int *mflag, /* flag indicating vtx selected or not */
int nvtxs, /* number of vtxs in original graph */
int *v2cv /* mapping from vtxs to coarsened vtxs */
)
{
int i, j; /* loop counters */
j = 1;
for (i = 1; i <= nvtxs; i++) {
if (mflag[i] == 0 || mflag[i] > i) {
v2cv[i] = j++;
}
else {
v2cv[i] = v2cv[mflag[i]];
}
}
}