27 int icol, i;  in getspec()  local
28 for(icol=0; icol<MAXCOL; icol++)  in getspec()
30 	sep[icol]= -1;  in getspec()
31 	evenup[icol]=0;  in getspec()
32 	cll[icol][0]=0;  in getspec()
35 		csize[i][icol][0]=0;  in getspec()
36 		vsize[i][icol][0]=0;  in getspec()
37 		font[i][icol][0] = lefline[i][icol] = 0;  in getspec()
38 		ctop[i][icol]=0;  in getspec()
39 		style[i][icol]= 'l';  in getspec()
55 int icol, c, sawchar, stopc, i;  in readspec()  local
57 sawchar=icol=0;  in readspec()
71 			ncol = max(ncol, icol);  in readspec()
77 			icol=0;  in readspec()
86 				for(icol=0; icol<ncol; icol++)  in readspec()
87 					if (sep[icol]<0)  in readspec()
88 						sep[icol] =  icol+1<ncol ? 3 : 1;  in readspec()
103 			style[nclin][icol]=c;  in readspec()
104 			if (c== 's' && icol<=0)  in readspec()
106 			if (c=='s' && style[nclin][icol-1] == 'a')  in readspec()
109 				style[nclin][icol-1] = 'l';  in readspec()
111 			if (c=='s' && style[nclin][icol-1] == 'n')  in readspec()
114 				style[nclin][icol-1] = 'c';  in readspec()
116 			icol++;  in readspec()
119 			if (icol>=MAXCOL)  in readspec()
129 			if (icol==0) continue;  in readspec()
130 			snp=font[nclin][icol-1];  in readspec()
138 			if (icol>0)  in readspec()
139 			ctop[nclin][icol-1] = 1;  in readspec()
144 			if (icol>0)  in readspec()
145 			ctop[nclin][icol-1] = -1;  in readspec()
150 			if (icol==0) continue;  in readspec()
151 			snp=font[nclin][icol-1];  in readspec()
174 			if (icol<=0) continue;  in readspec()
175 			temp = snp = csize[nclin][icol-1];  in readspec()
199 			if (icol<=0) continue;  in readspec()
200 			temp = snp = vsize[nclin][icol-1];  in readspec()
228 				style[nclin][icol] = 'c';  in readspec()
229 				icol++;  in readspec()
230 				if (icol >= MAXCOL) {  in readspec()
237 			snp = cll [icol-1];  in readspec()
251 				if (snp==cll[icol-1] && c=='(')  in readspec()
263 			if (snp-cll[icol-1]>CLLEN)  in readspec()
271 			if (icol<1) continue;  in readspec()
272 			evenup[icol-1]=1;  in readspec()
282 			sep[icol-1] = max(sep[icol-1], numb(sn));  in readspec()
285 			lefline[nclin][icol]++;  in readspec()
286 			if (icol==0) left1flg=1;  in readspec()