#if true
//#if false
#define UTAKA_DEBUG
#endif

using System;
using System.Text;
using System.Linq;
using System.Collections;
using System.Collections.Generic;
using System.Diagnostics.CodeAnalysis;
using System.IO;
using System.Runtime.CompilerServices;

namespace UtakaApp
{
    public partial class Program
    {
        public const string ContestName = "abc140";
        public const string ProblemName = "E";

        public static void Main(string[] args)
        {
#if UTAKA_LOCAL
//#if false
            new TestCaseCheckerForAtCoder().TestProblems();
#else
            var console = new MyConsole();
            new Program().Solve(System.Console.In, console);
            console.Flush();
#endif
            var sw = new StreamWriter(System.Console.OpenStandardOutput()) {AutoFlush = false};
        }

        public void Solve(TextReader textReader, IConsole console)
        {
            var cin = new ConsoleInput(textReader, ' ');

            int N = cin.ReadInt;
            int[] P = cin.ReadIntArray(N);

            long answer = 0;

            List<int> largeValueIndexes = new List<int> {0, 0, N + 1, N + 1};

            int[] indexes = new int[N];

            for (int i = 0; i < N; i++)
            {
                int v = P[i] - 1;
                indexes[v] = i + 1;
            }

            for (int v = N; v > 0; v--)
            {
                int index = indexes[v - 1];

                int ind = largeValueIndexes.GetAtLeastIndex(index, (item, value) => item - value);
                
                largeValueIndexes.Insert(ind, index);

//                int point0 = InsertValuesInOrder(index, ref largeValueIndexes);

                long representTime = GetRepresentTime(ind, largeValueIndexes);

                answer += representTime * v;
            }

            console.WriteLine(answer.ToString());
        }

        private static int InsertValuesInOrder(int v, ref List<int> largeValueIndexes)
        {
            int left = 0;
            int right = largeValueIndexes.Count - 1;

            while (right - left > 1)
            {
                int middle = left + (right - left) / 2;
                if (largeValueIndexes[middle] < v)
                {
                    left = middle;
                }
                else
                {
                    right = middle;
                }
            }

            largeValueIndexes.Insert(right, v);

            return right;
        }

        private static long GetRepresentTime(int index, List<int> largeValueIndexes)
        {
            int p0 = largeValueIndexes[index];
            int l2 = largeValueIndexes[index - 2];
            int l1 = largeValueIndexes[index - 1];
            int r1 = largeValueIndexes[index + 1];
            int r2 = largeValueIndexes[index + 2];

            return (p0 - l1) * (r2 - r1) + (l1 - l2) * (r1 - p0);
        }
    }

    public static class ListExtensions
    {
        public static int GetAtMostIndex<TItem, TValue>(this IList<TItem> list, TValue value, Func<TItem, TValue, int> comparer)
        {
            return GetAtMostIndex(list, value, comparer, 0, list.Count);
        }

        public static int GetAtLeastIndex<TItem, TValue>(this IList<TItem> list, TValue value, Func<TItem, TValue, int> comparer)
        {
            return GetAtLeastIndex(list, value, comparer, 0, list.Count);
        }

        public static int GetAtMostIndex<TItem, TValue>(this IList<TItem> list, TValue value, Func<TItem, TValue, int> comparer, int index, int count)
        {
            if (count == 0)
            {
                return -1;
            }

            int startIndex = index;
            int endIndex = index + count - 1;
            int middleIndex = 0;
            int compareResult = -1;

            while (startIndex < endIndex)
            {
                middleIndex = (startIndex + endIndex) >> 1; //  / 2
                compareResult = comparer.Invoke(list[middleIndex], value);

                if (compareResult > 0)
                {
                    endIndex = middleIndex - 1;
                }
                else if (compareResult < 0)
                {
                    startIndex = middleIndex + 1;
                }
                else
                {
                    return middleIndex;
                }
            }

            if (startIndex == endIndex)
            {
                compareResult = comparer.Invoke(list[startIndex], value);

                if (compareResult <= 0)
                {
                    return startIndex;
                }
                else
                {
                    int returnIndex = startIndex - 1;

                    if (returnIndex < index)
                    {
                        return -1;
                    }
                    else
                    {
                        return returnIndex;
                    }
                }
            }
            else
            {
                //todo: test
                return startIndex - 1;
            }
        }

        public static int GetAtLeastIndex<TItem, TValue>(this IList<TItem> list, TValue value, Func<TItem, TValue, int> comparer, int index,
            int count)
        {
            if (count == 0)
            {
                return -1;
            }

            int startIndex = index;
            int endIndex = index + count - 1;
            int middleIndex = 0;
            int compareResult = -1;

            while (startIndex < endIndex)
            {
                middleIndex = (startIndex + endIndex) >> 1; //  / 2
                compareResult = comparer.Invoke(list[middleIndex], value);

                if (compareResult > 0)
                {
                    endIndex = middleIndex - 1;
                }
                else if (compareResult < 0)
                {
                    startIndex = middleIndex + 1;
                }
                else
                {
                    return middleIndex;
                }
            }

            if (startIndex == endIndex)
            {
                compareResult = comparer.Invoke(list[startIndex], value);

                if (compareResult >= 0)
                {
                    return startIndex;
                }
                else
                {
                    int returnIndex = startIndex + 1;

                    if (returnIndex >= index + count)
                    {
                        return -1;
                    }
                    else
                    {
                        return returnIndex;
                    }
                }
            }
            else
            {
                return endIndex + 1;
            }
        }
    }


