report_matrix_size_mismatch_error Subroutine

public subroutine report_matrix_size_mismatch_error(name, mtx1, mtx2, m1, n1, m2, n2, err)

Reports a mismatch in matrix sizes.

Arguments

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

The name of the routine in which the error was found.

character(len=*), intent(in) :: mtx1

The name of the first matrix.

character(len=*), intent(in) :: mtx2

The name of the second matrix.

integer(kind=int32), intent(in) :: m1

The number of rows in the first matrix.

integer(kind=int32), intent(in) :: n1

The number of columns in the first matrix.

integer(kind=int32), intent(in) :: m2

The number of rows in the second matrix.

integer(kind=int32), intent(in) :: n2

The number of columns in the second matrix.

class(errors), intent(inout) :: err

An errors-based object that if provided can be used to retrieve information relating to any errors encountered during execution.


Contents


Variables

Type Visibility Attributes Name Initial
character(len=256), public :: errmsg