proposition: Remark R_pred_Sn : forall n, pred (F (S n)) = Some (F n).
proof: Proof. destruct n;simpl;trivial. Qed.
imports: EPSILON0 Arith List Omega Compare_dec Relations Wellfounded Max Tools More_nat AccP not_decreasing EPSILON0 More_nat Gamma0_prelude Gamma0_length term rpo