三次元構造格子を読み込む。
call cg_iric_getgridcoord3d_f(x, y, z, ier)
ier = cg_iRIC_GetGridCoord3d(x, y, z);
x, y, z = cg_iRIC_GetGridCoord3d()