Lines Matching refs:icol
30 int icol, ilin, tsep, k, ik, vforml, il, text;
33 for(icol=0; icol <ncol; icol++)
35 doubled[icol] = acase[icol] = 0;
36 fprintf(tabout, ".nr %d 0\n", icol+CRIGHT);
40 fprintf(tabout, ".%02d\n.rm %02d\n", icol+80, icol+80);
45 for(il=prev(ilin); il>=0 && vspen(table[il][icol].col); il=prev(il))
47 if (fspan(vforml,icol)) continue;
48 if (filler(table[ilin][icol].col)) continue;
49 switch(ctype(vforml,icol))
52 acase[icol]=1;
53 s = table[ilin][icol].col;
56 if (doubled[icol]==0)
58 doubled[icol]=1;
62 if (table[ilin][icol].rcol!=0)
64 if (doubled[icol]==0 && text==0)
66 doubled[icol]=1;
67 if (real(s=table[ilin][icol].col) && !vspen(s))
71 wide(s, FN(vforml,icol), SZ(vforml,icol)); fprintf(tabout, "\n");
74 if (text==0 && real(s=table[ilin][icol].rcol) && !vspen(s) && !barent(s))
84 if (real(s=table[ilin][icol].col) && !vspen(s))
88 wide(s, FN(vforml,icol), SZ(vforml,icol)); fprintf(tabout, "\n");
89 fprintf(tabout, ".if \\n(%d<\\n(%d .nr %d \\n(%d\n", icol+CRIGHT, TMP, icol+CRIGHT, TMP);
94 if (acase[icol])
96 fprintf(tabout, ".if \\n(%d>=\\n(%d .nr %d \\n(%du+2n\n",S2,icol+CRIGHT,icol+CRIGHT,S2);
98 if (doubled[icol])
100 fprintf(tabout, ".nr %d \\n(%d\n", icol+CMID, S1);
101 fprintf(tabout, ".nr %d \\n(%d+\\n(%d\n",TMP,icol+CMID,S2);
102 fprintf(tabout, ".if \\n(%d>\\n(%d .nr %d \\n(%d\n",TMP,icol+CRIGHT,icol+CRIGHT,TMP);
103 fprintf(tabout, ".if \\n(%d<\\n(%d .nr %d +(\\n(%d-\\n(%d)/2\n",TMP,icol+CRIGHT,icol+CMID,icol+CRIGHT,TMP);
105 if (cll[icol][0])
107 fprintf(tabout, ".nr %d %sn\n", TMP, cll[icol]);
108 fprintf(tabout, ".if \\n(%d<\\n(%d .nr %d \\n(%d\n",icol+CRIGHT, TMP, icol+CRIGHT, TMP);
111 if (k=lspan(ilin, icol))
113 s=table[ilin][icol-k].col;
116 wide(table[ilin][icol-k].col, FN(ilin,icol-k), SZ(ilin,icol-k));
119 fprintf(tabout, "-\\n(%d",CRIGHT+icol-ik);
120 if (!expflg && ik>0) fprintf(tabout, "-%dn", sep[icol-ik]);
127 if (doubled[icol-k+ik])
128 fprintf(tabout, ".nr %d +\\n(%d/2\n", icol-k+ik+CMID, TMP);
129 fprintf(tabout, ".nr %d +\\n(%d\n", icol-k+ik+CRIGHT, TMP);
140 for(icol=0; icol<ncol; icol++)
142 if (evenup[icol]==0) continue;
144 icol+CRIGHT, TMP, TMP, icol+CRIGHT);
146 for(icol=0; icol<ncol; icol++)
148 if (evenup[icol]==0)
151 if (doubled[icol])
153 icol+CMID, icol+CMID, icol+CRIGHT, TMP);
157 fprintf(tabout, ".nr %d \\n(%d\n", icol+CRIGHT, TMP);
161 for(tsep=icol=0; icol<ncol; icol++)
162 tsep+= sep[icol];
166 for(icol=0; icol<ncol; icol++)
167 fprintf(tabout, "+\\n(%d", icol+CRIGHT);
181 for(icol=0; icol<ncol; icol++)
183 fprintf(tabout, ".nr %d \\n(%d+(%d*\\n(%d)\n",icol+CLEFT, icol+CRIGHT-1, tsep, TMP);
184 fprintf(tabout, ".nr %d +\\n(%d\n",icol+CRIGHT, icol+CLEFT);
185 if (doubled[icol])
188 /*fprintf(tabout, ".if \\n(%d=0 .nr %d 1\n",icol+CMID, icol+CMID);*/
189 fprintf(tabout, ".nr %d +\\n(%d\n", icol+CMID, icol+CLEFT);
190 /* fprintf(tabout, ".if n .if \\n(%d%%24>0 .nr %d +12u\n",icol+CMID, icol+CMID); */
192 tsep=sep[icol];