Name: Anonymous 2007-08-30 3:07 ID:XW6t9UTD
/* Put all coefficients to zero */
for (A = 0; A < 4; A++)
{
for (B = 0; B < 4; B++)
{
for (qq = 0; qq < 7; qq++)
{
for (ii = 0; ii < 3; ii++)
{
for (ji = 0; ji < 3; ji++)
{
for (ki = 0; ki < 3; ki++)
{
coefg[A][B][ii][ji][ki][qq] = 0.0;
}
}
}
}
}
}