EFFPS
effps = EFFPS(ps);
pss = EFFPS(ps);
eht[p2]-ebase[p2]+b1, yyval, p2, pss, p2, EFFPS(ps));
-(h1-b1+ebase[p3]), yyval, p3, pss, p3, EFFPS(ps),
printf(".ps %d\n", EFFPS(p));
printf(".nr %d \\w'\\s%d\\*(%d'\n", n1, EFFPS(p), n2);
a = VERT(EM(amt/100.0, EFFPS(ps)));
printf(".nr %d \\n(%d+\\s%d.5m\\s0\n", treg, treg, EFFPS(ps));
n = (h1 + EM(1.0, EFFPS(ps)) - 1) / EM(1.0, EFFPS(ps));
effps = EFFPS(ps+deltaps);
eht[p3] = h3 = VERT((eht[p3] * effps) / EFFPS(ps));
effps2 = EFFPS(ps+deltaps);
effps = EFFPS(ps);
effps2 = EFFPS(ps+deltaps);
effps = EFFPS(ps);
effp1 = EFFPS(p1);
nps = EFFPS(((eht[p2]*9)/10+(resolution/POINT-1))/(resolution/POINT));
eht[yyval] = VERT(EM(1.0, EFFPS(ps))); /* ht in machine units */