Problem: Oleg the bank client solves an interesting chess problem: place on n × n chessboard the maximum number of rooks so that they don't beat each other. Of course, no two rooks can share the same cell.

Remind that a rook standing in the cell (a, b) beats a rook standing in the cell (x, y) if and only if a = x or b = y.

Unfortunately (of fortunately?) for Oleg the answer in this problem was always n, so the task bored Oleg soon. He decided to make it more difficult by removing some cells from the board. If a cell is deleted, Oleg can't put a rook there, but rooks do beat each other "through" deleted cells.

Oleg deletes the cells in groups, namely, he repeatedly choose a rectangle with sides parallel to the board sides and deletes all the cells inside the rectangle. Formally, if he chooses a rectangle, lower left cell of which has coordinates (x1, y1), and upper right cell of which has coordinates (x2, y2), then he deletes all such cells with coordinates (x, y) that x1 ≤ x ≤ x2 and y1 ≤ y ≤ y2. It is guaranteed that no cell is deleted twice, i.e. the chosen rectangles do not intersect.

This version of the problem Oleg can't solve, and his friend Igor is busy at a conference, so he can't help Oleg.

You are the last hope for Oleg! Help him: given the size of the board and the deleted rectangles find the maximum possible number of rooks that could be placed on the board so that no two rooks beat each other.

Input

The first line contains single integer n (1 ≤ n ≤ 10000) — the size of the board.

The second line contains single integer q (0 ≤ q ≤ 10000) — the number of deleted rectangles.

The next q lines contain the information about the deleted rectangles.

Each of these lines contains four integers x1, y1, x2 and y2 (1 ≤ x1 ≤ x2 ≤ n, 1 ≤ y1 ≤ y2 ≤ n) — the coordinates of the lower left and the upper right cells of a deleted rectangle.

If is guaranteed that the rectangles do not intersect.

Output

In the only line print the maximum number of rooks Oleg can place on the board so that no two rooks beat each other.

Examples

Input

5
5
1 1 2 1
1 3 1 5
4 1 5 5
2 5 2 5
3 2 3 5


Output

3


Input

8
4
2 2 4 6
1 8 1 8
7 1 8 2
5 4 6 8


Output

8

Note

Here is the board and the example of rooks placement in the first example:

