Uniform random number fills

Syntax	void QLA_R_eqop_random_S ( restrict QLA_Real *r,
	QLA_RandomState *a)
Meaning	r random, uniform on [0,1]
eqop	eq