report_arrays_not_same_size_error Subroutine

public subroutine report_arrays_not_same_size_error(err, fname, name1, name2, size1, size2)

Reports an error relating to two arrays not being the same size when they should be the same size.

Arguments

Type IntentOptional Attributes Name
class(errors), intent(inout) :: err

The error handling object.

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

The name of the routine in which the error occurred.

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

The name of the first array.

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

The name of the second array.

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

The size of the first array.

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

The size of the second array.


Contents


Variables

Type Visibility Attributes Name Initial
character(len=MESSAGE_SIZE), public :: msg