#include<bits/stdc++.h> using namespace std; long long l,r,a[10010],n,q,s[5][20010],ans; int main(){ cin>>n; for(int i=1;i<=n;i++) cin>>a[i]; for(int i=1;i<=n;i++){ memset(s,0,sizeof(s)); q=10000; for(int j=i;j>=1;j--){ if(a[j]<a[i]) q-=1; if(a[j]>a[i]) q+=1; s[j&1][q]+=j; } q=10000; for (int j=i;j<=n;j++){ if(a[j]>a[i]) q-=1; if(a[j]<a[i]) q+=1; ans+=s[j&1][q]*j*a[i]; } } cout<<ans; return 0; }