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