SABER
|
Generic ranks, dimensions and types. More...
Data Types | |
type | mpl_type |
Functions/Subroutines | |
subroutine | mpl_newunit (mpl, lunit) |
Find a free unit. More... | |
subroutine | mpl_init (mpl, f_comm) |
Initialize MPL object. More... | |
subroutine | mpl_final (mpl) |
Finalize MPI. More... | |
subroutine | mpl_flush (mpl, advance_flag) |
Flush listings. More... | |
subroutine | mpl_abort (mpl, subr, message) |
Clean MPI abort. More... | |
subroutine | mpl_warning (mpl, subr, message) |
Print warning message. More... | |
subroutine | mpl_print_instance (mpl) |
Print instance. More... | |
subroutine | mpl_timings (mpl) |
Print execution timings. More... | |
subroutine | mpl_update_tag (mpl, add) |
Update MPI tag. More... | |
subroutine | mpl_allgather_int_r1 (mpl, var, proc_to_var) |
Allgather for a 1d array. More... | |
subroutine | mpl_allgather_real_r1 (mpl, var, proc_to_var) |
Allgather for a 1d array. More... | |
subroutine | mpl_allgather_logical_r1 (mpl, var, proc_to_var) |
Allgather for a 1d array. More... | |
subroutine | mpl_broadcast_string_r1 (mpl, var, root) |
Broadcast string array, 1d. More... | |
subroutine | mpl_dot_prod_r1 (mpl, fld1, fld2, dp) |
Global dot product over local fields. More... | |
subroutine | mpl_dot_prod_r2 (mpl, fld1, fld2, dp) |
Global dot product over local fields. More... | |
subroutine | mpl_dot_prod_r3 (mpl, fld1, fld2, dp) |
Global dot product over local fields. More... | |
subroutine | mpl_dot_prod_r4 (mpl, fld1, fld2, dp) |
Global dot product over local fields. More... | |
subroutine | mpl_glb_to_loc_index (mpl, n_loc, loc_to_glb, n_glb, glb_to_loc, glb_to_proc, rootproc, pool) |
Communicate global index to local index. More... | |
subroutine | mpl_glb_to_loc_int_r1 (mpl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool) |
Global to local. More... | |
subroutine | mpl_glb_to_loc_int_r2 (mpl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool) |
Global to local. More... | |
subroutine | mpl_glb_to_loc_real_r1 (mpl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool) |
Global to local. More... | |
subroutine | mpl_glb_to_loc_real_r2 (mpl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool) |
Global to local. More... | |
subroutine | mpl_glb_to_loc_logical_r1 (mpl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool) |
Global to local. More... | |
subroutine | mpl_glb_to_loc_logical_r2 (mpl, n_loc, n_glb, loc_to_glb, glb, loc, rootproc, pool) |
Global to local. More... | |
subroutine | mpl_loc_to_glb_int_r1 (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast) |
Local to global. More... | |
subroutine | mpl_loc_to_glb_int_r2 (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast) |
Local to global. More... | |
subroutine | mpl_loc_to_glb_real_r1 (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast) |
Local to global. More... | |
subroutine | mpl_loc_to_glb_real_r2 (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast) |
Local to global. More... | |
subroutine | mpl_loc_to_glb_logical_r1 (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast) |
Local to global. More... | |
subroutine | mpl_loc_to_glb_logical_r2 (mpl, n_loc, n_glb, loc_to_glb, loc, glb, bcast) |
Local to global. More... | |
subroutine | mpl_prog_init (mpl, nprog) |
Initialize progression display. More... | |
subroutine | mpl_prog_print (mpl, i) |
Print progression display. More... | |
subroutine | mpl_prog_final (mpl, advance_flag) |
Finalize progression display. More... | |
subroutine | mpl_write_int_r0 (mpl, variables, var) |
Write int into a log file. More... | |
subroutine | mpl_write_real_r0 (mpl, variables, var) |
Write real into a log file. More... | |
subroutine | mpl_write_logical_r0 (mpl, variables, var) |
Write logical into a log file. More... | |
subroutine | mpl_write_string_r0 (mpl, variables, var) |
Write string into a log file. More... | |
subroutine | mpl_write_int_r1 (mpl, variables, n, var) |
Write int array into a log file. More... | |
subroutine | mpl_write_real_r1 (mpl, variables, n, var) |
Write real array into a log file. More... | |
subroutine | mpl_write_logical_r1 (mpl, variables, n, var) |
Write logical array into a log file. More... | |
subroutine | mpl_write_string_r1 (mpl, variables, n, var) |
Write string array into a log file. More... | |
Variables | |
integer, parameter | lunit_min = 10 |
Minimum unit number. More... | |
integer, parameter | lunit_max = 1000 |
Maximum unit number. More... | |
integer, parameter | ddis = 5 |
Progression display step. More... | |
real(kind_real) | min_total_timing = one |
Minimum total timing to print. More... | |
integer | max_calls = 10 |
Number of timing to print with maximum calls. More... | |
Generic ranks, dimensions and types.
Subroutines/functions list Instrumentation functions MPI parameters derived type
|
private |
Clean MPI abort.
[in,out] | mpl | MPI data |
[in] | subr | Calling subroutine |
Definition at line 517 of file type_mpl.F90.
|
private |
Allgather for a 1d array.
[in,out] | mpl | MPI data |
[in] | var | Input real array, 1d |
[out] | proc_to_var | Ouput real array, (1+1)d |
Definition at line 720 of file type_mpl.F90.
|
private |
Allgather for a 1d array.
[in,out] | mpl | MPI data |
[in] | var | Input real array, 1d |
[out] | proc_to_var | Ouput real array, (1+1)d |
Definition at line 816 of file type_mpl.F90.
|
private |
Allgather for a 1d array.
[in,out] | mpl | MPI data |
[in] | var | Input real array, 1d |
[out] | proc_to_var | Ouput real array, (1+1)d |
Definition at line 768 of file type_mpl.F90.
|
private |
Broadcast string array, 1d.
[in,out] | mpl | MPI data |
[in,out] | var | Logical array, 1d |
[in] | root | Root task |
Definition at line 865 of file type_mpl.F90.
|
private |
Global dot product over local fields.
[in,out] | mpl | MPI data |
[in] | fld1 | Field 1 |
[in] | fld2 | Field 2 |
[out] | dp | Global dot product |
Definition at line 920 of file type_mpl.F90.
|
private |
Global dot product over local fields.
[in,out] | mpl | MPI data |
[in] | fld1 | Field 1 |
[in] | fld2 | Field 2 |
[out] | dp | Global dot product |
Definition at line 964 of file type_mpl.F90.
|
private |
Global dot product over local fields.
[in,out] | mpl | MPI data |
[in] | fld1 | Field 1 |
[in] | fld2 | Field 2 |
[out] | dp | Global dot product |
Definition at line 1008 of file type_mpl.F90.
|
private |
Global dot product over local fields.
[in,out] | mpl | MPI data |
[in] | fld1 | Field 1 |
[in] | fld2 | Field 2 |
[out] | dp | Global dot product |
Definition at line 1052 of file type_mpl.F90.
|
private |
|
private |
Flush listings.
[in,out] | mpl | MPI data |
[in] | advance_flag | Advance flag |
Definition at line 393 of file type_mpl.F90.
|
private |
Communicate global index to local index.
[in,out] | mpl | MPI data |
[in] | n_loc | Local dimension |
[in] | loc_to_glb | Local to global index |
[in] | n_glb | Global dimension |
[out] | glb_to_loc | Global to local index |
[out] | glb_to_proc | Global to processor |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1097 of file type_mpl.F90.
|
private |
Global to local.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | glb | Global array |
[out] | loc | Local array |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1196 of file type_mpl.F90.
|
private |
Global to local.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | glb | Global array |
[out] | loc | Local array |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1320 of file type_mpl.F90.
|
private |
Global to local.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | glb | Global array |
[out] | loc | Local array |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1714 of file type_mpl.F90.
|
private |
Global to local.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | glb | Global array |
[out] | loc | Local array |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1838 of file type_mpl.F90.
|
private |
Global to local.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | glb | Global array |
[out] | loc | Local array |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1455 of file type_mpl.F90.
|
private |
Global to local.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | glb | Global array |
[out] | loc | Local array |
[in] | rootproc | Root task |
[in] | pool | Tasks pool |
Definition at line 1579 of file type_mpl.F90.
|
private |
Initialize MPL object.
[in,out] | mpl | MPI data |
[in] | f_comm | FCKIT MPI communicator wrapper |
Definition at line 301 of file type_mpl.F90.
|
private |
Local to global.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | loc | Local array |
[out] | glb | Global array |
[in] | bcast | Broadcast option |
Definition at line 1975 of file type_mpl.F90.
|
private |
Local to global.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | loc | Local array |
[out] | glb | Global array |
[in] | bcast | Broadcast option |
Definition at line 2095 of file type_mpl.F90.
|
private |
Local to global.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | loc | Local array |
[out] | glb | Global array |
[in] | bcast | Broadcast option |
Definition at line 2485 of file type_mpl.F90.
|
private |
Local to global.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | loc | Local array |
[out] | glb | Global array |
[in] | bcast | Broadcast option |
Definition at line 2605 of file type_mpl.F90.
|
private |
Local to global.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | loc | Local array |
[out] | glb | Global array |
[in] | bcast | Broadcast option |
Definition at line 2230 of file type_mpl.F90.
|
private |
Local to global.
[in,out] | mpl | MPI data |
[in] | n_loc | Local array size |
[in] | n_glb | Global array size |
[in] | loc_to_glb | Local to global |
[in] | loc | Local array |
[out] | glb | Global array |
[in] | bcast | Broadcast option |
Definition at line 2350 of file type_mpl.F90.
|
private |
Find a free unit.
[in,out] | mpl | MPI data |
[out] | lunit | New unit |
Definition at line 262 of file type_mpl.F90.
|
private |
|
private |
Finalize progression display.
[in,out] | mpl | MPI data |
[in] | advance_flag | Advance flag |
Definition at line 2828 of file type_mpl.F90.
|
private |
Initialize progression display.
[in,out] | mpl | MPI data |
[in] | nprog | Array size |
Definition at line 2740 of file type_mpl.F90.
|
private |
Print progression display.
[in,out] | mpl | MPI data |
[in] | i | Index |
Definition at line 2782 of file type_mpl.F90.
|
private |
Print execution timings.
[in,out] | mpl | MPI data |
Definition at line 586 of file type_mpl.F90.
|
private |
Update MPI tag.
[in,out] | mpl | MPI data |
[in] | add | Tag update incrememnt |
Definition at line 689 of file type_mpl.F90.
|
private |
Print warning message.
[in,out] | mpl | MPI data |
[in] | subr | Calling subroutine |
Definition at line 542 of file type_mpl.F90.
|
private |
Write int into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | var | Variable |
Definition at line 2881 of file type_mpl.F90.
|
private |
Write int array into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | n | Array size |
[in] | var | Array |
Definition at line 3060 of file type_mpl.F90.
|
private |
Write logical into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | var | Variable |
Definition at line 2974 of file type_mpl.F90.
|
private |
Write logical array into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | n | Array size |
[in] | var | Array |
Definition at line 3168 of file type_mpl.F90.
|
private |
Write real into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | var | Variable |
Definition at line 2930 of file type_mpl.F90.
|
private |
Write real array into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | n | Array size |
[in] | var | Array |
Definition at line 3116 of file type_mpl.F90.
|
private |
Write string into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | var | Variable |
Definition at line 3016 of file type_mpl.F90.
|
private |
Write string array into a log file.
[in,out] | mpl | MPI data |
[in] | variables | Variable name |
[in] | n | Array size |
[in] | var | Array |
Definition at line 3216 of file type_mpl.F90.
integer, parameter type_mpl::ddis = 5 |
Progression display step.
Definition at line 58 of file type_mpl.F90.
integer, parameter type_mpl::lunit_max = 1000 |
Maximum unit number.
Definition at line 57 of file type_mpl.F90.
integer, parameter type_mpl::lunit_min = 10 |
Minimum unit number.
Definition at line 56 of file type_mpl.F90.
integer type_mpl::max_calls = 10 |
Number of timing to print with maximum calls.
Definition at line 60 of file type_mpl.F90.
real(kind_real) type_mpl::min_total_timing = one |
Minimum total timing to print.
Definition at line 59 of file type_mpl.F90.