aggregate_vector_diagnosis Module Procedure

module procedure aggregate_vector_diagnosis pure module function aggregate_vector_diagnosis(diagnoses) result(diagnosis)

Arguments

Type	Intent	Optional	Attributes		Name
type(test_diagnosis_t),	intent(in)			::	diagnoses(:)

Return Value type(test_diagnosis_t)