#include <bits/stdc++.h>
using namespace std;
#define a first
#define b second
#define pb push_back
typedef long long llo;
#define endl '\n'

int n;
int it[15001];
int pre[1501];
int val[1501];
int dp[503][501][501];
int ba[503][501][501];
int pp[100001];
int vis[100001];
vector<int> fin[100001];
int main(){
	ios_base::sync_with_stdio(false);
	cin.tie(NULL);
	cin>>n;
	llo su=0;
	vector<pair<int,int>> ss;
	for(int i=0;i<n;i++){
		cin>>it[i];
		su+=it[i];
		ss.pb({-it[i],i});
		it[i]=-it[i];
	}
	sort(ss.begin(),ss.end());
	for(int j=0;j<ss.size();j++){
		pp[j]=ss[j].b;
	}
	sort(it,it+n);
	vector<int> ee;
	for(int i=0;i<n;i++){
		it[i]=-it[i];
		for(int j=0;j<it[i];j++){
			ee.pb(i);
		}
	}

	for(int i=0;i<n;i++){
		pre[i+1]=pre[i]+it[i];
	}
	for(int i=0;i<n;i++){
		for(int j=pre[i];j<pre[i+1];j++){
			val[j]=i;
		}
	}
	int m;
	cin>>m;
	for(int i=0;i<m;i++){
		int x;
		cin>>x;
		vis[x]=1;
	}
	for(int i=0;i<=n+1;i++){
		for(int j=0;j<=su;j++){
			for(int k=0;k<=su;k++){
				dp[i][j][k]=1e9;
				ba[i][j][k]=-1;
			}
		}
	}
	for(int i=0;i<=su;i++){
		dp[0][0][i]=0;
	}
	for(int i=0;i<=n;i++){
		for(int j=0;j<=su;j++){
			for(int k=0;k<=su;k++){
				if(dp[i][j][k]<=su){
					pair<int,int> ll={k,k};
					if(vis[i]==1){
						ll={0,k};
					}
					for(int ii=ll.a;ii<=ll.b;ii++){

						if(j+ii<=su){

							if(j+ii<su and it[val[j+ii]]>ii){

							}
							else{
								if(dp[i][j][k]+abs(ii-k)<dp[i+1][j+ii][ii]){
									ba[i+1][j+ii][ii]=k;
								}
								dp[i+1][j+ii][ii]=min(dp[i+1][j+ii][ii],dp[i][j][k]+abs(ii-k));
							}
						}
					}
				}
			}
		}
	}
	int ans=dp[n+1][su][0];

	/*for(int i=0;i<=n;i++){
		for(int k=0;k<=su;k++){
			ans=min(ans,dp[i][su][k]);
		}
	}*/

	//cout<<dp[3][7][1]<<":"<<endl;
	//cout<<dp[4][7][0]<<":"<<endl;
	if(ans>su){
		cout<<-1<<endl;
		return 0;
	}
	pair<pair<int,int>,int> cur={{n+1,su},0};
	vector<int> kk;
	kk.pb(0);
	for(int i=n;i>=1;i--){		
		int mm=ba[cur.a.a][cur.a.b][cur.b];
		cur.a.a--;
		cur.a.b-=cur.b;
		cur.b=mm;
		//if(cur.b>0){
			kk.pb(cur.b);
		//}
	}

	cout<<ans<<endl;
	reverse(kk.begin(),kk.end());

	int ind=0;

	for(int i=0;i<kk.size();i++){
		for(int j=0;j<kk[i];j++){
			//cout<<i<<":"<<j<<":"<<ee[ind]<<endl;
			fin[j].pb(ee[ind]);
			ind++;
		}
	}
	for(int j=0;j<ans;j++){
		cout<<fin[j].size()<<" ";
		for(auto i:fin[j]){		
			cout<<pp[i]+1<<" ";
		}
		cout<<endl;
	}
	/*for(auto j:kk){
		cout<<j<<",";
	}
	cout<<endl;
*/












	

 
	return 0;
}