計算結果の出力をファイルに書き込む。
call cg_iric_flush_f(filename, fin, ier)
ier = cg_iRIC_Flush(filename, fin);
fin = cg_iRIC_Flush(filename, fin)