Goal:
  
  A : Type
  R : relation A
  S : relation A
  HR : Symmetric R
  HS : Symmetric S
  x : A
  y : A
  X : R x y
  ============================
   (relation_disjunction R S y x)


DEBUG:Going to execute:
fun => <coq-core.plugins.ltac::left@0>