ループ回数を出力する。
call cg_iric_write_sol_iteration_f(iteration, ier)
ier = cg_iRIC_Write_Sol_Iteration(iteration);
cg_iRIC_Write_Sol_Iteration(iteration)