fact: Hypothesis codeRInj : forall R S : Relations L, cr R = cr S -> R = S.
imports: Coq(Arith Lia) hydras.Ackermann(primRec codeFreeVar codeSubFormula cPair code folProp extEqualNat wellFormed folProof prLogic) hydras(Compat815)