#include <bits/stdc++.h>
#pragma GCC optimize("Ofast")
using namespace std;
bool prime(long long n) {
  for (long long i = 2; i <= sqrt(n); i++) {
    if (n % i == 0) return false;
  }
  return n != 1;
}
long long gcd(long long x, long long y) {
  if (y == 0) return x;
  return gcd(y, x % y);
}
long long lcm(long long x, long long y) { return x / gcd(x, y) * y; }
long long mod_pow(long long n, long long p, long long m) {
  if (p == 0) return 1;
  if (p % 2 == 0) {
    long long t = mod_pow(n, p / 2, m);
    return (t * t) % m;
  }
  return n * mod_pow(n, p - 1, m) % m;
}
long long extGCD(long long a, long long b, long long& x, long long& y) {
  if (b == 0) {
    x = 1;
    y = 0;
    return a;
  }
  long long d = extGCD(b, a % b, y, x);
  y -= a / b * x;
  return d;
}
long long modinv(long long a, long long m) {
  long long b = m, u = 1, v = 0;
  while (b) {
    long long t = a / b;
    a -= t * b;
    swap(a, b);
    u -= t * v;
    swap(u, v);
  }
  u %= m;
  if (u < 0) u += m;
  return u;
}
long long digit(long long x) {
  long long cnt = 0;
  while (x > 0) {
    cnt += x % 10;
    x /= 10;
  }
  return cnt;
}
long long read() {
  long long tmp;
  cin >> tmp;
  return tmp;
}
long long xor128() {
  static long long x = 123456789, y = 362436069, z = 521288629, w = 88675123;
  long long t = (x xor (x << 11));
  x = y;
  y = z;
  z = w;
  return (w = (w xor (w >> 19)) xor (t xor (t >> 8)));
}
signed main() {
  long long n;
  cin >> n;
  long long a[100005];
  long long ans = 0;
  for (long long i = 0; i < n; i++) cin >> a[i];
  long long cnt = 0;
  for (long long i = 0; i < n; i++) {
    cnt += a[i] - a[0];
  }
  long long kai = 1;
  for (long long i = 0; i < n - 1; i++) {
    kai *= i + 1;
    kai %= 1000000007;
  }
  for (long long i = 0; i < n - 1; i++) {
    ans += (kai * modinv((n - i - 1), 1000000007)) % 1000000007 * (cnt);
    ans %= 1000000007;
    if (i != n - 1) {
      cnt -= (a[i + 1] - a[i]) * (n - i - 1);
    }
  }
  cout << ans << endl;
  return 0;
}
