fatal_error Subroutine

public subroutine fatal_error(scope, message)

Aborts the simulation with a formatted error message.

This routine should be used for unrecoverable errors (e.g., missing input files, converged solver failures). It writes to standard error and calls stop 1.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: scope

The name of the module or feature (e.g., "mod_input").
character(len=*), intent(in) :: message

Descriptive message explaining why the simulation failed.

Source Code

   subroutine fatal_error(scope, message)
      character(len=*), intent(in) :: scope
      character(len=*), intent(in) :: message

      write(error_unit,'(a,": ",a)') trim(scope), trim(message)
      stop 1
   end subroutine fatal_error