F_27M
n = nf / F_27M;
if ((n * F_27M) == nf)
F_27M, /* F_27M / p0 */
F_27M / 10, /* F_27M / p0 */
f = F_27M >> r;
nfra = (((nf % pp[3]) * mod * pp[4]) + (F_27M / 2)) / F_27M;