aggregate_rank7_diagnosis Module Procedure

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

Arguments

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

Return Value type(test_diagnosis_t)