handle_inc_error Subroutine

  1. mimic_errors.F90
  2. mimic_errors
  3. handle_inc_error

private subroutine handle_inc_error(iounit, message)

Handler to treat incorrect argument errors

Arguments

TypeIntentOptionalAttributesName
integer, intent(in) :: iounit

I/O unit to write error to
character(len=*), intent(in) :: message

Error message

Contents

Source Code

handle_inc_error

Source Code

    subroutine handle_inc_error(iounit, message)

        !> I/O unit to write error to
        integer, intent(in) :: iounit
        !> Error message
        character(len=*), intent(in) :: message

        write(unit=iounit, fmt=*) "Incorrect argument passed in ", message

    end subroutine handle_inc_error