Fortran 90 interface to core functions.
More...
|
subroutine, public | ppm_base::abort_ppm (msg, source, line, comm) |
| this should go into a wrapper module
|
|
subroutine, public | ppm_base::set_default_comm (comm) |
| change value of default communicator object used in library calls parallel routines in the library will assume that all participating processes are organized in this communicator
|
|
subroutine, public | ppm_base::set_abort_handler (f) |
| set routine f to use as abort function which is called on ppm_abort
|
|
subroutine | restore_default_abort_handler |
|
subroutine | assertion (cond, source, line, msg) |
| check invariant and call abort_ppm if false
|
|
|
integer, parameter, public | ppm_base::mpi_comm_world = 0 |
| communicator object to use by default
|
|
integer, public | ppm_base::ppm_default_comm |
| communicator object to use by default
|
|
Fortran 90 interface to core functions.
- Copyright
- Copyright (C) 2010 Thomas Jahns jahns.nosp@m.@dkr.nosp@m.z.de
- Version
- 1.0
- Author
- Thomas Jahns jahns.nosp@m.@dkr.nosp@m.z.de
◆ abort_ppm()
subroutine, public ppm_base::abort_ppm |
( |
character(len=*), intent(in) | msg, |
|
|
character(len=*), intent(in) | source, |
|
|
integer, intent(in) | line, |
|
|
integer, intent(in), optional | comm ) |
this should go into a wrapper module
abort operation in library, this will call the function reference assigned to PPM_abort on the C side and substitute non-provided optional dummy arguments as needed.
- Parameters
-
msg | text to write to standard error |
source | string describing source file name |
line | line number of caller |
comm | communicator to use in PPM_abort call, defaults to ppm_default_comm if not given |
◆ assertion()
subroutine set_abort_handler::assertion |
( |
logical, intent(in) | cond, |
|
|
character(len=*), intent(in), optional | source, |
|
|
integer, intent(in), optional | line, |
|
|
character(len=*), intent(in), optional | msg ) |
|
private |
check invariant and call abort_ppm if false
- Parameters
-
cond | invariant to test |
source | string describing source file name |
line | line number of caller |
msg | text to use as diagnostic message |
◆ restore_default_abort_handler()
subroutine set_abort_handler::restore_default_abort_handler |
( |
void | | ) |
|
|
private |
Restore default abort handler.
Das diesem Bericht zugrundeliegende Vorhaben wurde mit Mitteln des Bundesministeriums für Bildung, und Forschung unter dem Förderkennzeichen 01IH08004E gefördert. Die Verantwortung für den Inhalt dieser Veröffentlichung liegt beim Autor.