function saya(s,a,q1,q2,eol,    i,j,n,tmp,str,sep) {
	q1= q1 ? "\"" : "";
	q2= q2 ? "\"" : "";
	for(i in a) {
		sep="";
		str= s"[";
		n=split(i,tmp,SUBSEP);
		for(j=1;j<=n;j++) {
			str=str sep q1 tmp[j] q1;
			sep=",";
		}
		print str "] = " q2 a[i] q2 eol  | "sort";
	};
	close("sort")
}