FV3 Bundle
|
Functions/Subroutines | |
subroutine, public | program_message (Name, Description, Revision) |
recursive subroutine, public | display_message (Routine_Name, Message, Error_State, Message_Log) |
integer function, public | open_message_log (Message_Log, File_ID) |
Variables | |
integer, parameter, public | success = 0 |
integer, parameter, public | information = 1 |
integer, parameter, public | warning = 2 |
integer, parameter, public | failure = 3 |
integer, parameter, public | undefined = 4 |
integer, parameter | max_n_states = 4 |
character(*), dimension(0:max_n_states), parameter | state_descriptor = (/ 'SUCCESS ', 'INFORMATION', 'WARNING ', 'FAILURE ', 'UNDEFINED ' /) |
recursive subroutine, public message_handler::display_message | ( | character(*), intent(in) | Routine_Name, |
character(*), intent(in) | Message, | ||
integer, intent(in) | Error_State, | ||
character(*), intent(in), optional | Message_Log | ||
) |
integer function, public message_handler::open_message_log | ( | character(*), intent(in) | Message_Log, |
integer, intent(out) | File_ID | ||
) |
Definition at line 178 of file Message_Handler.f90.
subroutine, public message_handler::program_message | ( | character(*), intent(in) | Name, |
character(*), intent(in) | Description, | ||
character(*), intent(in) | Revision | ||
) |
Definition at line 50 of file Message_Handler.f90.
integer, parameter, public message_handler::failure = 3 |
Definition at line 30 of file Message_Handler.f90.
integer, parameter, public message_handler::information = 1 |
Definition at line 28 of file Message_Handler.f90.
|
private |
Definition at line 34 of file Message_Handler.f90.
|
private |
Definition at line 35 of file Message_Handler.f90.
integer, parameter, public message_handler::success = 0 |
Definition at line 27 of file Message_Handler.f90.
integer, parameter, public message_handler::undefined = 4 |
Definition at line 31 of file Message_Handler.f90.
integer, parameter, public message_handler::warning = 2 |
Definition at line 29 of file Message_Handler.f90.