Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
GPIAG-Software
IFOS2D
Commits
f6c6b17b
Commit
f6c6b17b
authored
Mar 24, 2016
by
Florian Wittkamp
Browse files
Merge branch 'feature/Fix_L' into develop
parents
849cb82d
80ed8b79
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/exchange_par.c
View file @
f6c6b17b
...
...
@@ -377,7 +377,6 @@ void exchange_par(void){
}
/** if (MYID == 0) **/
if
(
MYID
!=
0
)
FL
=
vector
(
1
,
L
);
MPI_Barrier
(
MPI_COMM_WORLD
);
MPI_Bcast
(
&
idum
,
NPAR
,
MPI_INT
,
0
,
MPI_COMM_WORLD
);
...
...
@@ -661,6 +660,12 @@ void exchange_par(void){
TRKILL_STF_OFFSET
=
idum
[
115
];
TRKILL_STF_OFFSET_INVERT
=
idum
[
116
];
MPI_Bcast
(
&
FL
[
1
],
L
,
MPI_FLOAT
,
0
,
MPI_COMM_WORLD
);
if
(
MYID
!=
0
&&
L
>
0
)
{
FL
=
vector
(
1
,
L
);
}
if
(
L
>
0
)
{
MPI_Bcast
(
&
FL
[
1
],
L
,
MPI_FLOAT
,
0
,
MPI_COMM_WORLD
);
}
}
Write
Preview
Supports
Markdown
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!
Cancel
Please
register
or
sign in
to comment