constructor
case right.a.left
A : Type
R : A → A → Prop
inhabited_A : Nonempty A
h : confluent RX
⊢ refl_trans_clos RX X.b X.a
case right.a.left.a
A : Type
R : A → A → Prop
inhabited_A : Nonempty A
h : confluent RX
⊢ RX X.b ?right.a.left.b

case right.a.left.a
A : Type
R : A → A → Prop
inhabited_A : Nonempty A
h : confluent RX
⊢ refl_trans_clos RX ?right.a.left.b X.a

case right.a.left.b
A : Type
R : A → A → Prop
inhabited_A : Nonempty A
h : confluent RX
⊢ X