#include <bits/stdc++.h>
 
using namespace std;
using ll = long long;
// #define int ll
using PII = pair<ll, ll>;
 
#define FOR(i, a, n) for (ll i = (ll)a; i < (ll)n; ++i)
#define REP(i, n) FOR(i, 0, n)
#define ALL(x) x.begin(), x.end()
 
template<typename T> T &chmin(T &a, const T &b) { return a = min(a, b); }
template<typename T> T &chmax(T &a, const T &b) { return a = max(a, b); }
template<typename T> bool IN(T a, T b, T x) { return a<=x&&x<b; }
template<typename T> T ceil(T a, T b) { return a/b + !!(a%b); }
 
template<typename T> vector<T> make_v(size_t a) { return vector<T>(a); }
template<typename T,typename... Ts>
auto make_v(size_t a,Ts... ts) { 
  return vector<decltype(make_v<T>(ts...))>(a,make_v<T>(ts...));
}
template<typename T,typename V> typename enable_if<is_class<T>::value==0>::type
fill_v(T &t, const V &v) { t=v; }
template<typename T,typename V> typename enable_if<is_class<T>::value!=0>::type
fill_v(T &t, const V &v ) { for(auto &e:t) fill_v(e,v); }
 
template<class S,class T>
ostream &operator <<(ostream& out,const pair<S,T>& a){
  out<<'('<<a.first<<','<<a.second<<')'; return out;
}
template<typename T>
istream& operator >> (istream& is, vector<T>& vec){
  for(T& x: vec) {is >> x;} return is;
}
template<class T>
ostream &operator <<(ostream& out,const vector<T>& a){
  out<<'['; for(T i: a) {out<<i<<',';} out<<']'; return out;
}
 
int dx[] = {0, 1, 0, -1}, dy[] = {1, 0, -1, 0}; // DRUL
const int INF = 1<<30;
const ll LLINF = 1LL<<60;
const int MOD = 1000000007;

struct UnionFind {
  vector<int> par, s;
  UnionFind(int n=2e5) { init(n); }
  void init(int n) { 
    s.assign(n, 1); par.resize(n); 
    iota(par.begin(), par.end(), 0);
  }
  int find(int x) {
    if(par[x] == x) return x;
    return par[x] = find(par[x]);
  }
  void unite(int x, int y) {
    x = find(x);
    y = find(y);
    if(x == y) return;
    if(s[x] < s[y]) par[x] = y, s[y] = s[x] + s[y];
    else par[y] = x, s[x] = s[x] + s[y];
  }
  bool same(int x, int y) { return find(x) == find(y); }
  int size(int x) { return s[find(x)]; }
};

template< typename T, typename F >
T boruvka(ll n, F f) {
  vector<ll> rev(n), belong(n);
  UnionFind uf(n);
  T ret = T();
  while(uf.size(0) != n) {
    ll ptr = 0;
    REP(i, n) {
      if(uf.find(i) == i) {
        belong[i] = ptr++;
        rev[belong[i]] = i;
      }
    }
    REP(i, n) belong[i] = belong[uf.find(i)];
    auto v = f(ptr, belong);
    bool update = false;
    REP(i, ptr) {
      if(~v[i].second && !uf.same(rev[i], rev[v[i].second])) {
        uf.unite(rev[i], rev[v[i].second]);
        ret += v[i].first;
        update = true;
      }
    }
    if(!update) return -1; // notice!!
  }
  return ret;
}

signed main(void)
{
  cin.tie(0);
  ios::sync_with_stdio(false);

  ll n, d;
  cin >> n >> d;
  vector<ll> a(n);
  REP(i, n) cin >> a[i];

  // 2番目に小さいコストの辺までを持つように遷移
  auto chain = [](pair<PII,PII> a, PII p) {
    if(a.first.second == p.second) {
      chmin(a.first.first, p.first);
    } else if(a.second.second == p.second) {
      chmin(a.second.first, p.first);
      if(a.first > a.second) swap(a.first, a.second);
    } else {
      if(p < a.first) {
        a.second = a.first;
        a.first = p;
      } else if(p < a.second) {
        a.second = p;
      }
    }
    return a;
  };

  // 各頂点から最小のコストの辺を求める 
  // f(連結成分数、i番目の頂点が属する連結成分)
  function<vector<PII>(ll,vector<ll>)> f = [&](ll sz, vector<ll> belong) {
    // ret[i] = (頂点iからコスト最小の辺の(コスト, i以外の端点))
    // iがufの親以外ならsecondは-1として連結成分ごとに管理
    vector<PII> ret(sz, PII(LLINF, -1));

    // ((最小の辺コスト,頂点)(2番目に小さい辺コスト,頂点))    
    pair<PII,PII> mi({LLINF,-1}, {LLINF,-1});
    REP(i, n) {
      // mi.first.secondがiと同じ連結成分なら2番目に小さい辺を利用
      auto e = mi.first.second == belong[i] ? mi.second : mi.first;
      e.first += a[i] + i*d;
      ret[belong[i]] = min(ret[belong[i]], e);
      mi = chain(mi, PII(a[i]-i*d, belong[i]));
    }
  
    mi = {{LLINF,-1}, {LLINF,-1}};
    for(ll i=n-1; i>=0; --i) {
      auto e = mi.first.second == belong[i] ? mi.second : mi.first;
      e.first += a[i] - i*d;
      ret[belong[i]] = min(ret[belong[i]], e);
      mi = chain(mi, PII(a[i]+i*d, belong[i]));
    }

    return ret;
  };

  cout << boruvka<ll, decltype(f)>(n, f) << endl;

  return 0;
}


Measured memory_bytes: 11264