r2p1lo
#define r2p1lo vccast(r2p1lo)
r+=r2p1lo; r+=r2p1hi; }
vc(r2p1lo, 1.4349369327986523769E-17 ,597d,2484,754b,89b3, -55, .84597D89B3754B)
ic(r2p1lo, 1.2537167179050217666E-16 , -53, 1.21165F626CDD5)