28 for (nlin=nslin=0; gets1(cstore, MAXSTR); nlin++)  in gettbl()
30 	stynum[nlin]=nslin;  in gettbl()
41 	if (nlin>=MAXLIN)  in gettbl()
46 	fullbot[nlin]=0;  in gettbl()
49 		instead[nlin] = cstore;  in gettbl()
53 	else instead[nlin] = 0;  in gettbl()
54 	if (nodata(nlin))  in gettbl()
56 		if (ch = oneh(nlin))  in gettbl()
57 			fullbot[nlin]= ch;  in gettbl()
58 		nlin++;  in gettbl()
60 		instead[nlin]=(char *)0;  in gettbl()
61 		fullbot[nlin]=0;  in gettbl()
63 	table[nlin] = (struct colstr *) alocv((ncol+2)*sizeof(table[0][0]));  in gettbl()
67 		case '_': fullbot[nlin]= '-'; continue;  in gettbl()
68 		case '=': fullbot[nlin]= '='; continue;  in gettbl()
70 	stynum[nlin] = nslin;  in gettbl()
74 		table[nlin][icol].col = cstore;  in gettbl()
75 		table[nlin][icol].rcol=0;  in gettbl()
79 			table[nlin][icol].col =  in gettbl()
80 				(char *)get_text(cstore, nlin, icol,  in gettbl()
81 					font[stynum[nlin]][icol],  in gettbl()
82 					csize[stynum[nlin]][icol]);  in gettbl()
88 			switch(ctype(nlin,icol)) /* numerical or alpha, subcol */  in gettbl()
91 					table[nlin][icol].rcol =  in gettbl()
92 					    (char *)maknew(table[nlin][icol].col);  in gettbl()
95 					table[nlin][icol].rcol = table[nlin][icol].col;  in gettbl()
96 					table[nlin][icol].col = "";  in gettbl()
100 		while (ctype(nlin,icol+1)== 's') /* spanning */  in gettbl()
101 			table[nlin][++icol].col = "";  in gettbl()
106 		table[nlin][icol].col = "";  in gettbl()
107 		table [nlin][icol].rcol=0;  in gettbl()
157 	for(irow=1; irow<nlin; irow++)  in permute()
166 			while (irow<nlin &&vspand(irow,jcol,0))  in permute()
185 if (ir>=nlin)return(0);  in vspand()