#pragma GCC target("avx2") #pragma GCC optimize("O3") #pragma GCC optimize("unroll-loops") #include #include using namespace std; using namespace atcoder; typedef long long ll; #define rep(i, n) for (int i = 0; i < (int)(n); i++) #define repr(i, n) for (int i = (int)(n) - 1; i >= 0; i--) #define repk(i, k, n) for (int i = k; i < (int)(n); i++) #define all(v) v.begin(), v.end() #define mod1 1000000007 #define mod2 998244353 #define mod3 100000007 #define vi vector #define vs vector #define vc vector #define vl vector #define vb vector #define vvi vector> #define vvc vector> #define vvl vector> #define vvb vector> #define vvvi vector>> #define vvvl vector>> #define pii pair #define pil pair #define pli pair #define pll pair #define vpii vector> #define vpll vector> #define vvpii vector>> #define vvpll vector>> template void debug(T e){ cerr << e << endl; } template void debug(vector &v){ rep(i, v.size()){ cerr << v[i] << " "; } cerr << endl; } template void debug(vector> &v){ rep(i, v.size()){ rep(j, v[i].size()){ cerr << v[i][j] << " "; } cerr << endl; } } template void debug(vector> &v){ rep(i,v.size()){ cerr << v[i].first << " " << v[i].second << endl; } } template void debug(set &st){ for (auto itr = st.begin(); itr != st.end(); itr++){ cerr << *itr << " "; } cerr << endl; } template void debug(multiset &ms){ for (auto itr = ms.begin(); itr != ms.end(); itr++){ cerr << *itr << " "; } cerr << endl; } template void debug(map &mp){ for (auto itr = mp.begin(); itr != mp.end(); itr++){ cerr << itr->first << " " << itr->second << endl; } } void debug_out(){ cerr << endl; } template void debug_out(Head H, Tail... T){ cerr << H << " "; debug_out(T...); } ll op(ll a, ll b){ return a + b; } ll e(){ return 0LL; } int main(){ ll N; cin >> N; vl A(N); rep(i,N) cin >> A[i]; map mp; for (ll i = 0; i < N; i++){ mp[A[i]]++; } vl pow_2(N + 2); pow_2[0] = 1; for (ll i = 0; i < N + 1; i++){ pow_2[i + 1] = (pow_2[i] * 2LL) % mod1; } ll now = 1; for (auto itr = mp.begin(); itr != mp.end(); itr++){ itr->second = now; now++; } vl B(N); rep(i,N){ B[i] = mp[A[i]]; } //debug(B); ll ans = 0; vvl count(N + 1, vl(0)); for (ll i = 0; i < N; i++){ count[B[i]].push_back(i); } segtree seg1(N); segtree seg2(N); // 小さい方のジグザグの寄与を計算 for (ll i = 1; i <= N; i++){ for (ll j = 0; j < count[i].size(); j++){ ll left_val = 0; ll right_val = 0; if (count[i][j] > 0){ left_val = seg1.prod(0, count[i][j]); } if (count[i][j] < N - 1){ right_val = seg2.prod(count[i][j] + 1, N); } left_val %= mod1; right_val %= mod1; ans = (ans + (left_val * right_val) % mod1) % mod1; } for (ll j = 0; j < count[i].size(); j++){ seg1.set(count[i][j], pow_2[count[i][j]]); seg2.set(count[i][j], pow_2[N - 1 - count[i][j]]); } } segtree seg3(N); segtree seg4(N); // 大きい方のジグザグの寄与を計算 for (ll i = N; i >= 1; i--){ for (ll j = 0; j < count[i].size(); j++){ ll left_val = 0; ll right_val = 0; if (count[i][j] > 0){ left_val = seg3.prod(0, count[i][j]); } if (count[i][j] < N - 1){ right_val = seg4.prod(count[i][j] + 1, N); } left_val %= mod1; right_val %= mod1; ans = (ans + (left_val * right_val) % mod1) % mod1; } for (ll j = 0; j < count[i].size(); j++){ seg3.set(count[i][j], pow_2[count[i][j]]); seg4.set(count[i][j], pow_2[N - 1 - count[i][j]]); } } cout << ans << endl; }