Local inner product

Syntax	void QLA_C_eqop_T_dot_T( restrict QLA_Complex *r,
	Type *a, Type *b)
exception	void QLA_R_eqop_R_dot_R( restrict QLA_Real *r,
	QLA_Real *a, QLA_Real *b)
	void QLA_R_eqop_I_dot_I( restrict QLA_Real *r,
	QLA_Int *a, QLA_Int *b)
Meaning	$r_i = \mathop{\rm Tr}a^\dagger_i \cdot b_i$
T	C, M, H, D, V, P
eqop	eq

Syntax	void QLA_R_eqop_re_T_dot_T( restrict QLA_Complex *r,
	Type*a, Type *b)
Meaning	$r_i = \mathop{\rm Re}\mathop{\rm Tr}a^\dagger_i \cdot b_i$
T	C, V, H, D, M, P
eqop	eq