Skip to content

Commit ea7313f

Browse files
committed
fix: knock-on from agda#2084
1 parent 0e97e2e commit ea7313f

File tree

1 file changed

+1
-1
lines changed
  • doc/README/Data/Fin/Relation/Unary

1 file changed

+1
-1
lines changed

doc/README/Data/Fin/Relation/Unary/Top.agda

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -94,7 +94,7 @@ open WF using (Acc; acc)
9494
induct : {i} Acc _>_ i P i
9595
induct {i} (acc rec) with view i
9696
... | ‵fromℕ = Pₙ
97-
... | ‵inject₁ j = Pᵢ₊₁⇒Pᵢ j (induct (rec _ inject₁[j]+1≤[j+1]))
97+
... | ‵inject₁ j = Pᵢ₊₁⇒Pᵢ j (induct (rec inject₁[j]+1≤[j+1]))
9898
where
9999
inject₁[j]+1≤[j+1] : suc (toℕ (inject₁ j)) ≤ toℕ (suc j)
100100
inject₁[j]+1≤[j+1] = ≤-reflexive (toℕ-inject₁ (suc j))

0 commit comments

Comments
 (0)