// N（20万）段再帰できるかのテスト

ll n,a[3d5],r=MD;
ll f(ll i,ll w){
	if(i==n){
		return MD;
	}
	ll x=a[i];
	ll y=f(i+1,w<x?w:x);
	if((w<x)!=(x<y))r<?=w+x+y;
	return y<x?y:x;
}
{
	rd(n,a(n));
	f(0,MD);
	wt(r<MD?r:-1);
}