occ_process Function

public function occ_process(s, k) result(occ_final)

returns the final occupation numbers for a specific

Arguments

Type	Intent	Optional	Attributes		Name
type(process_data),	intent(in)			::	s
integer,	intent(in)			::	k

Return Value integer, (size(s%occ))