The ERROR subroutine prints an error message with traceback to the console and continues processing.
Syntax
ERROR (message)
message is an INTENT(IN) argument of type CHARACTER. It contains the message to be printed.
If the program is compiled with the -ntrace option, a traceback will not be printed.
Example
character(len=8) :: errmsg=' Error: ' call error(errmsg) ! writes Error: ! followed by a traceback message