Perform an abnormal program termination.
More...
|
subroutine, public | print_message (message, output_unit, declev, before, after) |
| Perform a basic blocking of the text in message and print it optionally decorated with a frame of stars as defined by declev. More...
|
|
Perform an abnormal program termination.
- Note
- These routines are low-level and thus provide also an error recovery when dependencies do not allow the use of the error logger. Only the master (root) process will dump, if para_env is available and properly specified. Otherwise (without any information about the parallel environment) most likely more than one process or even all processes will send their error dump to the default output unit.
- History
- Routine external_control moved to a separate module
- Delete stop_memory routine, rename module
- Author
- Matthias Krack (12.02.2001)
◆ print_message()
subroutine, public print_messages::print_message |
( |
character(len=*), intent(in) |
message, |
|
|
integer, intent(in) |
output_unit, |
|
|
integer, intent(in), optional |
declev, |
|
|
integer, intent(in), optional |
before, |
|
|
integer, intent(in), optional |
after |
|
) |
| |
Perform a basic blocking of the text in message and print it optionally decorated with a frame of stars as defined by declev.
- Parameters
-
message | ... |
output_unit | ... |
declev | ... |
before | ... |
after | ... |
- Date
- 28.08.1996
- History
- Translated to Fortran 90/95 (07.10.1999, Matthias Krack)
- CP2K by JH 21.08.2000
- Bugs in the dynamic format generation removed (09.02.2001, MK)
- Revised (26.01.2011,MK)
- Author
- Matthias Krack (MK)
- Note
- after : Number of empty lines after the message. before : Number of empty lines before the message. declev : Decoration level (0,1,2, ... star lines). message : String with the message text. output_unit: Logical unit number of output unit.
Definition at line 55 of file print_messages.F.