A simple wrapper type around an integer to represent different multiply methods.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | private | :: | flag | = | 0 | ||
character(len=16), | private | :: | name | = | "UNSET NAME" |
Helper routine to get access to the matrix_multiply_method's flag in a read-only way. Primarily used for testing.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(matrix_multiply_method_type), | intent(in) | :: | self |
Helper routine to get access to the matrix_multiply_method's name in a read-only way. Primarily used for testing.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(matrix_multiply_method_type), | intent(in) | :: | self |
type matrix_multiply_method_type
private
integer :: flag = 0
character(len=16) :: name = "UNSET NAME"
contains
procedure, public :: get_flag => matrix_multiply_method_get_flag
procedure, public :: get_name => matrix_multiply_method_get_name
end type matrix_multiply_method_type