1 /* Copyright 2004,2007 ENSEIRB, INRIA & CNRS
2 **
3 ** This file is part of the Scotch software package for static mapping,
4 ** graph partitioning and sparse matrix ordering.
5 **
6 ** This software is governed by the CeCILL-C license under French law
7 ** and abiding by the rules of distribution of free software. You can
8 ** use, modify and/or redistribute the software under the terms of the
9 ** CeCILL-C license as circulated by CEA, CNRS and INRIA at the following
10 ** URL: "http://www.cecill.info".
11 **
12 ** As a counterpart to the access to the source code and rights to copy,
13 ** modify and redistribute granted by the license, users are provided
14 ** only with a limited warranty and the software's author, the holder of
15 ** the economic rights, and the successive licensors have only limited
16 ** liability.
17 **
18 ** In this respect, the user's attention is drawn to the risks associated
19 ** with loading, using, modifying and/or developing or reproducing the
20 ** software by the user in light of its specific status of free software,
21 ** that may mean that it is complicated to manipulate, and that also
22 ** therefore means that it is reserved for developers and experienced
23 ** professionals having in-depth computer knowledge. Users are therefore
24 ** encouraged to load and test the software's suitability as regards
25 ** their requirements in conditions enabling the security of their
26 ** systems and/or data to be ensured and, more generally, to use and
27 ** operate it in the same conditions as regards security.
28 **
29 ** The fact that you are presently reading this means that you have had
30 ** knowledge of the CeCILL-C license and that you accept its terms.
31 */
32 /************************************************************/
33 /** **/
34 /** NAME : vgraph_separate_zr.c **/
35 /** **/
36 /** AUTHOR : Francois PELLEGRINI **/
37 /** **/
38 /** FUNCTION : This module moves all of the vertices **/
39 /** to the first subdomain. **/
40 /** **/
41 /** DATES : # Version 4.0 : from : 10 sep 2002 **/
42 /** to 29 may 2004 **/
43 /** **/
44 /************************************************************/
45
46 /*
47 ** The defines and includes.
48 */
49
50 #define VMESH_SEPARATE_ZR
51
52 #include "module.h"
53 #include "common.h"
54 #include "graph.h"
55 #include "mesh.h"
56 #include "vmesh.h"
57 #include "vmesh_separate_zr.h"
58
59 /*****************************/
60 /* */
61 /* This is the main routine. */
62 /* */
63 /*****************************/
64
65 /* This routine moves all of the mesh nodes
66 ** and elements to the first part of the
67 ** partition.
68 ** It returns:
69 ** - 0 : if the bipartitioning could be computed.
70 ** - !0 : on error.
71 */
72
73 int
vmeshSeparateZr(Vmesh * restrict const meshptr)74 vmeshSeparateZr (
75 Vmesh * restrict const meshptr)
76 {
77 if (meshptr->ncmpload[0] != meshptr->m.vnlosum) /* If not all vertices already in part zero */
78 vmeshZero (meshptr);
79
80 return (0);
81 }
82