#include <bits/stdc++.h> using namespace std; int n,m,a[10005],s[10005],ans,maxx; int f[10005],t,lt[10005],rt[10005]; int main() { scanf("%d",&n); for(int i=1;i<=n;++i) { scanf("%d",&a[i]); s[i]=s[i-1]+a[i]; } for(int i=1;i<=n;++i) { while(t!=0 && a[f[t]]<=a[i]) { rt[f[t]]=i; f[t--]=0; } f[++t]=i; } memset(f,0,sizeof(f));t=0; for(int i=n;i>=1;--i) { while(t!=0&&a[f[t]]<=a[i]) { lt[f[t]]=i; f[t--]=0; } f[++t]=i; } ans=0; for(int i=1;i<=n;++i) { if(rt[i]!=0) { ans+=(rt[i]-i-1)*min(a[rt[i]],a[i])-(s[rt[i]-1]-s[i]); i=rt[i]-1; } else break; } for(int i=n;i>=1;--i) { if(lt[i]!=0&&a[lt[i]]!=a[i] ) { ans+=(i-lt[i]-1)*min(a[lt[i]],a[i])-(s[i-1]-s[lt[i]]); i=lt[i]+1; } else if(lt[i]==0) break; } cout<<ans; return 0; }