/*    特徴    */

/*    教訓    */

#include <bits/stdc++.h>
using namespace std;

using ll = long long;
using ld  = long double;
using pint = pair<int, int>;
using pll = pair<ll, ll>;
using pld = pair<ld, ld>;
const int INF=1e9+7;
const ll LINF=9223372036854775807;
const ll MOD=1e9+7;
const ld PI=acos(-1);
const ld EPS = 1e-9; //微調整用（EPSより小さいと0と判定など）

int ii() { int x; if (scanf("%d", &x)==1) return x; else return 0; }
long long il() { long long x; if (scanf("%lld", &x)==1) return x; else return 0; }
string is() { string x; cin >> x; return x; }
char ic() { char x; cin >> x; return x; }
void oi(int x) { printf("%d ", x); }
void ol(long long x) { printf("%lld ", x); }
void od_nosp(double x) { printf("%.15f", x); } // 古い問題用
void od(double x) { printf("%.15f ", x); }
// long doubleで受け取り、fをLfなどに変えて出力すると、変な数値が出る
// それをなんとかするには独自の出力を作らなければならなそう
void os(const string &s) { printf("%s ", s.c_str()); }
void oc(const char &c) { printf("%c ", c); }
#define o_map(v){cerr << #v << endl; for(const auto& xxx: v){cout << xxx.first << " " << xxx.second << "\n";}} //動作未確認
void br() { putchar('\n'); }

#define gcd __gcd //llは受け取らない C++17~のgcdと違うので注意
int lcm(int a, int b){return a / gcd(a, b) * b;}
#define begin_end(a) a.begin(),a.end() //sort(begin_end(vec));
#define REP(i,m,n) for(ll i=(ll)(m) ; i < (ll) (n) ; i++ )
#define rep(i,n) REP(i,0,n)
#define m_p(a,b) make_pair(a,b)
#define SORT_UNIQUE(c) (sort(c.begin(),c.end()), c.resize(distance(c.begin(),unique(c.begin(),c.end()))))
#define GET_POS(c,x) (lower_bound(c.begin(),c.end(),x)-c.begin())
#define p_b push_back
#define SZ(x) ((int)(x).size) //size()がunsignedなのでエラー避けに

//4近傍（上下左右） rep(i, 2) にすると右・下だけに進む
vector<int> dx_4 = {1, 0, -1, 0};
vector<int> dy_4 = {0, 1, 0, -1};

// coutによるpairの出力（空白区切り）
template<typename T1, typename T2> ostream& operator<<(ostream& s, const pair<T1, T2>& p) {return s << "(" << p.first << " " << p.second << ")";}
// coutによるvectorの出力（空白区切り）
template<typename T> ostream& operator<<(ostream& s, const vector<T>& v) {
  int len = v.size();
  for (int i = 0; i < len; ++i) {
    s << v[i]; if (i < len - 1) s << " "; //"\t"に変えるとTabで見やすく区切る
  }
  return s;
}
// coutによる多次元vectorの出力（空白区切り）
template<typename T> ostream& operator<<(ostream& s, const vector< vector<T> >& vv) {
  int len = vv.size();
  for (int i = 0; i < len; ++i) {
    s << vv[i] << endl;
  }
  return s;
}

//最大値、最小値の更新。更新したor等しければtrueを返す
template<typename T>
bool chmax(T& a, T b){return (a = max(a, b)) == b;}
template<typename T>
bool chmin(T& a, T b){return (a = min(a, b)) == b;}

// -------- template end - //


// - library ------------- //

//Dijkstraのベースになるデータ構造を宣言
// !! 重み（コスト）の型をここで設定する !! ldなど、整数じゃなくてもOK
using Weight = ll; //<---ここ！！
const Weight INFW = numeric_limits<Weight>::max();

struct Edge{
  int from, to;
  Weight wei;
  // struct Edge のコンストラクタ
  Edge(int from_, int to_, Weight wei_):from(from_),to(to_),wei(wei_){}
};
// struct Edge のvectorをEdgesとする
typedef vector<Edge> Edges;

// グラフ全体の構造体を定義
// 実態は、各頂点に張られた辺たち（Edges）の集合体（Edgesのvector）
// Graph[v] は vector<頂点vに張られた辺>
struct Graph : public vector<Edges>{
  //struct Graphのコンストラクタ 引数Vを与える
  Graph(){ }
  Graph(int V): vector<Edges>(V){ }
  /*
  有向辺を追加する
  */
  void addEdge(int from, int to, Weight wei=1){
    // Graph[from頂点] （from頂点から張られたEdges）に新しい辺を追加する
    // 辺に重みの差が無い（全て1とみなせる）場合、重みを引数として渡さなくても1とみなして処理
    (*this)[from].push_back(Edge(from, to, wei));
  }
  /*
  無向辺を追加する
  */
  void addUEdge(int u, int v, Weight wei=1){
    (*this)[u].push_back(Edge(u, v, wei));
    (*this)[v].push_back(Edge(v, u, wei));
  }
};
 
