#include<iostream>

#include<map>

#include<string>

#include<cstring>

#include<cstdio>

#include<cstdlib>

#include<cmath>

#include<queue>

#include<vector>

#include<algorithm>

using namespace std;

int cnt,ans,n,a[7],vis[1010],g[1010][1010];

void in()

{

	for(int i=0;i<n;i++)

		for(int j=0;j<n;j++)

			cin>>g[i][j];

	cin>>n;

	cnt=0;

	memset(vis,0,sizeof(vis));

	while(n--)

	{

		cin>>a[cnt];

		if(!vis[a[cnt]])

		{

			vis[a[cnt]]=1;

			cnt++;

		}

	}

	ans=10000;

	memset(vis,0,sizeof(vis));

}

void dfs(int s,int w,int step)

{

	if(step==cnt)

	{

		ans=min(ans,w);

		return;

	}

	for(int i=0;i<cnt;i++)

	{

		if(!vis[a[i]])

		{

			vis[a[i]]=1;

			dfs(a[i],w+g[s][a[i]],step+1);

			vis[a[i]]=0;

		}

	}

}

int main()

{

	while(cin>>n&&n!=0)

	{

		in();

		dfs(0,0,0);

		cout<<ans<<endl;

	}

}