Problem: After Santa Claus and his assistant Elf delivered all the presents and made all the wishes come true, they returned to the North Pole and found out that it is all covered with snow. Both of them were quite tired and they decided only to remove the snow from the roads connecting huts. The North Pole has n huts connected with m roads. One can go along the roads in both directions. 

The Elf offered to split: Santa Claus will clear up the wide roads and the Elf will tread out the narrow roads. For each road they decided who will clear it: Santa Claus or the Elf. To minimize the efforts they decided to clear the road so as to fulfill both those conditions: 

  * between any two huts should exist exactly one simple path along the cleared roads; 
  * Santa Claus and the Elf should clear the same number of roads. 



At this point Santa Claus and his assistant Elf wondered which roads should they clear up?

Input

The first input line contains two positive integers n and m (1 ≤ n ≤ 103, 1 ≤ m ≤ 105) — the number of huts and the number of roads. Then follow m lines, each of them contains a road description: the numbers of huts it connects — x and y (1 ≤ x, y ≤ n) and the person responsible for clearing out this road ("S" — for the Elf or "M" for Santa Claus). It is possible to go on each road in both directions. Note that there can be more than one road between two huts and a road can begin and end in the same hut.

Output

Print "-1" without the quotes if it is impossible to choose the roads that will be cleared by the given rule. Otherwise print in the first line how many roads should be cleared and in the second line print the numbers of those roads (the roads are numbered from 1 in the order of occurrence in the input). It is allowed to print the numbers of the roads in any order. Each number should be printed exactly once. As you print the numbers, separate them with spaces.

Examples

Input

1 2
1 1 S
1 1 M


Output

0



Input

3 3
1 2 S
1 3 M
2 3 S


Output

2
2 1 


Input

5 6
1 1 S
1 2 M
1 3 S
1 4 M
1 5 M
2 2 S


Output

-1

Note

A path is called simple if all huts on it are pairwise different.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <class t>
ostream &operator<<(ostream &tout, const vector<t> &s) {
  tout << '[';
  for (int i = 0; i < s.size(); i++)
    if (i + 1 == s.size())
      tout << s[i];
    else
      tout << s[i] << ',';
  tout << ']';
  return (tout);
}
template <class a, class b>
ostream &operator<<(ostream &tout, const pair<a, b> &c) {
  return (tout << '(' << c.first << ',' << c.second << ')');
}
template <class T>
struct __set__print {
  __set__print(ostream &out) : tout(out), count(0) {}
  void operator()(T x) {
    if (count > 0) tout << ',';
    tout << x;
    ++count;
  }
  ostream &tout;
  int count;
};
template <class T>
ostream &operator<<(ostream &tout, const set<T> &s) {
  tout << '{';
  for_each(s.begin(), s.end(), __set__print<T>(tout));
  return (tout << '}');
}
template <class T, class Q>
struct print_map {
  print_map(ostream &out) : tout(out), count(0) {}
  void operator()(const pair<T, Q> &x) {
    if (count > 0) tout << ',';
    tout << '(' << x.first << " => " << x.second << ')';
    ++count;
  }
  ostream &tout;
  int count;
};
template <class T, class Q>
ostream &operator<<(ostream &tout, map<T, Q> s) {
  tout << '{';
  for_each(s.begin(), s.end(), print_map<T, Q>(tout));
  return (tout << '}');
}
template <class T>
string to_string(T s) {
  stringstream tin;
  tin << s;
  string res;
  getline(tin, res);
  return (res);
}
template <class T>
vector<T> to_vector(T *s, int n) {
  vector<T> result;
  for (int i = 0; i < n; i++) result.push_back(s[i]);
  return (result);
}
template <class type>
class disjoin_set {
  map<type, int> Map;
  vector<int> father;
  vector<int> size;
  void add(type s) {
    if (Map.find(s) == Map.end()) {
      Map[s] = father.size();
      father.push_back(0);
      size.push_back(1);
    }
  }
  int parent(int s) {
    int t = s;
    while (father[t]) t = father[t];
    while (father[s]) {
      int temp = father[s];
      father[s] = t;
      s = temp;
    }
    return (t);
  }

 public:
  disjoin_set() {
    Map.clear();
    father.clear();
    father.resize(1);
    size.clear();
    size.resize(1);
  }
  inline void join(type s, type t) {
    add(s);
    add(t);
    int a = parent(Map[s]), b = parent(Map[t]);
    if (size[a] > size[b]) swap(a, b);
    if (a != b) father[a] = b;
  }
  inline bool same_component(type s, type t) {
    add(s);
    add(t);
    return (parent(Map[s]) == parent(Map[t]));
  }
};
const int MAX_N = 100000 + 20;
pair<int, int> edges[MAX_N];
int n, m;
set<pair<int, int> > e[MAX_N];
bool val[MAX_N];
bool mark[MAX_N];
void add_edge(int s) {
  e[edges[s].first].insert(pair<int, int>(edges[s].second, s));
  e[edges[s].second].insert(pair<int, int>(edges[s].first, s));
}
void del_edge(int s) {
  e[edges[s].first].erase(pair<int, int>(edges[s].second, s));
  e[edges[s].second].erase(pair<int, int>(edges[s].first, s));
}
bool dfs(int start, int end, int who, vector<int> &s) {
  mark[who] = true;
  if (who == end) return (true);
  for (set<pair<int, int> >::iterator i = e[who].begin(); i != e[who].end();
       i++)
    if (!mark[i->first]) {
      if (mark[i->first]) continue;
      if (dfs(start, end, i->first, s)) {
        s.push_back(i->second);
        return (true);
      }
    }
  return (false);
}
int main() {
  ios_base::sync_with_stdio(false);
  cin >> n >> m;
  if (n % 2 == 0) {
    cout << -1 << endl;
    return (0);
  }
  for (int i = 1; i <= m; i++) {
    cin >> edges[i].first >> edges[i].second;
    char temp;
    cin >> temp;
    val[i] = temp == 'S';
  }
  disjoin_set<int> g;
  int count[2] = {0, 0};
  for (int i = 1; i <= m; i++)
    if (!g.same_component(edges[i].first, edges[i].second)) {
      count[val[i]]++;
      g.join(edges[i].first, edges[i].second);
      add_edge(i);
    }
  if (count[0] + count[1] < n - 1) {
    cout << -1 << endl;
    return (0);
  }
  for (int pointer = 0; pointer <= 1; pointer++)
    for (int i = 1; i <= m && count[pointer] < count[1 - pointer]; i++)
      if (val[i] == pointer) {
        for (int j = 1; j <= n; j++) mark[j] = false;
        vector<int> res;
        dfs(edges[i].first, edges[i].second, edges[i].first, res);
        int good = -1;
        for (int j = 0; j < res.size(); j++)
          if (val[res[j]] != pointer) good = res[j];
        if (good != -1) {
          del_edge(good);
          add_edge(i);
          count[pointer]++;
          count[1 - pointer]--;
        }
      }
  if (count[0] != count[1])
    cout << -1 << endl;
  else {
    cout << n - 1 << endl;
    for (int i = 1; i <= n; i++)
      for (set<pair<int, int> >::iterator j = e[i].begin(); j != e[i].end();
           j++)
        if (j->first > i) cout << j->second << ' ';
    cout << endl;
  }
}