//ここから実際に使う関数

// Edge > Edge の比較は、重みの大小で評価
bool operator>(const Edge &a, const Edge &b){
  return a.wei>b.wei;
}

//戻り値のvector<Weight>にvec.at(頂点のidx)をすれば、各頂点に到達するまでに最低限必要な重みの合計（以降、累計重みと呼ぶ）が得られる
//dijkstra(Graph, スタート地点のidx) で呼び出す
// const は「関数内でGraphを変更しません」という意味で、&は単にコピーの時間を省くためと思われる
vector<Weight> dijkstra(const Graph &G, int src){

  // 型 p_wei_vert : pair<Weight, int> を定義
  // pair<その頂点に辿り着くまでの最小累計重み（最短経路の重み）, 頂点番号>
  typedef pair<Weight, int> p_wei_vert;
  // 最小値を取り出すpriority_q : 「これから訪れたい頂点と、その頂点までの累計重み」を入れる
  // vector <p_wei_vert<累計重み, 行き先頂点> >
  priority_queue<p_wei_vert, vector<p_wei_vert>, greater<p_wei_vert>> pq_to_visit;
  // pair {累計重み0, スタート地点のidx}の追加
  pq_to_visit.push(make_pair(0, src));
  // 頂点数を受け取っただけ
  int V = (int)G.size();

  vector<Weight> res(V, -1);
  // res はDP[]のようなもので、res[v] : vに辿り着く最小累計重み
  // res[v] == -1であれば、未到達
  // res[v] != -1であれば頂点vに到達済みで、到達済みであれば、イコール最短経路確定済となる（理由は後で）
  // ちなみにダイクストラを使う場合、重みは正（非負？）のはずだから、既に到達した頂点のres値が負となることはない

  while(pq_to_visit.size()){
    // pqから、重み最小のp_wei_vert（cost, vert）を取り出してp_wei_vert pに入れる
    // つまり、「今行ける場所の中で、最も累計重みの低い場所に行こうとしてみる」ということ
    auto p = pq_to_visit.top(); pq_to_visit.pop();
    Weight d = p.first;
    int v = p.second;
    if(res[v] > -0.5)continue;
    // res[v]が非負、つまり頂点vに過去に到達済みなら、pq_to_visitに追加せず次のループへ
    // ループを抜けたなら過去に到達していないので、今回のルートが「頂点vへの最短経路」
    // これでres[v] つまりvへの最短経路での重み は確定であり、再度代入することはない
    res[v] = d;

    // Graph[v] すなわちvに張られた全てのEdgeについてループし、vから移動できる頂点を探す
    for(const auto &edge : G[v]){
      int to = edge.to;
      Weight wei = edge.wei;
      
      if (res[to] > -0.5) continue; 
      // 枝刈り（既に探索済み = 頂点toの累計最小重みが確定しれば、pqに入れない）
        
      pq_to_visit.push(make_pair(d + wei, to));
      // pqに、今見ている頂点vから移動できる、まだ訪問していない頂点の情報を入れる
      // 入れるのは「頂点vの到達までの累計重み（d = p.first） + wei（pから張られた辺の重み）, 行き先」
      // while 文の最初の方で累計重みが小さい方から取り出して訪問するために使う。その際「まだ訪問していない頂点のうち、スタートから最も小さい重みで行ける頂点」を訪問していくことにより、その訪問の仕方が、その頂点まで最も小さい重みで行ける経路であることが担保される（ダイクストラのアルゴリズム）
    }
  }
  // 最終的に、resは「各頂点に辿り着くための最小重み」となっているので、それを返す
  return res;
}

// --------- library end - //




int main(){


  ll H = il();
  ll W = il();

  Graph graph(10); // 0~9

  rep(i, 10){
    rep(j, 10){
      // i -> j に書き換える　--> j -> i に戻すコスト
      ll wei = il();
      graph.addEdge(j, i, wei);
    }
  }

  // グラフとスタート地点のidxを渡すと、vectorを返す
  // vector[t] = 頂点tへの累計最小重み。vector[s] = 0となる
  vector<Weight> result = dijkstra(graph, 1);

  ll ans = 0;
  rep(i, H*W){
    ll from = il();
    ans += ( from == -1 ? 0 : result[from] );
  }

  cout << ans << endl;



}

Measured memory_bytes: 256