Epetra Package Browser (Single Doxygen Collection)
Development
test
Map
test/Map/c_main.c
Go to the documentation of this file.
1
/*
2
//@HEADER
3
// ************************************************************************
4
//
5
// Epetra: Linear Algebra Services Package
6
// Copyright 2011 Sandia Corporation
7
//
8
// Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
9
// the U.S. Government retains certain rights in this software.
10
//
11
// Redistribution and use in source and binary forms, with or without
12
// modification, are permitted provided that the following conditions are
13
// met:
14
//
15
// 1. Redistributions of source code must retain the above copyright
16
// notice, this list of conditions and the following disclaimer.
17
//
18
// 2. Redistributions in binary form must reproduce the above copyright
19
// notice, this list of conditions and the following disclaimer in the
20
// documentation and/or other materials provided with the distribution.
21
//
22
// 3. Neither the name of the Corporation nor the names of the
23
// contributors may be used to endorse or promote products derived from
24
// this software without specific prior written permission.
25
//
26
// THIS SOFTWARE IS PROVIDED BY SANDIA CORPORATION "AS IS" AND ANY
27
// EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29
// PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL SANDIA CORPORATION OR THE
30
// CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
31
// EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
32
// PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
33
// PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
34
// LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
35
// NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
36
// SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37
//
38
// Questions? Contact Michael A. Heroux (maherou@sandia.gov)
39
//
40
// ************************************************************************
41
//@HEADER
42
*/
43
44
/*
45
file main.c
46
*/
47
#include <stdio.h>
48
#include "mpi.h"
49
#include "Petra_c_wrappers.h"
50
51
int
main
(
int
argc,
char
*argv[]) {
52
int
mypid;
53
PETRA_COMM petra_comm;
54
/*
55
Start executable statements.
56
*/
57
MPI_Init(&argc,&argv);
58
petra_comm = petra_comm_create( MPI_COMM_WORLD );
59
/*
60
MPI_Comm_size(MPI_COMM_WORLD,&numprocs);
61
MPI_Comm_rank(MPI_COMM_WORLD,&myid);
62
*/
63
mypid = petra_comm_getmypid(petra_comm);
64
printf(
"MyPID = %d\n"
,mypid);
65
MPI_Finalize();
66
67
return
0;
68
}
69
70
/*
71
end of file main.c
72
*/
main
int main(int argc, char *argv[])
Definition:
test/Map/c_main.c:51
Generated by
1.8.14