Skip to content
GitLab
Explore
Sign in
Primary navigation
Search or go to…
Project
N
n-body_methods
Manage
Activity
Members
Labels
Plan
Issues
0
Issue boards
Milestones
Wiki
Code
Merge requests
0
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Snippets
Build
Pipelines
Jobs
Pipeline schedules
Artifacts
Deploy
Releases
Operate
Environments
Monitor
Incidents
Service Desk
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
CodeVault
hpc-kernels
n-body_methods
Commits
2b358363
Commit
2b358363
authored
8 years ago
by
Paul Heinzlreiter
Browse files
Options
Downloads
Patches
Plain Diff
* added test program
parent
bf539406
Branches
Branches containing commit
No related merge requests found
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
bh_tree_mpi/mpitest.cpp
+45
-0
45 additions, 0 deletions
bh_tree_mpi/mpitest.cpp
with
45 additions
and
0 deletions
bh_tree_mpi/mpitest.cpp
0 → 100644
+
45
−
0
View file @
2b358363
#include
<mpi.h>
#include
<vector>
#include
"datastructures/Body.hpp"
int
main
(
int
argc
,
char
**
argv
)
{
using
namespace
nbody
;
using
namespace
std
;
/*
MPI::Datatype Btype;
MPI::Datatype type[3] = {MPI::DOUBLE, MPI::DOUBLE, MPI::DOUBLE};
int blocks[3] = {3, 3, 1};
MPI::Aint disp[3];
//Body data[16];
vector<Body> data;
MPI::Init(argc, argv);
if (MPI::COMM_WORLD.Get_rank() == 0) {
for (int i = 0; i < 16; i++) {
Body b;
data.push_back(b);
}
} else {
data.reserve(16);
}
*/
MPI
::
Init
(
argc
,
argv
);
MPI
::
Datatype
Btype
;
MPI
::
Datatype
type
[
3
]
=
{
MPI
::
DOUBLE
,
MPI
::
DOUBLE
,
MPI
::
DOUBLE
};
int
blocks
[
3
]
=
{
3
,
3
,
1
};
MPI
::
Aint
disp
[
3
];
Body
data
[
16
];
disp
[
0
]
=
MPI
::
Get_address
(
data
[
0
].
position
);
disp
[
1
]
=
MPI
::
Get_address
(
data
[
0
].
velocity
);
disp
[
2
]
=
MPI
::
Get_address
(
&
data
[
0
].
mass
);
Btype
=
Btype
.
Create_struct
(
3
,
blocks
,
disp
,
type
);
Btype
.
Commit
();
MPI
::
COMM_WORLD
.
Bcast
(
MPI
::
BOTTOM
,
16
,
Btype
,
0
);
Btype
.
Free
();
MPI
::
Finalize
();
return
0
;
}
This diff is collapsed.
Click to expand it.
Preview
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
register
or
sign in
to comment