CGNSファイルの間で格子をコピーする
call cg_iric_copy_grid(fid_from, fid_to, ier)
ier = cg_iRIC_Copy_Grid(fid_from, fid_to);
cg_iRIC_Copy_Grid(fid_from, fid_to)