~ubuntu-branches/ubuntu/trusty/scotch/trusty-proposed

« back to all changes in this revision

Viewing changes to src/scotch/gmk_ub2.c

  • Committer: Bazaar Package Importer
  • Author(s): "Adam C. Powell, IV", Christophe Trophime, Adam C. Powell, IV
  • Date: 2010-12-29 13:07:19 UTC
  • mfrom: (1.1.6 upstream)
  • Revision ID: james.westby@ubuntu.com-20101229130719-jwalolw5d6av6wqx
Tags: 5.1.11.dfsg-1
[Christophe Trophime]
* New upstream release
* Forward-ported patches to version 5.1.10b.
* Install scotch headers properly.
* Fix chrpath commands in debian/rules.
* Fix (pt)scotch library install paths.
* Fix lintian errors and warnings.

[Adam C. Powell, IV]
* Forward-ported patches to version 5.1.11.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* Copyright 2004,2007,2008 ENSEIRB, INRIA & CNRS
 
1
/* Copyright 2004,2007,2008,2010 ENSEIRB, INRIA & CNRS
2
2
**
3
3
** This file is part of the Scotch software package for static mapping,
4
4
** graph partitioning and sparse matrix ordering.
54
54
/**                                 to   : 03 feb 2000     **/
55
55
/**                # Version 5.0  : from : 22 jan 2008     **/
56
56
/**                                 to   : 16 mar 2008     **/
 
57
/**                # Version 5.1  : from : 01 jul 2010     **/
 
58
/**                                 to   : 15 aug 2010     **/
57
59
/**                                                        **/
58
60
/************************************************************/
59
61
 
145
147
          usagePrint (stdout, C_usageList);
146
148
          return     (0);
147
149
        case 'V' :
148
 
          fprintf (stderr, "gmk_ub2, version %s - F. Pellegrini\n", SCOTCH_VERSION);
149
 
          fprintf (stderr, "Copyright 2004,2007,2008 ENSEIRB, INRIA & CNRS, France\n");
 
150
          fprintf (stderr, "gmk_ub2, version " SCOTCH_VERSION_STRING "\n");
 
151
          fprintf (stderr, "Copyright 2004,2007,2008,2010 ENSEIRB, INRIA & CNRS, France\n");
150
152
          fprintf (stderr, "This software is libre/free software under CeCILL-C -- see the user's manual for more information\n");
151
153
          return  (0);
152
154
        default :
161
163
  ubnbr = 1 <<  ubdim;                            /* Compute number of vertices */
162
164
  ubbit = 1 << (ubdim - 1);                       /* Bit to add on the left     */
163
165
 
164
 
  fprintf (C_filepntrsrcout, "0\n%ld\t%ld\n0\t000\n",
165
 
           (long) ubnbr,                          /* Print number of vertices     */
166
 
           (long) (4 * ubnbr - 6));               /* Print number of edges (arcs) */
 
166
  fprintf (C_filepntrsrcout, "0\n" SCOTCH_NUMSTRING "\t" SCOTCH_NUMSTRING "\n0\t000\n",
 
167
           (SCOTCH_Num) ubnbr,                    /* Print number of vertices     */
 
168
           (SCOTCH_Num) (4 * ubnbr - 6));         /* Print number of edges (arcs) */
167
169
 
168
170
  for (vertnum = 0; vertnum < ubnbr; vertnum ++) { /* For all vertices         */
169
171
    ngbnbr = 0;                                   /* No neighbors defined yet  */
174
176
 
175
177
    fprintf (C_filepntrsrcout, "%d", ngbnbr);     /* Output number of neighbors */
176
178
    for (j = 0; j < ngbnbr; j ++)
177
 
      fprintf (C_filepntrsrcout, "\t%ld", (long) ngbtab[j]);
 
179
      fprintf (C_filepntrsrcout, "\t" SCOTCH_NUMSTRING,
 
180
               (SCOTCH_Num) ngbtab[j]);
178
181
    fprintf (C_filepntrsrcout, "\n");
179
182
  }
180
183