Commit da929da
Per [proven#107](#107)
"overly cautious OWED" pattern.
\`\`\`idris
public export
refNameExtracts : (s : String) -> {auto v : isValidRefName s = True}
-> refName (MkGitRef s) = s
refNameExtracts _ = Refl
\`\`\`
\`refName\` is a direct pattern match \`refName (MkGitRef name) = name\`
(SafeGit.idr L62-63), so the body reduces by \`Refl\` regardless of
\`s\`. The auto-implicit \`v : isValidRefName s = True\` is irrelevant
to the proof — it's an API precondition on \`s\` that doesn't enter the
reduction.
The OWED's "auto-implicit elaboration" blocker doesn't apply here
because the auto-implicit is just discarded.
Refs #90 #107
Co-authored-by: Claude Opus 4.7 (1M context) <noreply@anthropic.com>
1 parent 22519e5 commit da929da
1 file changed
Lines changed: 9 additions & 4 deletions
| Original file line number | Diff line number | Diff line change | |
|---|---|---|---|
| |||
31 | 31 | | |
32 | 32 | | |
33 | 33 | | |
34 | | - | |
35 | | - | |
| 34 | + | |
| 35 | + | |
| 36 | + | |
| 37 | + | |
| 38 | + | |
| 39 | + | |
36 | 40 | | |
37 | | - | |
38 | | - | |
| 41 | + | |
| 42 | + | |
| 43 | + | |
0 commit comments