Convert float to double

Syntax	void QLA_DF_T_eqop_T( restrictType_D *r,Type_F *a)
Meaning	r = a
T	R, C, V, H, D, M, P
eqop	eq