Goal:
  
  ============================
   (forall t : (), nth_error (list_all ()) (find_index t) = Some t)


DEBUG:Going to execute:
cbv[list_all find_index];
            repeat (let t := fresh in
                    intro t; case t; clear t)