29 	fprintf(tabout, ".nr %d \\n(.lu\n", SL); /* remember old line length */  in get_text()
32 fprintf(tabout, ".eo\n");  in get_text()
33 fprintf(tabout, ".am %02d\n", icol+80);  in get_text()
34 fprintf(tabout, ".br\n");  in get_text()
35 fprintf(tabout, ".di %c+\n", texname);  in get_text()
37 if (fn && *fn) fprintf(tabout, ".nr %d \\n(.f\n.ft %s\n", S1, fn);  in get_text()
38 fprintf(tabout, ".ft \\n(.f\n"); /* protect font */  in get_text()
42 	fprintf(tabout, ".nr %d \\n(.v\n", S2);  in get_text()
45 		fprintf(tabout, ".ps %s\n",sz);  in get_text()
46 	fprintf(tabout, ".vs %s\n",vs);  in get_text()
47 	fprintf(tabout, ".if \\n(%du>\\n(.vu .sp \\n(%du-\\n(.vu\n", S2,S2);  in get_text()
50 	fprintf(tabout, ".ll %sn\n", cll[icol]);  in get_text()
52 	fprintf(tabout, ".ll \\n(%du*%du/%du\n",SL,ctspan(ilin,icol),ncol+1);  in get_text()
53 fprintf(tabout,".if \\n(.l<\\n(%d .ll \\n(%du\n", icol+CRIGHT, icol+CRIGHT);  in get_text()
55 	fprintf(tabout, ".ll -2n\n");  in get_text()
56 fprintf(tabout, ".in 0\n");  in get_text()
61 	fprintf(tabout, "%s\n", line);  in get_text()
63 if (fn && *fn) fprintf(tabout, ".ft \\n(%d\n", S1);  in get_text()
64 if (sz && *sz) fprintf(tabout, ".br\n.ps\n.vs\n");  in get_text()
65 fprintf(tabout, ".br\n");  in get_text()
66 fprintf(tabout, ".di\n");  in get_text()
67 fprintf(tabout, ".nr %c| \\n(dn\n", texname);  in get_text()
68 fprintf(tabout, ".nr %c- \\n(dl\n", texname);  in get_text()
69 fprintf(tabout, "..\n");  in get_text()
70 fprintf(tabout, ".ec \\\n");  in get_text()
85 fprintf(tabout, ".nf\n");  in untext()
86 fprintf(tabout, ".ll \\n(%du\n", SL);  in untext()