// yukicodr
// No.1681



//二次元可変配列
//vector <vector <int>> mass;
//vector <vector <int>> memo;
//vector <int> memo;


//#include "stdafx.h"
#include <iostream>
#include <vector>
#include <list>//list
#include <queue> //queue
#include <set> //連想コンテナ(要素が自動でソートされる)、要素１つ(Key)、keyの重複ない、O(logN)
#include <map> //連想コンテナ(要素が自動でソートされる)、要素２つ(Key,data)、keyの重複ない、dataは重複あり、O(logN)
#include <unordered_set> //hash、O(1)
#include <unordered_map> //hash、O(1)
#include <algorithm>
#include <iomanip>
#include <cstring>
#include <string>
#include <climits>
//#include <bits/stdc++.h>

using namespace std;

#define FOR(x,to) for(x=0;x<to;x++)
#define ZERO(a) memset(a,0,sizeof(a))
#define MINUS(a) memset(a,0xff,sizeof(a))
#define FMAX(a,b)  ((a)>(b)?(a):(b))
#define FMIN(a,b)  ((a)<(b)?(a):(b))
#define FCEIL(a,b)  ((a)+(b)-1)/(b)

typedef unsigned long long ULL;
typedef signed long long SLL;


queue<int> _queue;



int N;
ULL A[200005];
ULL a, b, c,d[200005], total;



int main()
{
	cin >> N;

	//べき乗の部分も大きくなるので予め計算しておく
	d[N-1] = 2;
	for (int j = N-2; j > 0; j--)
	{
		d[j] = d[j+1]*3;
		d[j] %= 1000000007;

		//cout << j << "," << d[j] << endl;
	}

	a = 1;
	for (int i = 1; i < N; i++)
	{
		scanf("%lld", &A[i]);
		//A[i] %= 1000000007;
		a *= A[i];
		a %= 1000000007;

		c = a * d[i];
		c %= 1000000007;
		total += c;
		total %= 1000000007;

	}

	scanf("%lld", &A[N]);
	a *= A[N];
	a %= 1000000007;
	total += a;
	total %= 1000000007;

	cout << total;


	return 0;

}