#include <fstream.h>

int m,n,r,c,a[100][100],loc;

ifstream f ("elimin.in");
ofstream g ("elimin.out");

void citeste()
{f>>m>>n>>r>>c;
for (int x=0;x<m;x++) for (int y=0;y<n;y++) f>>a[x][y];
}

void elimlin()
{int suma=0;
for (int j=0;j<n;j++)
  suma=suma+a[0][j];
int minim=suma;
for (int i=0;i<m;i++)
  {suma=0;
   for (j=0;j<n;j++)
	 suma=suma+a[i][j];
   if (suma>=0)
	 if (suma<=minim) {minim=suma;loc=i;}
  }
for (i=loc;i<m-1;i++)
  for (j=0;j<n;j++)
	a[i][j]=a[i+1][j];
m--;
}

void elimcol()
{int suma=0;
for (int j=0;j<m;j++)
  suma=suma+a[j][0];
int minim=suma;
for (int i=0;i<m;i++)
  {suma=0;
   for (j=0;j<n;j++)
	 suma=suma+a[j][i];
   if (suma>=0)
	 if (suma<=minim) {minim=suma;loc=i;}
  }
for (i=loc;i<n-1;i++)
  for (j=0;j<m;j++)
	a[j][i]=a[j][i+1];
n--;
}



int main()
{citeste();
for (int i=0;i<r;i++) elimlin();
for (i=0;i<c;i++) elimcol();
int suma=0;
for (i=0;i<m;i++)
 for (int j=0;j<n;j++)
  suma=suma+a[i][j];
g<<suma;
return 0;
  }