Goal:
  
  max : nat
  P : nat -> Prop
  hmax : forall n : nat, n >= max -> P n
  hS : forall n : nat, n < max -> P (S n) -> P n
  h : forall n : nat, P (max - n)
  n : nat
  l : max <= n
  ============================
   (n >= max)


DEBUG:Going to execute:
intros