fact: Fixpoint well_founded_prod_relationA_helper a b (wf_A : Acc RA a) (wf_B : well_founded RB) {struct wf_A} : Acc prod_relationA (a, b) := @well_founded_prod_relationA_helper_step a b wf_A wf_B (fun fa => fix wf_B_rec b' (wf_B' : Acc RB b') : Acc prod_relationA (a, b') := @wf_B_rec_step (@well_founded_prod_relationA_helper) wf_B a fa (@wf_B_rec) b' wf_B').
imports: Coq.Setoids.Setoid Coq.Program.Program Coq.Program.Wf Coq.Arith.Wf_nat Coq.Classes.Morphisms Coq.Init.Wf Coq.Lists.SetoidList Coq.Arith.PeanoNat Fiat.Common.Coq__8_4__8_5__Compat