The R Project SVN R-packages

Rev

Rev 155 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 155 Rev 1128
Line 19... Line 19...
19 
/*************************************************************************
 19 
/*************************************************************************
20 
* This function creates the coarser graph
 20 
* This function creates the coarser graph
21 
**************************************************************************/
 21 
**************************************************************************/
22 
void CreateCoarseGraph(CtrlType *ctrl, GraphType *graph, int cnvtxs, idxtype *match, idxtype *perm)
 22 
void CreateCoarseGraph(CtrlType *ctrl, GraphType *graph, int cnvtxs, idxtype *match, idxtype *perm)
23 
{
 23 
{
24 
  int i, j, jj, k, kk, l, m, istart, iend, nvtxs, nedges, ncon, cnedges, v, u, mask, dovsize;
 24 
  int i, j, jj, k, kk, /* l, */ m, istart, iend, nvtxs, nedges, ncon,
- 
 
 25 
      cnedges, v, u, mask, dovsize;
25 
  idxtype *xadj, *vwgt, *vsize, *adjncy, *adjwgt, *adjwgtsum, *auxadj;
 26 
  idxtype *xadj, *vwgt, *vsize, *adjncy, *adjwgt, *adjwgtsum, *auxadj;
26 
  idxtype *cmap, *htable;
 27 
  idxtype *cmap, *htable;
27 
  idxtype *cxadj, *cvwgt, *cvsize, *cadjncy, *cadjwgt, *cadjwgtsum;
 28 
  idxtype *cxadj, *cvwgt, *cvsize, *cadjncy, *cadjwgt, *cadjwgtsum;
28 
  float *nvwgt, *cnvwgt;
 29 
  float *nvwgt, *cnvwgt;
29 
  GraphType *cgraph;
 30 
  GraphType *cgraph;
Line 325... Line 326...
325 
 
 326 
 
326 
 
 327 
 
327 
/*************************************************************************
 328 
/*************************************************************************
328 
* This function creates the coarser graph
 329 
* This function creates the coarser graph
329 
**************************************************************************/
 330 
**************************************************************************/
330 
void CreateCoarseGraph_NVW(CtrlType *ctrl, GraphType *graph, int cnvtxs, idxtype *match, idxtype *perm)
 331 
void CreateCoarseGraph_NVW(CtrlType *ctrl, GraphType *graph,
- 
 
 332 
			   int cnvtxs, idxtype *match, idxtype *perm)
331 
{
 333 
{
332 
  int i, j, jj, k, kk, l, m, istart, iend, nvtxs, nedges, ncon, cnedges, v, u, mask;
 334 
  int i, j, jj, k, kk, /* l, */ m, istart, iend, nvtxs, nedges, ncon,
- 
 
 335 
      cnedges, v, u, mask;
333 
  idxtype *xadj, *adjncy, *adjwgtsum, *auxadj;
 336 
  idxtype *xadj, *adjncy, *adjwgtsum, *auxadj;
334 
  idxtype *cmap, *htable;
 337 
  idxtype *cmap, *htable;
335 
  idxtype *cxadj, *cvwgt, *cadjncy, *cadjwgt, *cadjwgtsum;
 338 
  idxtype *cxadj, *cvwgt, *cadjncy, *cadjwgt, *cadjwgtsum;
336 
  float *nvwgt, *cnvwgt;
 339 
  float *nvwgt, *cnvwgt;
337 
  GraphType *cgraph;
 340 
  GraphType *cgraph;