rem: vspand(ir,ij,ifform)
add: vspand(int ir, int ij, int ifform)
context: vspand(ir,ij,ifform){if (ir<0) return(0);if (ir>=nlin)return(0);if (instead[ir]) return(0);if (ifform==0 && ctype(ir,ij)=='^') return(1);if (table[ir]==0) return(0);if (table[ir][ij].rcol!=0) return(0);if (fullbot[ir]) return(0);return(vspen(table[ir][ij].col));}