    public partial class Program
    {
        public const int ModLarge = 1000000007;
    }

    public class ConsoleInput
    {
        private readonly TextReader _stream;
        private char _separator = ' ';
        private Queue<string> inputStream;

        public ConsoleInput(TextReader stream, char separator = ' ')
        {
            this._separator = separator;
            this._stream = stream;
            inputStream = new Queue<string>();
        }

        public string Read
        {
            get
            {
                if (inputStream.Count != 0) return inputStream.Dequeue();
                string[] tmp = _stream.ReadLine().Split(_separator);
                for (int i = 0; i < tmp.Length; ++i)
                {
                    inputStream.Enqueue(tmp[i]);
                }

                return inputStream.Dequeue();
            }
        }

        public string ReadLine => _stream.ReadLine();
        public int ReadInt => int.Parse(Read);
        public long ReadLong => long.Parse(Read);
        public double ReadDouble => double.Parse(Read);

        public string[] ReadStrArray(long N)
        {
            var ret = new string[N];
            for (long i = 0; i < N; ++i) ret[i] = Read;
            return ret;
        }

        public int[] ReadIntArray(long N)
        {
            var ret = new int[N];
            for (long i = 0; i < N; ++i) ret[i] = ReadInt;
            return ret;
        }

        public long[] ReadLongArray(long N)
        {
            var ret = new long[N];
            for (long i = 0; i < N; ++i) ret[i] = ReadLong;
            return ret;
        }
    }

    public interface IConsole
    {
        void Flush();
        void Write(string str);
        void WriteLine(string str);
    }

    public class MyConsole : IConsole
    {
        public MyConsole()
        {
            var sw = new StreamWriter(System.Console.OpenStandardOutput()) {AutoFlush = false};
            System.Console.SetOut(sw);
        }

        public void Flush()
        {
            System.Console.Out.Flush();
        }

        public void Write(string str)
        {
            System.Console.Write(str);
        }

        public void WriteLine(string str)
        {
            System.Console.WriteLine(str);
        }
    }

#if UTAKA_LOCAL

    public class DebugConsole : IConsole
    {
        private StringBuilder mSb;

        public DebugConsole()
        {
            mSb = new StringBuilder();
        }

        public void Flush()
        {
            // 何もしない
        }

        public void Write(string str)
        {
            mSb.Append(str);
        }

        public void WriteLine(string str)
        {
            mSb.AppendLine(str);
        }

        public string GetAllOutput()
        {
            return mSb.ToString();
        }
    }

#endif

#if UTAKA_LOCAL

    public class TestCaseCheckerForAtCoder
    {
        private string DirectoryPath => $"../../../../{Program.ContestName}/{Program.ProblemName}";

        private string GetInputFilePath(int testCaseNumber)
        {
            //return $"{DirectoryPath}/sample-{testCaseNumber}.in";
            return $"{DirectoryPath}/in_{testCaseNumber}.txt";
        }

        private string GetOutputFilePath(int testCaseNumber)
        {
            //return $"{DirectoryPath}/sample-{testCaseNumber}.out";
            return $"{DirectoryPath}/out_{testCaseNumber}.txt";
        }

        public bool TestProblem(int testCaseNumber)
        {
            var inputFilePath = GetInputFilePath(testCaseNumber);
            var outputFilePath = GetOutputFilePath(testCaseNumber);

            TextReader inputStream = new StreamReader(inputFilePath);

            var debugConsoleWriter = new DebugConsole();

            new Program().Solve(inputStream, debugConsoleWriter);

            var output = debugConsoleWriter.GetAllOutput();

            TextReader outputStream = new StreamReader(outputFilePath);
            var outputAnswer = outputStream.ReadToEnd();

            Dbg.WriteLine(output);
            Dbg.WriteLine(outputAnswer);

            var isCorrect = output == outputAnswer;

            return isCorrect;
        }

        public void TestProblems()
        {
            var isSuccessAll = true;

            var testCaseNumber = 1;
            while (true)
            {
                var inputFileName = GetInputFilePath(testCaseNumber);
                if (!File.Exists(inputFileName))
                {
                    break;
                }

                System.Console.WriteLine($"TestCase {testCaseNumber} =====================================================");

                var result = TestProblem(testCaseNumber);

                if (result)
                {
                    System.Console.WriteLine($"Success");
                }
                else
                {
                    isSuccessAll = false;
                    System.Console.WriteLine($"Failure *****");
                }

                testCaseNumber++;
            }

            if (isSuccessAll)
            {
                System.Console.WriteLine($"!!!!!!!!! All Success !!!!!!!!!");
            }
        }
    }

#endif

#if UTAKA_LOCAL

    public static class Dbg
    {
        public static void WriteLine(string str)
        {
            System.Console.WriteLine(str);
        }

        public static void Write(string str)
        {
            System.Console.Write(str);
        }
    }
#else
    public static class Dbg
    {
        public static void WriteLine(string str)
        {
        }

        public static void Write(string str)
        {
        }
    }

#endif
}


Measured memory_bytes: 22368