Help !!!
Could any one tell if the write statement below
is correct
write(1) nmax
write(1) ( ( ni(n), nj(n), 1 ), n=1,nmax )
do 10 n = 1, nmax
write(1) ( ( x(i,j,n), i=1,ni(n) ), j=1,nj(n) ),
& ( ( y(i,j,n), i=1,ni(n) ), j=1,nj(n) ),
& ( ( z(i,j,n), i=1,ni(n) ), j=1,nj(n) )
10 continue
I try...