#include<bits/stdc++.h>
#include<atcoder/all>
#define eb emplace_back
#define all(a) (a).begin(),(a).end()
#define RD(T,...) T __VA_ARGS__;li(__VA_ARGS__)
#define LL(...) RD(ll,__VA_ARGS__)
#define VL(n,...) vl __VA_ARGS__;setsize({n},__VA_ARGS__);li(__VA_ARGS__)
#define VV(n,...) vl __VA_ARGS__;setsize({n},__VA_ARGS__);vi(__VA_ARGS__)
#define JO(a,b) a##b
#define jo(a,b) JO(a,b)
#define uqsymb(a) jo(a,__LINE__)
#define FE(v,e,...) for(auto&&__VA_OPT__([)e __VA_OPT__(,__VA_ARGS__]):v)
#define FO(n) for(ll uqsymb(i)=n;uqsymb(i)-->0;)
#define FOR(i,...) for(auto[i,i##O,i##E]=rng(0,__VA_ARGS__);i<i##O;i+=i##E)
#define fe(v,...) FE(v,__VA_ARGS__)
#define fo(i,...) FO##__VA_OPT__(R)(i __VA_OPT__(,__VA_ARGS__))
#define of(i,...) for(auto[i,i##O,i##E]=rng(1,__VA_ARGS__);i>=i##O;i-=i##E)
using std::cin,std::cout,std::begin,std::end,std::rbegin;
using std::swap,std::move,std::abs,std::prev,std::next;
using std::tuple,std::bitset,std::minmax,std::get;
using vo=void;using bo=bool;
vo solve();
using is=std::istream;using os=std::ostream;
using dd=long double;using ll=long long;using ull=unsigned long long;
using lll=__int128_t;using ulll=__uint128_t;using str=std::string;
using namespace atcoder;using ml=modint;auto&operator<<(os&o,const ml&x){return o<<x.val();}
constexpr ll oo=3e18;
constexpr ll dx[]{-1,0,1,0,-1,1,1,-1},dy[]{0,-1,0,1,-1,-1,1,1};
constexpr char sp=32;
constexpr char nl=10;
auto rng(bo s,ll a,ll b=oo,ll c=1){if(b==oo)b=a,(s?b:a)=0;return tuple{a-s,b,c};}

template<class T>T zz(T x){return x<0?-x:x;}
template<class T>ll len(const T&a){return a.size();}
template<class T>bo amax(T&a,const T&b){return a<b?a=b,1:0;}

struct edg{
  ll t,w;
  edg(){}
  edg(ll t,ll w=1):t(t),w(w){}
  friend os&operator<<(os&o,const edg&e){return o<<e.t<<sp<<e.w;}
};

template<class A,class B=A>struct cp{
  A a={};B b={};
  cp(){}
  cp(A a,B b):a(a),b(b){}
  cp(std::pair<A,B>p):a(p.first),b(p.second){}
  bo operator==(const cp&c)const{return a==c.a&&b==c.b;}
  bo operator<(const cp&c)const{return a!=c.a?a<c.a:b<c.b;}
  bo operator>(const cp&c)const{return a!=c.a?a>c.a:b>c.b;}

  friend is&operator>>(is&i,cp&c){return i>>c.a>>c.b;}
  friend os&operator<<(os&o,const cp&c){return o<<c.a<<sp<<c.b;}
};using cl=cp<ll>;
template<class A,class B=A,class C=A>struct tr{
  A a={};B b={};C c={};
  tr(){}
  tr(A a,B b,C c):a(a),b(b),c(c){}
  bo operator==(const tr&t)const{return a==t.a&&b==t.b&&c==t.c;}

  auto operator<(const tr&t)const{return a!=t.a?a<t.a:b!=t.b?b<t.b:c<t.c;}
  friend is&operator>>(is&i,tr&t){return i>>t.a>>t.b>>t.c;}
  friend os&operator<<(os&o,const tr&t){return o<<t.a<<sp<<t.b<<sp<<t.c;}
};using tl=tr<ll>;

template<class T>decltype(auto)rb(T&a){return*rbegin(a);}
template<class T>auto pot(T&a){auto r=a.top();a.pop();return r;}

template<class T>struct set:std::set<T>{
  set(const std::vector<T>&a={}){fe(a,e)this->emplace(e);}
  auto ikamax(const T&x){auto p=this->upper_bound(x);return p!=this->begin()?prev(p):this->end();}
  auto ijomin(const T&x){return this->lower_bound(x);}
  friend os&operator<<(os&o,const set&s){fe(s,e)o<<e<<str(&e!=&s.back(),sp);return o;}
};

template<class V>struct ve;
template<class V>constexpr bo isv=0;
template<class V>constexpr bo isv<ve<V>> =1;
template<class V>constexpr bo isv<std::vector<V>> =1;
template<class V>auto rawv(V){if constexpr(isv<V>)return rawv(V(1)[0]);else return V();}

