#include <bits/stdc++.h>
using namespace std;
long long power(long long x, long long n) {
  if (x == 0) return 0;
  long long ret = 1;
  while (n > 0) {
    if (n & 1) ret = (ret * x);
    x = (x * x);
    n /= 2;
  }
  return ret;
}
long long lz[200009], rz[200009], zr[200009], zl[200009], vis[200009];
int main() {
  ios_base::sync_with_stdio(0), cin.tie(0);
  long long test = 1, i, j, k, l, t, r, n, m, a, b, flag, ans;
  t = 1;
  string second;
  while (t <= test) {
    cin >> second;
    vector<long long> locz;
    ans = 0;
    for (i = 0; i < second.size(); i++) {
      if (second[i] == '0') locz.push_back(i);
    }
    a = 0;
    for (i = 0; i < second.size(); i++) {
      if (second[i] == '1' && a < locz.size() && locz[a] < i)
        lz[i] = locz[a], zr[locz[a]] = i, a++;
      else if (second[i] != '0') {
        cout << "-1";
        return 0;
      }
    }
    b = locz.size() - 1;
    for (i = second.size() - 1; i >= 0; i--) {
      if (second[i] == '1' && locz[b] > i)
        rz[i] = locz[b], zl[locz[b]] = i, b--;
      else if (second[i] != '0') {
        cout << "-1";
        return 0;
      }
    }
    vector<long long> sizel;
    for (i = 0; i < second.size(); i++) {
      if (vis[i] == 0) {
        j = i;
        a = 1;
        while ((second[j] == '1' && rz[j]) || (second[j] == '0' && zr[j])) {
          vis[j] = 1;
          if (second[j] == '1')
            j = rz[j];
          else
            j = zr[j];
          a++;
        }
        vis[j] = 1;
        sizel.push_back(a);
        ans++;
      } else if (second[i] == '0' && vis[i] == 0)
        sizel.push_back(1), ans++;
    }
    cout << ans << "\n";
    memset(vis, 0, sizeof(vis));
    k = 0;
    for (i = 0; i < second.size(); i++) {
      if (vis[i] == 0) {
        j = i;
        a = 1;
        cout << sizel[k] << " ";
        k++;
        while ((second[j] == '1' && rz[j]) || (second[j] == '0' && zr[j])) {
          vis[j] = 1;
          cout << j + 1 << " ";
          if (second[j] == '1')
            j = rz[j];
          else
            j = zr[j];
          a++;
        }
        vis[j] = 1;
        cout << j + 1 << "\n";
        ans++;
      } else if (second[i] == '0' && vis[i] == 0)
        cout << sizel[k] << " " << i + 1 << "\n", k++;
    }
    t++;
  }
  return 0;
}