<image>

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int N = 10050;
const int D = 600050;
const int M = 4000050;
const int INF = 20000000;
int s, t, nds;
struct edge {
  int to, cap, rev;
};
namespace graph {
int n, m;
edge w[M];
int fr[M];
int num[D], cur[D], first[D];
edge e[M];
void init(int _n) {
  n = _n;
  m = 0;
}
void addedge(int from, int to, int cap) {
  w[++m] = (edge){to, cap};
  num[from]++, fr[m] = from;
  w[++m] = (edge){from, 0};
  num[to]++, fr[m] = to;
}
void prepare() {
  first[1] = 1;
  for (int i = 2; i <= n; i++) first[i] = first[i - 1] + num[i - 1];
  for (int i = 1; i < n; i++) num[i] = first[i + 1] - 1;
  num[n] = m;
  for (int i = 1; i <= m; i++) {
    e[first[fr[i]] + (cur[fr[i]]++)] = w[i];
    if (!(i % 2)) {
      e[first[fr[i]] + cur[fr[i]] - 1].rev = first[w[i].to] + cur[w[i].to] - 1;
      e[first[w[i].to] + cur[w[i].to] - 1].rev = first[fr[i]] + cur[fr[i]] - 1;
    }
  }
}
int q[D];
int dist[D];
int t;
bool bfs(int s) {
  int l = 1, r = 1;
  q[1] = s;
  memset(dist, -1, (n + 1) * 4);
  dist[s] = 0;
  while (l <= r) {
    int u = q[l++];
    for (int i = first[u]; i <= num[u]; i++) {
      int v = e[i].to;
      if ((dist[v] != -1) || (!e[i].cap)) continue;
      dist[v] = dist[u] + 1;
      if (v == t) return true;
      q[++r] = v;
    }
  }
  return dist[t] != -1;
}
int dfs(int u, int flow) {
  if (u == t) return flow;
  for (int &i = cur[u]; i <= num[u]; i++) {
    int v = e[i].to;
    if (!e[i].cap || dist[v] != dist[u] + 1) continue;
    int t = dfs(v, min(flow, e[i].cap));
    if (t) {
      e[i].cap -= t;
      e[e[i].rev].cap += t;
      return t;
    }
  }
  return 0;
}
int dinic(int s, int _t) {
  int ans = 0;
  t = _t;
  while (bfs(s)) {
    int flow;
    for (int i = 1; i <= n; i++) cur[i] = first[i];
    while (flow = dfs(s, INF)) ans += flow;
  }
  return ans;
}
}  // namespace graph
using graph ::addedge;
int lc[M], rc[M], root[2 * N], typ;
void build(int &p, int l, int r) {
  p = ++nds;
  if (l == r) {
    addedge(p, 2 + l, INF);
    return;
  }
  int md = l + r >> 1;
  build(lc[p], l, md);
  build(rc[p], md + 1, r);
  addedge(p, lc[p], INF);
  addedge(p, rc[p], INF);
}
void add(int &p, int las, int one, int l, int r, int x, int y) {
  p = ++nds;
  if (l == x && r == y) {
    if (typ == -1) {
      if (x == y)
        addedge(p, 2 + x, INF);
      else {
        lc[p] = lc[one];
        rc[p] = rc[one];
        addedge(p, lc[p], INF);
        addedge(p, rc[p], INF);
      }
    }
    return;
  }
  lc[p] = lc[las];
  rc[p] = rc[las];
  int md = l + r >> 1;
  if (y <= md)
    add(lc[p], lc[las], lc[one], l, md, x, y);
  else if (x > md)
    add(rc[p], rc[las], rc[one], md + 1, r, x, y);
  else {
    add(lc[p], lc[las], lc[one], l, md, x, md);
    add(rc[p], rc[las], rc[one], md + 1, r, md + 1, y);
  }
  addedge(p, lc[p], INF);
  addedge(p, rc[p], INF);
}
namespace io {
const int L = (1 << 19) + 1;
char ibuf[L], *iS, *iT, c;
int f;
inline char gc() {
  if (iS == iT) {
    iT = (iS = ibuf) + fread(ibuf, 1, L, stdin);
    return iS == iT ? EOF : *iS++;
  }
  return *iS++;
}
template <class I>
void read(I &x) {
  for (f = 1, c = gc(); c < '0' || c > '9'; c = gc())
    if (c == '-') f = -1;
  for (x = 0; c <= '9' && c >= '0'; c = gc()) x = x * 10 + (c & 15);
  x *= f;
}
};  // namespace io
using io ::read;
struct line {
  int dw, up, typ, x;
  line(int xx = 0, int y1 = 0, int y2 = 0, int tp = 0) {
    x = xx;
    dw = y1;
    up = y2;
    typ = tp;
  }
  inline bool operator<(const line &b) const {
    if (x == b.x) return typ < b.typ;
    return x < b.x;
  }
} a[2 * N];
int n, m;
int main() {
  int i, j, k, p, q;
  graph ::init(600000);
  s = 1, read(n), read(m);
  t = 2, nds = 2 + n;
  build(root[0], 1, n);
  for (i = 1; i <= m; i++) {
    read(j), read(k), read(p), read(q);
    a[2 * i - 1] = line(k, j, p, 1);
    a[2 * i] = line(q + 1, j, p, -1);
  }
  sort(a + 1, a + 2 * m + 1);
  for (i = j = 1; i <= n; i++) {
    while (j <= 2 * m && a[j].x == i)
      typ = a[j].typ,
      add(root[j], root[j - 1], root[0], 1, n, a[j].dw, a[j].up), j++;
    addedge(2 + i, t, 1), addedge(s, root[j - 1], 1);
  }
  graph ::prepare();
  printf("%d\n", graph ::dinic(1, 2));
  return 0;
}