template<class V>struct ve:std::vector<V>{
  using std::vector<V>::vector;
  using T=decltype(rawv(V()));
  template<class U>ve(const std::vector<U>&v={}){fe(v,e)this->eb(e);}

  auto&operator+=(const ve&u){auto&v=*this;fo(i,len(v))v[i]+=u[i];return v;}
  auto&operator-=(const ve&u){auto&v=*this;fo(i,len(v))v[i]-=u[i];return v;}
  auto&operator^=(const ve&u){fe(u,e)this->eb(e);return*this;}
  auto&operator+=(const T&x){auto&v=*this;fe(v,e)e+=x;return v;}
  auto&operator-=(const T&x){auto&v=*this;fe(v,e)e-=x;return v;}
  auto&operator*=(const T&x){auto&v=*this;fe(v,e)e*=x;return v;}
  template<size_t n>auto&operator+=(const bitset<n>&a){fo(i,n)(*this)[i]+=a[i];return*this;}
  template<size_t n>auto&operator-=(const bitset<n>&a){fo(i,n)(*this)[i]-=a[i];return*this;}

  auto operator+(const ve&u){return ve(*this)+=u;}
  auto operator-(const ve&u){return ve(*this)-=u;}
  auto operator^(const ve&u){return ve(*this)^=u;}
  auto operator+(const T&x){return ve(*this)+=x;}auto&operator++(){return*this+=1;}
  auto operator-(const T&x){return ve(*this)-=x;}auto&operator--(){return*this-=1;}
  auto operator*(const T&x){return ve(*this)*=x;}auto operator-(){return ve(*this)*=-1;}

  auto lower_bound(const V&x)const{return std::lower_bound(all(*this),x);}
  auto upper_bound(const V&x)const{return std::upper_bound(all(*this),x);}
  auto ikamax(const V&x)const{auto p=this->upper_bound(x);return p!=this->begin()?prev(p):this->end();}
  auto ijomin(const V&x)const{return this->lower_bound(x);}

};
template<class T=ll,size_t n,size_t i=0>auto vec(const ll(&s)[n],T x={}){if constexpr(n==i+1)return ve<T>(s[i],x);else{auto X=vec<T,n,i+1>(s,x);return ve<decltype(X)>(s[i],X);}}
template<ll n,class...A>vo setsize(const ll(&l)[n],A&...a){((a=vec(l,rawv(a))),...);}
template<class T>using vve=ve<ve<T>>;using vl=ve<ll>;using vvl=vve<ll>;
using gl=ve<ve<ll>>;using ge=ve<ve<edg>>;

struct io{io(){cin.tie(0)->sync_with_stdio(0);
  cout<<std::fixed<<std::setprecision(15);std::cerr<<nl;}}io;
os&operator<<(os&o,const ulll&x){return(x<10?o:o<<x/10)<<ll(x%10);}
os&operator<<(os&o,const lll&x){return o<<str(x<0,'-')<<ulll(zz(x));}
template<size_t n>os&operator<<(os&o,const bitset<n>&b){fo(i,n)o<<b[i];return o;}
template<class...A>os&operator<<(os&o,const tuple<A...>&t){
  apply([&](const auto&...a){ll i=0;(((o<<a<<str(++i!=sizeof...(a),sp))),...);},t);return o;}
template<class V>os&operator<<(os&o,const std::vector<V>&v){fe(v,e)o<<e<<str(&e!=&rb(v),isv<V>?nl:sp);return o;}
template<char c=sp,class...A>vo pp(const A&...a){ll i=0;((cout<<a<<str(++i!=sizeof...(a),c)),...);cout<<nl;}
template<class V>is&operator>>(is&i,std::vector<V>&v){fe(v,e)i>>e;return i;}
template<class...A>vo li(A&...a){(cin>>...>>a);}
template<class...A>vo vi(A&...a){fo(i,(len(a)&...))(cin>>...>>a[i]);}

template<class F>struct rec:F{rec(F&&f):F(std::forward<F>(f)){}template<class...A>decltype(auto)operator()(A&&...a)const{return F::operator()(*this,std::forward<A>(a)...);}};

int main(){ll T=1;fo(T)solve();}
vo solve(){
  LL(N,M);
  VL(N,l);
  VV(M,f,b,w);

  set<ll>s(l);
  ll ans=0;
  fo(i,M){
    ll t=b[i];
    auto p=s.ikamax(f[i]);
    auto q=s.ijomin(f[i]);
    if(p!=s.end())amax(t,w[i]-zz(f[i]-*p));
    if(q!=s.end())amax(t,w[i]-zz(f[i]-*q));
    ans+=t;
  }
  pp(ans);
}