#include <bits/stdc++.h>
using namespace std;
const int N = 5005;
int n, s, e;
int a[N], b[N], c[N], d[N], x[N];
long long f[2][N];
int main() {
  ios::sync_with_stdio(false);
  cin >> n >> s >> e;
  for (int i = 1; i <= n; ++i) cin >> x[i];
  for (int i = 1; i <= n; ++i) cin >> a[i];
  for (int i = 1; i <= n; ++i) cin >> b[i];
  for (int i = 1; i <= n; ++i) cin >> c[i];
  for (int i = 1; i <= n; ++i) cin >> d[i];
  for (int i = 1; i <= n + 1; ++i) f[0][i] = 1e15;
  f[0][0] = 0;
  for (int i = 1; i <= n; ++i) {
    int t = i % 2;
    for (int j = 0; j <= n; ++j) f[t][j] = 1e15;
    for (int j = 0; j <= n; ++j) {
      if (i > s && i > e && j == 1) continue;
      if (i == s) {
        if (j + 1 <= n)
          f[t][j + 1] = min(f[t][j + 1], f[1 - t][j] + d[i] - x[i]);
        if (j) f[t][j] = min(f[t][j], f[1 - t][j] + c[i] + x[i]);
      } else if (i == e) {
        if (j + 1 <= n)
          f[t][j + 1] = min(f[t][j + 1], f[1 - t][j] + b[i] - x[i]);
        if (j) f[t][j] = min(f[t][j], f[1 - t][j] + a[i] + x[i]);
      } else {
        if (j && !(i > e && j == 1))
          f[t][j] = min(f[t][j], f[1 - t][j] + a[i] + d[i]);
        if (j && !(i > s && j == 1))
          f[t][j] = min(f[t][j], f[1 - t][j] + c[i] + b[i]);
        if (j >= 2)
          f[t][j - 1] = min(f[t][j - 1], f[1 - t][j] + a[i] + c[i] + 2 * x[i]);
        if (j + 1 <= n)
          f[t][j + 1] = min(f[t][j + 1], f[1 - t][j] + b[i] + d[i] - 2 * x[i]);
      }
    }
  }
  cout << f[n % 2][1];
}
