aggregate_rank9_diagnosis Module Procedure

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

Arguments

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

Return Value type(test_diagnosis_t)