Goal:
    A : Type  HA : ReflectEq A  a : A  H : Some a = None
  ============================
   False


DEBUG:Going to execute:
inversion H

Goals:

DEBUG:Going to execute:
try do_atom

Goals:

DEBUG:Going to execute:
solve [ Ltac.split; do_ccl ]