#include<iostream>
#include<cstdio>
using namespace std;
const int Maxn=2*1e9;
int dis[20005],cst[20005],rg[20005],wst[20005],dp[20005],st[20005],ed[20005];
struct segTree{
    int l,r;
    int lz;
    int minn;
}tree[80005];
int num[20005];
struct node{
    int end;
    int nxt;
    int id;
    void add(int u,int v,int w){
        end=v;
        nxt=num[u];
        num[u]=w;
        id=w;
    }
}Edge[20005];
int binarySearch_min(int n,int x){
    int l=1,r=n,ans=0;
    while(l<=r){
        int mid=(l+r)/2;
        if(dis[mid]<x)
            l=mid+1,ans=mid;
        else
            r=mid-1;
    }
    return ans;
}
int binarySearch_max(int n,int x){
    int l=1,r=n,ans=n+1;
    while(l<=r){
        int mid=(l+r)/2;
        if(dis[mid]>x)
            r=mid-1,ans=mid;
        else
            l=mid+1;
    }
    return ans;
}
void Init(int n){
    for(int i=1;i<=n;i++)
        dp[i]=dp[i-1]+wst[i];
    for(int i=1;i<=n;i++)
        st[i]=binarySearch_min(n,dis[i]-rg[i]);
    for(int i=1;i<=n;i++)
        ed[i]=binarySearch_max(n,dis[i]+rg[i]);
    for(int i=1;i<=n;i++)
        Edge[i].add(ed[i],st[i],i);
}
void Build(int k,int l,int r){
    tree[k].l=l;
    tree[k].r=r;
    if(l==r){
        tree[k].minn=dp[l];
        return;
    }
    int mid,lc,rc;
    mid=(l+r)/2;
    lc=2*k,rc=2*k+1;
    Build(lc,l,mid);
    Build(rc,mid+1,r);
    tree[k].minn=min(tree[lc].minn,tree[rc].minn);
}
void Lazy(int k,int v){
    tree[k].minn+=v;
    tree[k].lz+=v; 
}
void Pushdown(int k){
    int v=tree[k].lz;
    Lazy(2*k,v);
    Lazy(2*k+1,v);
    tree[k].lz=0;
}
void Pushup(int k){
    int lc,rc;
    lc=2*k,rc=2*k+1;
    tree[k].minn=min(tree[lc].minn,tree[rc].minn);
}
void Update(int k,int l,int r,int v){
    if(l<=tree[k].l&&r>=tree[k].r)
        return Lazy(k,v);
    Pushdown(k);
    int mid,lc,rc;
    mid=(tree[k].l+tree[k].r)/2;
    lc=2*k,rc=2*k+1;
    if(l<=mid)
        Update(lc,l,r,v);
    if(r>mid)
        Update(rc,l,r,v);
    Pushup(k);
}
int Query(int k,int l,int r){
    if(l<=tree[k].l&&r>=tree[k].r)
        return tree[k].minn;
    int mid,lc,rc,ans=Maxn;
    mid=(tree[k].l+tree[k].r)/2;
    lc=2*k,rc=2*k+1;
    if(l<=mid)
        ans=min(ans,Query(lc,l,r));
    if(r>mid)
        ans=min(ans,Query(rc,l,r));
    return ans;
}
void Read(int n,int k){
    for(int i=2;i<=n;i++)
        scanf("%d",&dis[i]);
    for(int i=1;i<=n;i++)
        scanf("%d",&cst[i]);
    for(int i=1;i<=n;i++)
        scanf("%d",&rg[i]);
    for(int i=1;i<=n;i++)
        scanf("%d",&wst[i]);
}
int Solve(int n,int k){
    int ans=dp[n]; 
    for(int i=1;i<=k;i++){
        Build(1,1,n);
        for(int j=1;j<=n;j++){
            for(int h=num[j];h;h=Edge[h].nxt){
                int y=Edge[h].end;
                int id=Edge[h].id;
                if(y>0)
                    Update(1,1,y,wst[id]);
            }
            if(j>i)
                dp[j]=min(Query(1,1,j)+cst[j],dp[j]);
            else
                dp[j]=min(dp[j],cst[j]);
        }
        ans=min(ans,dp[n]);
    }
    return ans;
}
int main(){
    int n,k;
    scanf("%d%d",&n,&k);
    Read(n,k);
    Init(n);
    printf("%d\n",Solve(n,k));
    return 0;
}