Goal:
  
  ============================
   (forall t : True, nth_error (list_all True) (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)