/* integral.c 4.2 83/02/12 */
printf(".ds %d \\h'-0.4m'\\v'0.4m'\\*(%d\\v'-0.4m'\n", p1
, p1
);
printf(".ds %d \\v'-0.3m'\\*(%d\\v'0.3m'\n", p2
, p2
);
if(dbg
)printf(".\tintegral: S%d; h=%d b=%d\n",
printf(".ds %d \\s%d\\v'.1m'\\s+4%s\\s-4\\v'-.1m'\\s%d\n",
eht
[yyval
] = VERT( (((ps
+4)*12)/10)*6 );
ebase
[yyval
] = VERT( (ps
*6*3)/10 );
printf(".ds %d %s\n", yyval
, f
);
lfont
[yyval
] = rfont
[yyval
] = ROM
;