proposition: Remark R3 : path_toS zero (unshift (interval (S k) (Nat.pred l))) (cnf alpha).
proof: Proof. apply path_to_path_toS, R2. Qed.
imports: hydras(L_alpha) hydras(Hydra_Lemmas Epsilon0_Needed_Free Epsilon0_Needed_Std Hydra_Termination O2H)