vspand
if (vspand(irow,jcol,0))
while (irow<nlin &&vspand(irow,jcol,0))
while (i>0 && vspand(prev(i),cl,1))
if (i>0 && vspand(prev(i),cr,1))