粒子の位置を出力する。 (3次元)
call cg_iric_write_sol_particle_pos3d_f(count, x, y, z, ier)
ier = cg_iRIC_Write_Sol_Particle_Pos3d(count, x, y, z);
cg_iRIC_Write_Sol_Particle_Pos3d(x, y, z)