プログラマ専用SNS ミクプラ

すいません、助けてください。
#define N 8

double A1[N][N]={{p4[0],pb[0]+p1[0],p2[0],p3[0],0,0,0,0},
{p4[0],0,0,p3[0],p1[0]+pb[0],0,p2[0],0},
{p4[0],p1[0],p2[0],p3[0],pb[0],0,0,0},
{p4[0],p1[0],p2[0],p3[0],0,pb[0],0,0},
{p4[0],0,0,p3[0],p1[0],0,p2[0],pb[0]},
{p4[0],0,0,p3[0],p1[0],0,p2[0],pb[0]},
{p4[0],p1[0],p2[0],p3[0],0,0,0,pb[0]},
{p4[0],0,0,p3[0],p1[0],0,p2[0],pb[0]}};
double A2[N][N]={{p4[1],pb[1]+p1[1],p2[1],p3[1],0,0,0,0},
{p4[1],0,0,p3[1],p1[1]+pb[1],0,p2[1],0},
{p4[1],p1[1],p2[1],p3[1],pb[1],0,0,0},
{p4[1],p1[1],p2[1],p3[1],0,pb[1],0,0},
{p4[1],0,0,p3[1],p1[1],0,p2[1],pb[1]},
{p4[1],0,0,p3[1],p1[1],0,p2[1],pb[1]},
{p4[1],p1[1],p2[1],p3[1],0,0,0,pb[1]},
{p4[1],0,0,p3[1],p1[1],0,p2[1],pb[1]}};

これを

#define N 8
#define L 2

double A[[/url][N][N];

for(i=0;i<2;i++)
{
A[N][N]={{{p4,pb+p1,p2,p3,0,0,0,0},
{p4,0,0,p3,p1+pb,0,p2[i],0},
{p4[i],p1[i],p2[i],p3[1],pb[i],0,0,0},
{p4[i],p1[i],p2[i],p3[1],0,pb[i],0,0},
{p4[i],0,0,p3[i],p1[i],0,p2[i],pb[i]},
{p4[i],0,0,p3[i],p1[i],0,p2[i],pb[i]},
{p4[i],p1[i],p2[i],p3[i],0,0,0,pb[i]},
{p4[i],0,0,p3[i],p1[i],0,p2[i],pb[i]}}};

このような感じにしたいのですが、どのようにすればよいのでしょうか？
アドバイスいただければ幸いです。

ローカルで初期化した配列を作って、コピーすればよいかと。

#define N 8 
#define L 2 
double A[[/url][N][N]; 
for(i=0;i<2;i++) 
{ 
	double B[N][N]={{p4,pb+p1,p2,p3,0,0,0,0}, 
	{p4,0,0,p3,p1+pb,0,p2,0}, 
	{p4[i],p1[i],p2[i],p3[1],pb[i],0,0,0}, 
	{p4[i],p1[i],p2[i],p3[1],0,pb[i],0,0}, 
	{p4[i],0,0,p3[i],p1[i],0,p2[i],pb[i]}, 
	{p4[i],0,0,p3[i],p1[i],0,p2[i],pb[i]}, 
	{p4[i],p1[i],p2[i],p3[i],0,0,0,pb[i]}, 
	{p4[i],0,0,p3[i],p1[i],0,p2[i],pb[i]}};
	memcpy(&A[i], &B, sizeof(B));
}

　

おかげさまで解決できました。
ありがとうございました。