rem: permute()
add: permute(void)
context: permute(){int irow, jcol, is;char *start, *strig;for(jcol=0; jcol<ncol; jcol++)	{	for(irow=1; irow<nlin; irow++)		{		if (vspand(irow,jcol,0))			{			is = prev(irow);			if (is<0)				error(gettext("Vertical spanning in first row not allowed"));			start = table[is][jcol].col;			strig = table[is][jcol].rcol;			while (irow<nlin &&vspand(irow,jcol,0))				irow++;			table[--irow][jcol].col = start;			table[irow][jcol].rcol = strig;			while (is<irow)				{				table[is][jcol].rcol =0;				table[is][jcol].col= SPAN;				is = next(is);				}			}		}	}}