call cg_iric_read_sol_iteration_f(step, iteration, ier)
ier = cg_iRIC_Read_Sol_Iteration(step, &iteration);
iteration = cg_iRIC_Read_Sol_Iteration(step)