Problem: All Berland residents are waiting for an unprecedented tour of wizard in his Blue Helicopter over the cities of Berland!

It is well-known that there are n cities in Berland, some pairs of which are connected by bidirectional roads. Each pair of cities is connected by no more than one road. It is not guaranteed that the road network is connected, i.e. it is possible that you can't reach some city from some other.

The tour will contain several episodes. In each of the episodes:

  * the wizard will disembark at some city x from the Helicopter; 
  * he will give a performance and show a movie for free at the city x; 
  * he will drive to some neighboring city y using a road; 
  * he will give a performance and show a movie for free at the city y; 
  * he will drive to some neighboring to y city z; 
  * he will give a performance and show a movie for free at the city z; 
  * he will embark the Helicopter and fly away from the city z. 



It is known that the wizard doesn't like to use roads, so he agrees to use each road at most once (regardless of direction). In other words, for road between a and b he only can drive once from a to b, or drive once from b to a, or do not use this road at all.

The wizards wants to plan as many episodes as possible without violation the above rules. Help the wizard!

Please note that the wizard can visit the same city multiple times, the restriction is on roads only.

Input

The first line contains two integers n, m (1 ≤ n ≤ 2·105, 0 ≤ m ≤ 2·105) — the number of cities and the number of roads in Berland, respectively.

The roads description follow, one in each line. Each description is a pair of two integers ai, bi (1 ≤ ai, bi ≤ n, ai ≠ bi), where ai and bi are the ids of the cities connected by the i-th road. It is guaranteed that there are no two roads connecting the same pair of cities. Every road is bidirectional. The cities are numbered from 1 to n.

It is possible that the road network in Berland is not connected.

Output

In the first line print w — the maximum possible number of episodes. The next w lines should contain the episodes in format x, y, z — the three integers denoting the ids of the cities in the order of the wizard's visits.

Examples

Input

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


Output

2
1 4 2
4 3 2


Input

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


Output

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

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
namespace fastIO {
bool IOerror = 0;
inline char nc() {
  static char buf[100000], *p1 = buf + 100000, *pend = buf + 100000;
  if (p1 == pend) {
    p1 = buf;
    pend = buf + fread(buf, 1, 100000, stdin);
    if (pend == p1) {
      IOerror = 1;
      return -1;
    }
  }
  return *p1++;
}
inline bool blank(char ch) {
  return ch == ' ' || ch == '\n' || ch == '\r' || ch == '\t';
}
inline void read(long long &x) {
  char ch;
  long long f = 1;
  while (blank(ch = nc()))
    ;
  while (ch == '-') f = -f, ch = nc();
  if (IOerror) return;
  for (x = ch - '0'; (ch = nc()) >= '0' && ch <= '9'; x = x * 10 + ch - '0')
    ;
  x *= f;
}
inline void read(int &x) {
  char ch;
  int f = 1;
  while (blank(ch = nc()))
    ;
  while (ch == '-') f = -f, ch = nc();
  if (IOerror) return;
  for (x = ch - '0'; (ch = nc()) >= '0' && ch <= '9'; x = x * 10 + ch - '0')
    ;
  x *= f;
}
inline void read(char *s) {
  char ch;
  while (blank(ch = nc()))
    ;
  if (IOerror) return;
  int i = 0;
  for (; !blank(ch); s[i++] = ch, ch = nc())
    ;
  s[i] = '\0';
}
};  // namespace fastIO
using namespace fastIO;
inline long long read() {
  long long x = 0, f = 1;
  char ch = getchar();
  while (ch < '0' || ch > '9') {
    if (ch == '-') f = -1;
    ch = getchar();
  }
  while (ch >= '0' && ch <= '9') {
    x = x * 10 + ch - '0';
    ch = getchar();
  }
  return x * f;
}
struct edge {
  int to, next, mrk;
} e[400010];
int n, m, cnt = 1;
int head[200010];
int dep[200010];
int ans, ansx[200010], ansy[200010], ansz[200010];
bool mrk[200010];
inline void add(int x, int y, int z) {
  ans++;
  ansx[ans] = x;
  ansy[ans] = y;
  ansz[ans] = z;
}
inline void dfs(int x, int fa, int d, int lnk) {
  vector<int> now;
  mrk[x] = 1;
  dep[x] = d;
  for (int i = head[x]; i; i = e[i].next) {
    if (!mrk[e[i].to]) {
      dfs(e[i].to, x, d + 1, i ^ 1);
      if (!e[i].mrk) now.push_back(i);
    } else if (dep[x] > dep[e[i].to] && fa != e[i].to)
      now.push_back(i);
  }
  if ((now.size() & 1) && fa != -1) now.push_back(lnk);
  int mx = now.size(), xx, yy;
  for (int i = 0; i + 1 < mx; i += 2) {
    xx = e[now[i]].to;
    yy = e[now[i + 1]].to;
    add(xx, x, yy);
    e[now[i]].mrk = e[now[i] ^ 1].mrk = 1;
    e[now[i + 1]].mrk = e[now[i + 1] ^ 1].mrk = 1;
  }
}
inline void ins(int u, int v) {
  e[++cnt].to = v;
  e[cnt].next = head[u];
  head[u] = cnt;
  e[cnt].mrk = 0;
}
inline void insert(int u, int v) {
  ins(v, u);
  ins(u, v);
}
int main() {
  n = read();
  m = read();
  for (int i = 1; i <= m; i++) {
    int x = read(), y = read();
    insert(x, y);
  }
  for (int i = 1; i <= n; i++)
    if (!mrk[i]) dfs(i, -1, 0, -1);
  printf("%d\n", ans);
  for (int i = 1; i <= ans; i++)
    printf("%d %d %d\n", ansx[i], ansy[i], ansz[i]);
}