mod_mympi Module
Wrapper for the definition of the MPI helper functions
Note
ruess: taken from Pkkr_sidebranch2D_2014_12_16, created by Bernd Zimmermann
Variables
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public, | save | :: | myrank | = | -1 | |
| integer, | public, | save | :: | nranks | = | -1 | |
| integer, | public, | save | :: | master | = | -1 | |
| logical, | public, | save | :: | mpiatom | = | .false. | |
| integer, | public, | save | :: | mpiadapt | = | -1 |
Subroutines
public subroutine mympi_init()
- License
- Category
- communication, KKRhost
I n i t i a l i z a t i o n
o f
t h e
M P I
p r o c e s s
Arguments
Nonepublic subroutine distribute_work_energies(n_work, distribute_rest)
- License
- Category
- communication, KKRhost
W r a p p e r
f o r
w o r k
d i s t r i b u t i o n
o v e r
e n e r g i e s ,
a l s o
s a v e s
p a r a l l e l i z a t i o n
i n f o r m a t i o n
f o r
l a t e r
u s e
i n
t
_
m
p
i
_
c
_
g
r
i
d
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | n_work |
decide wether or not to distribute the rest rank or leave them idle |
||
| logical, | intent(in), | optional | :: | distribute_rest |
public subroutine distribute_work_atoms(n_work, i1_start, i1_end, distribute_rest)
- License
- Category
- communication, KKRhost
w r a p p e r
f o r
w o r k
d i s t r i b u t i o n
o v e r
a t o m s ,
a l s o
s a v e s
p a r a l l e l i z a t i o n
i n f o r m a t i o n
f o r
l a t e r
u s e
i n
t
_
m
p
i
_
c
_
g
r
i
d
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | n_work |
decide wether or not to distribute the rest rank or leave them idle |
||
| integer, | intent(out) | :: | i1_start |
number of energies to be distributed |
||
| integer, | intent(out) | :: | i1_end | |||
| logical, | intent(in), | optional | :: | distribute_rest |
number of energies to be distributed |