#pragma region template
#include <bits/stdc++.h>
using namespace std;
using ll = long long;
using ull = unsigned long long;
using ld = long double;
using vi = vector<int>;
using vvi = vector<vi>;
using vvvi = vector<vvi>;
using vll = vector<ll>;
using vvll = vector<vll>;
using vvvll = vector<vvll>;
using vld = vector<ld>;
using vvld = vector<vld>;
using vvvld = vector<vvld>;
using vs = vector<string>;
using pll = pair<ll, ll>;
using vp = vector<pll>;
template <typename T>
using pqrev = priority_queue<T, vector<T>, greater<T>>;
#define rep(i, n) for (ll i = 0, i##_end = (n); i < i##_end; i++)
#define repb(i, n) for (ll i = (n)-1; i >= 0; i--)
#define repr(i, a, b) for (ll i = (a), i##_end = (b); i < i##_end; i++)
#define reprb(i, a, b) for (ll i = (b)-1, i##_end = (a); i >= i##_end; i--)
#define ALL(a) (a).begin(), (a).end()
#define SZ(x) ((ll)(x).size())
/*
constexpr ll MOD = 1e9 + 7;
/*/
constexpr ll MOD = 998244353;
//*/
constexpr ll INF = 1e+18;
constexpr ld EPS = 1e-12L;
constexpr ld PI = 3.14159265358979323846L;
constexpr ll GCD(ll a, ll b) { return b ? GCD(b, a % b) : a; }
constexpr ll LCM(ll a, ll b) { return a / GCD(a, b) * b; }
template <typename S, typename T>
inline bool chmax(S &a, const T &b) {
  if (a < b) {
    a = b;
    return 1;
  }
  return 0;
}
template <typename S, typename T>
inline bool chmin(S &a, const T &b) {
  if (b < a) {
    a = b;
    return 1;
  }
  return 0;
}
#ifdef OJ_LOCAL
#include "dump.hpp"
#else
#define dump(...) ((void)0)
#endif
template <typename T>
bool print_(const T &a) {
  cout << a;
  return true;
}
template <typename T>
bool print_(const vector<T> &vec) {
  for (auto &a : vec) {
    cout << a;
    if (&a != &vec.back()) {
      cout << " ";
    }
  }
  return false;
}
template <typename T>
bool print_(const vector<vector<T>> &vv) {
  for (auto &v : vv) {
    for (auto &a : v) {
      cout << a;
      if (&a != &v.back()) {
        cout << " ";
      }
    }
    if (&v != &vv.back()) {
      cout << "\n";
    }
  }
  return false;
}
void print() { cout << "\n"; }
template <typename Head, typename... Tail>
void print(Head &&head, Tail &&... tail) {
  bool f = print_(head);
  if (sizeof...(tail) != 0) {
    cout << (f ? " " : "\n");
  }
  print(forward<Tail>(tail)...);
}
#pragma endregion

// Binary Indexed Tree 1-indexed
struct BIT {
  ll n;
  vector<ll> bit;
  BIT(ll n) : n(n), bit(n + 1, 0) {}
  void add(ll a, ll w) {
    for (; a <= n; a += a & -a) {
      bit[a] += w;
    }
  }
  // v: 1-indexed, size = n+1
  void build(const vector<ll> &v) {
    n = (ll)v.size() - 1;
    bit = v;
    ll unit = 1;
    while (unit * 2 <= n) {
      for (int i = unit * 2; i <= n; i += unit * 2) {
        bit[i] += bit[i - unit];
      }
      unit <<= 1;
    }
  }
  ll sum(ll a) {
    ll ret = 0;
    for (; a > 0; a -= a & -a) {
      ret += bit[a];
    }
    return ret;
  }
  // [a, b]
  ll sum(ll a, ll b) {
    return sum(b) - sum(a - 1);
  }
};

// Binary Indexed Tree 0-indexed
struct BIT0 {
  ll n;
  vector<ll> bit;
  BIT0(ll n) : n(n), bit(n, 0) {}
  void add(ll a, ll w) {
    for (; a < n; a |= a + 1) {
      bit[a] += w;
    }
  }
  // v: 0-indexed, size = n
  void build(const vector<ll> &v) {
    n = v.size();
    bit = v;
    ll unit = 1;
    while (unit * 2 < n) {
      for (int i = unit * 2 - 1; i < n; i += unit * 2) {
        bit[i] += bit[i - unit];
      }
      unit <<= 1;
    }
  }
  ll sum(ll a) {
    ll ret = 0;
    for (; a >= 0; a = (a & (a + 1)) - 1) {
      ret += bit[a];
    }
    return ret;
  }
  // [a, b]
  ll sum(ll a, ll b) {
    return sum(b) - sum(a - 1);
  }
};

ll cnt[26];
ll cnt2[26];
vvll idx(26);

int main() {
  cin.tie(0);
  ios::sync_with_stdio(false);
  cout << fixed << setprecision(20);
  string s_;
  cin >> s_;
  ll n = SZ(s_);
  vll s(n);
  rep(i, n) s[i] = s_[i] - 'a';
  rep(i, n) cnt[s[i]]++;
  if(n&1){
    {
      ll c = 0;
      rep(i, 26){
        if(cnt[i]&1){
          c++;
        }
      }
      if(c != 1){
        print(-1);
        return 0;
      }
    }
    rep(i, 26) idx[i] = vll(cnt[i], -1);
    {
      vll p(26, 0);
      ll c = 0;
      rep(i, n){
        if(p[s[i]] < cnt[s[i]] / 2){
          idx[s[i]][p[s[i]]] = c;
          c++;
        }
        p[s[i]]++;
      }
    }
    {
      rep(i, 26){
        if(cnt[i]&1){
          rep(j, cnt[i]){
            if(idx[i][j] == -1){
              idx[i][j] = n/2;
              break;
            }
          }
        }
      }
    }
    dump(idx);
    {
      rep(i, 26){
        rep(j, cnt[i]){
          if(idx[i][j] == -1){
            idx[i][j] = n-1-idx[i][cnt[i]-1-j];
          }
        }
      }
    }
    dump(idx);
    {
      BIT0 bt(n);
      ll ans = 0;
      vll p(26, 0);
      rep(i, n){
        ans += i - bt.sum(idx[s[i]][p[s[i]]]);
        bt.add(idx[s[i]][p[s[i]]], 1);
        p[s[i]]++;
      }
      print(ans);
    }
  }else{
    rep(i, 26){
      if(cnt[i]&1){
        print(-1);
        return 0;
      }
    }
    rep(i, 26) idx[i] = vll(cnt[i], -1);
    {
      vll p(26, 0);
      ll c = 0;
      rep(i, n){
        if(p[s[i]] * 2 < cnt[s[i]]){
          idx[s[i]][p[s[i]]] = c;
          c++;
        }
        p[s[i]]++;
      }
    }
    {
      rep(i, 26){
        rep(j, cnt[i]){
          if(idx[i][j] == -1){
            idx[i][j] = n-1-idx[i][cnt[i]-1-j];
          }
        }
      }
    }
    dump(idx);
    {
      BIT0 bt(n);
      ll ans = 0;
      vll p(26, 0);
      rep(i, n){
        ans += i - bt.sum(idx[s[i]][p[s[i]]]);
        bt.add(idx[s[i]][p[s[i]]], 1);
        p[s[i]]++;
      }
      print(ans);
    }
  }
}


Measured memory_bytes: 5268