pio2_3t
pio2_3t = -2.5650587247459238361625433492959285e-65L; /* -0x159c4ec64ddaeb5f78671cbfb2210.0p-327 */
w = fn*pio2_3t-((t-r)-w);
w = fn*pio2_3t-((t-r)-w);
pio2_3t = -2.75299651904407171810e-37L; /* -0xbb5bf6c7ddd660ce.0p-185 */
w = fn*pio2_3t-((t-r)-w);
pio2_3t = 8.47842766036889956997e-32; /* 0x397B839A, 0x252049C1 */