speedup by having an adouble and double version
lp adolc works. about to reorganize