diff options
| -rw-r--r-- | theories/Init/Wf.v | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/theories/Init/Wf.v b/theories/Init/Wf.v index 17f3e5107..6e07ea43a 100644 --- a/theories/Init/Wf.v +++ b/theories/Init/Wf.v @@ -146,6 +146,8 @@ Section Well_founded_2. Variable R : A * B -> A * B -> Prop. Variable P : A -> B -> Type. + + Section Acc_iter_2. Variable F : forall (x:A) (x':B), @@ -156,6 +158,7 @@ Section Well_founded_2. F (fun (y:A) (y':B) (h:R (y, y') (x, x')) => Acc_iter_2 (x:=y) (x':=y') (Acc_inv a (y, y') h)). + End Acc_iter_2. Hypothesis Rwf : well_founded R. |