3次元構造格子を出力する。
call cg_iric_writegridcoord3d_f(nx, ny, nz, x, y, z, ier)
ier = cg_iRIC_WriteGridCoord3d(nx, ny, nz, x, y, z);
cg_iRIC_WriteGridCoord3d(nx, ny, nz, x, y, z)