Constant fills and random numbers

Syntax	void QLA_T_eqop_t( restrict Type *r,Type *a)
Meaning	r = a (constant)
T	I, R, C, V, H, D, M, P
eqop	eq

Syntax	void QLA_M_eqop_c ( restrict QLA_ColorMatrix *r,QLA_Type *a)
Meaning	$r = \mathop{\rm diag}(a,a,\ldots{})$ (constant a)
eqop	eq