aggregate_rank4_diagnosis Module Procedure

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

Arguments

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

Return Value type(test_diagnosis_t)