Global sums: double to long double

Syntax	void QLA_QD_t_eqop_sum_T( restrictQLA_Type_Q *r,Type_D *a)
Meaning	$r = \sum a$
T	I, R, C, V, H, D, M, P
eqop	eq

The scalar variants of the reduction functions are equivalent to an assignment.