Problem:
Score: 500 points

Problem Statement

Given is a permutation P of \{1, 2, \ldots, N\}.

For a pair (L, R) (1 \le L \lt R \le N), let X_{L, R} be the second largest value among P_L, P_{L+1}, \ldots, P_R.

Find \displaystyle \sum_{L=1}^{N-1} \sum_{R=L+1}^{N} X_{L,R}.

Constraints

2 \le N \le 10^5

1 \le P_i \le N

P_i \neq P_j (i \neq j)

All values in input are integers.

Input

Input is given from Standard Input in the following format:

N
P_1 P_2 \ldots P_N

Output

Print \displaystyle \sum_{L=1}^{N-1} \sum_{R=L+1}^{N} X_{L,R}.

Sample Input 1

3
2 3 1

Sample Output 1

5

X_{1, 2} = 2, X_{1, 3} = 2, and X_{2, 3} = 1, so the sum is 2 + 2 + 1 = 5.

Sample Input 2

5
1 2 3 4 5

Sample Output 2

30

Sample Input 3

8
8 2 7 3 4 5 6 1

Sample Output 3

136

Solution in C (GCC 5.4.1) (judge verdict: Wrong Answer)

#include <stdio.h>

int p[100000];

int argmax(int l, int r){
  int nowmax=p[l];
  int maxindex=l;
  for(int i=l+1;i<=r;i++){
    if(p[i]>nowmax){
      maxindex=i;
      nowmax=p[i];
    }
  }
  return maxindex;
}

int ascending(int l, int r){
  for(int i=l;i<=r-1;i++){
    if(p[i]>p[i+1]) return 0;
  }
  return 1;
}

int descending(int l, int r){
  for(int i=l;i<=r-1;i++){
    if(p[i]<p[i+1]) return 0;
  }
  return 1;
}

long secondsum(int l, int r){
  long ans=0;
  int imax,i,j;
  int ll[100000];
  int rr[100000];
  long firstsum=0;

  if(r-l<1) return 0;
  if(ascending(l,r)){
    for(i=l;i<=r-1;i++){
      ans+=p[i]*(i-l+1);
    }
    return ans;
  }
  if(descending(l,r)){
    for(i=r;i>=l+1;i--){
      ans+=p[i]*(r-i+1);
    }
    return ans;
  }
  imax=argmax(l,r);
  ll[0]=0;
  for(i=1;i<=imax-l;i++){
    if(p[imax-i]>ll[i-1]) ll[i]=p[imax-i]; else ll[i]=ll[i-1];
  }
  rr[0]=0;
  for(i=1;i<=r-imax;i++){
    if(p[imax+i]>rr[i-1]) rr[i]=p[imax+i]; else rr[i]=rr[i-1];
  }
  for(i=0;i<=imax-l;i++){
    for(j=0;j<=r-imax;j++){
      firstsum+=(ll[i]>rr[j]?ll[i]:rr[j]);
    }
  }
  
  if(imax==l)
    ans=secondsum(imax+1,r)+firstsum;
  else if(imax==r)
    ans=secondsum(l,imax-1)+firstsum;
  else
    ans=secondsum(l,imax-1)+secondsum(imax+1,r)+firstsum;
  return ans;
}

int main()
{
  int i,n;
  long ans;
  scanf("%d", &n);
  for(i=0;i<n;i++){
    scanf("%d", &p[i]);
  }
  ans=secondsum(0,n-1);
  printf("%ld\n",ans);  
  return 0;
}