fswap
fswap(fmap[unLo], fmap[ltLo]);
fswap(fmap[unHi], fmap[gtHi]);
fswap(fmap[unLo], fmap[unHi]); unLo++; unHi--;
fswap(fmap[yyp1], fmap[yyp2]); \