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 86... Line 86...
86
/*************************************************************************
86
/*************************************************************************
87
* This function computes the initial id/ed 
87
* This function computes the initial id/ed 
88
**************************************************************************/
88
**************************************************************************/
89
void Compute2WayNodePartitionParams(CtrlType *ctrl, GraphType *graph)
89
void Compute2WayNodePartitionParams(CtrlType *ctrl, GraphType *graph)
90
{
90
{
91
  int i, j, k, l, nvtxs, nbnd;
91
  int i, j/* , k, l */, nvtxs, nbnd;
92
  idxtype *xadj, *adjncy, *adjwgt, *vwgt;
92
  idxtype *xadj, *adjncy, *adjwgt, *vwgt;
93
  idxtype *where, *pwgts, *bndind, *bndptr, *edegrees;
93
  idxtype *where, *pwgts, *bndind, *bndptr, *edegrees;
94
  NRInfoType *rinfo;
94
  NRInfoType *rinfo;
95
  int me, other;
95
  int me, other;
96
 
96
 
Line 141... Line 141...
141
/*************************************************************************
141
/*************************************************************************
142
* This function computes the initial id/ed 
142
* This function computes the initial id/ed 
143
**************************************************************************/
143
**************************************************************************/
144
void Project2WayNodePartition(CtrlType *ctrl, GraphType *graph)
144
void Project2WayNodePartition(CtrlType *ctrl, GraphType *graph)
145
{
145
{
146
  int i, j, nvtxs;
146
  int i/* , j */, nvtxs;
147
  idxtype *cmap, *where, *cwhere;
147
  idxtype *cmap, *where, *cwhere;
148
  GraphType *cgraph;
148
  GraphType *cgraph;
149
 
149
 
150
  cgraph = graph->coarser;
150
  cgraph = graph->coarser;
151
  cwhere = cgraph->where;
151
  cwhere = cgraph->where;