ll@n,@m,@a[n],@b[],c0[m],c1[],m0=0,m1=0,z=0;
sortA(n,b,a);
rep(m){
	ll@t,@c;
	if(t){
		c1[m1++]=c;
	}else{
		c0[m0++]=c;
	}
}
sortA(m0,c0);
sortA(m1,c1);
priority_queue<pair<ll,ll>>q;
ll j=0;
rep(i,m1){
	while(j<n&&b[j]<=c1[i]){
		q.push({a[j],b[j]});
		++j;
	}
	if(!q.empty()){
		q.pop();
	}
}
while(j<n){
	q.push({a[j],b[j]});
	++j;
}
rrep(i,m0){
	while(!q.empty()&&q.top().first>c0[i]){
		++z;
		q.pop();
	}
	if(!q.empty()){
		q.pop();
	}
}
wt(z+q.size());