#include using namespace std; template struct SegTree { const T INF = numeric_limits::max(); int n; vector dat; SegTree(int n_) : dat(n_ * 4, 0) { int x = 1; while (n_ > x) { x *= 2; } n = x; } void init(T x) { for (int i = 0; i < 2 * n - 1; i++) dat[i] = x; } void add(int i, T x) { i += n - 1; dat[i] += x; while (i > 0) { i = (i - 1) / 2; dat[i] = dat[i * 2 + 1] + dat[i * 2 + 2]; } } T query(int a, int b) { return query_sub(a, b, 0, 0, n); } T query_sub(int a, int b, int k, int l, int r) { if (r <= a || b <= l) { return 0; } else if (a <= l && r <= b) { return dat[k]; } else { T vl = query_sub(a, b, k * 2 + 1, l, (l + r) / 2); T vr = query_sub(a, b, k * 2 + 2, (l + r) / 2, r); return vl + vr; } } }; #define MOD 1000000007 long long modpow(long long a, long long n, long long mod) { long long res = 1; while (n > 0) { if (n & 1) res = res * a % mod; a = a * a % mod; n >>= 1; } return res; } int main() { long long N; cin >> N; vector A(N); for (int i = 0; i < N; i++) cin >> A[i]; set Set; for (int i = 0; i < N; i++) { Set.insert(A[i]); } long long count = 0; map Map; while (!Set.empty()) { long long a = *Set.begin(); Set.erase(Set.begin()); Map[a] = count; count++; } vector A_(N); for (int i = 0; i < N; i++) A_[i] = Map[A[i]]; vector dp(N), dp2(N), dp3(N), dp4(N); SegTree Seg1(count + 10); for (int i = 0; i < N; i++) { dp[i] = Seg1.query(0, A_[i]) % MOD; dp2[i] = Seg1.query(A_[i] + 1, count + 5) % MOD; Seg1.add(A_[i], modpow(2, i, MOD)); } SegTree Seg2(count + 10); for (int i = N - 1; i >= 0; i--) { dp3[i] = Seg2.query(0, A_[i]) % MOD; dp4[i] = Seg2.query(A_[i] + 1, count + 5) % MOD; Seg2.add(A_[i], modpow(2, N - i - 1, MOD)); } long long ans = 0; for (int i = 0; i < N; i++) { ans += dp[i] * dp3[i] % MOD; ans += dp2[i] * dp4[i] % MOD; } cout << ans % MOD << endl; }