sum_sum Function

public function sum_sum(a, b, a_params, b_params, i_plus_j, ir, jr) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
public function a(k, params) result(ret) Arguments Type Intent Optional Attributes Name integer(kind=int32), intent(in) :: k complex(kind=real64), intent(in) :: params(:) Return Value complex(kind=real64)
public function b(k, params) result(ret) Arguments Type Intent Optional Attributes Name integer(kind=int32), intent(in) :: k complex(kind=real64), intent(in) :: params(:) Return Value complex(kind=real64)
complex(kind=real64),	intent(in)			::	a_params(:)
complex(kind=real64),	intent(in)			::	b_params(:)
integer(kind=int32),	intent(in)			::	i_plus_j
integer(kind=int32),	intent(in)			::	ir(1:2)
integer(kind=int32),	intent(in)			::	jr(1:2)

Return Value complex(kind=real64)