Goal:
    G : t  HI : invariants  A : Prop  B : Prop  H : A <-> B  b : B
  ============================
   ((A -> B) -> (B -> A) -> A)


DEBUG:Going to execute:
intro