#include<bits/stdc++.h>
using namespace std;
const int N=15010;
int k,n,m,x,a[N],ok[N],d[N],d2[N],lim[N],id[N];
bitset<N>suf,tmp;
vector<bitset<N> >f[N];
void work(int t){
	priority_queue<pair<int,int> >q;
	for(int i=1;i<=k;i++) q.push({a[i],i});
	int x=1,y=n;
	for(int i=t;i>=1;i--){
		while(!f[i][x].test(y)) x++;
		printf("%d ",x);
		for(int j=1;j<=x;j++)
			printf("%d ",id[j]=q.top().second),q.pop(); puts("");
		for(int j=1;j<=x;j++)
			if(--a[id[j]]) q.push({a[id[j]],id[j]});
		y-=x;
	}
}
signed main(){
	scanf("%d",&k);
	for(int i=1;i<=k;i++){
		scanf("%d",&a[i]),n+=a[i];
		d[a[i]]+=a[i],d2[1]++,d2[a[i]]--;
	}
	for(int i=1;i<=n;i++)
		d[i]+=d[i-1],d2[i]+=d2[i-1],lim[i]=d[i]+i*d2[i];
	scanf("%d",&m);
	for(int i=1;i<=m;i++)
		scanf("%d",&x),ok[x]=1;
	f[0].resize(n+1),f[0][n].set(0);
	for(int i=1;i<=n;i++){
		for(int j=lim[i-1];j<=lim[i];j++) tmp.set(j);
		f[i].resize(n/i+1);
		suf.reset();
		for(int y=n/max(1,i-1);y>=1;y--){
			suf|=f[i-1][y];
			if(ok[y]&&i*y<=n){
				f[i][y]=suf<<y,f[i][y]&=tmp;
				if(f[i][y].test(n))
					printf("%d\n",i),work(i),exit(0);
			}
		}
	}
	puts("-1");
	return 0;
}