CGNS ファイルを開く。
call cg_open_f(filename, mode, fid, ier)
ier = cg_open(filename, mode, fid);
fid = cg_open(filename, mode)