Удалить столбец в двумерном массиве

 void ubr(double ** mm,int & n,int m)
{int i,j,k;
double **matr;
int *ind;
ind=new int[n];
 
matr=new double *[n];
for(i=0;i<n; i++)
matr[i]=new double [m];
 
for(i=0;i<n;i++)
{ for(j=0;j<m;j++)
     {
      matr[i][j]=mm[i][j];
      }
    cout<<endl;
 }
 
int kolvoO;
int index=0;
for(j=0;j<m;j++)
{ kolvoO=0;
    for(i=0;i<n;i++)
        {if (matr[i][j]<0)kolvoO++;
         else break;
         }
cout<<"kolvoO "<<kolvoO<<endl;
    if(kolvoO==n)
       {
         index++;
         ind[j]=1;
       }
    else ind[j]=0;
   
   }
cout<<"index "<<index<<endl;
m=m-index;
cout<<"m= "<<m<<endl;
if(index>0)
  {
      for(i=0;i<n;i++)
          delete []mm[i];
      delete []mm;
 
   
   mm=new double *[n];
   for(k=0;k<n;k++)
   mm[k]=new double[m];
 
   k=0;
      for(j=0;j<m+index;j++)
         {if(ind[j]==0)
            {
              for(i=0;i<n;i++)
                 mm[i][k]=matr[i][j];
              k++;
             }
          }
}
  for(i=0;i<n;i++)
delete []matr[i];
delete []matr;
}

for(j=0;j<m;j++)
{ kolvoO=0;
    for(i=0;i<n;i++)
        {if (matr[i][j]<0)kolvoO++;
         else break;