+/* Returns the evolution part in LOOP_NUM. Example: the call
+ evolution_part_in_loop_num (1, {{0, +, 1}_1, +, 2}_1) returns
+ {1, +, 2}_1 */
+
+tree
+evolution_part_in_loop_num (tree chrec,
+ unsigned loop_num)
+{
+ return chrec_component_in_loop_num (chrec, loop_num, true);
+}
+
+/* Returns the initial condition in LOOP_NUM. Example: the call
+ initial_condition_in_loop_num ({{0, +, 1}_1, +, 2}_2, 1) returns
+ {0, +, 1}_1 */
+
+tree
+initial_condition_in_loop_num (tree chrec,
+ unsigned loop_num)
+{
+ return chrec_component_in_loop_num (chrec, loop_num, false);
+}
+