Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Dan Frumin
ReLoC-v1
Commits
1ff8a563
Commit
1ff8a563
authored
Sep 16, 2017
by
Dan Frumin
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Get rid of an unnecessary box
parent
1188cb70
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
2 additions
and
2 deletions
+2
-2
theories/logrel/fundamental_binary.v
theories/logrel/fundamental_binary.v
+1
-1
theories/logrel/semtypes.v
theories/logrel/semtypes.v
+1
-1
No files found.
theories/logrel/fundamental_binary.v
View file @
1ff8a563
...
...
@@ -381,7 +381,7 @@ Section masked.
rel_bind_ap
e
e
'
"IH"
v
v
'
"#IH"
.
value_case
.
iExists
(
v
,
v
'
).
simpl
;
iSplit
;
eauto
.
iAlways
.
iExists
(
⟦
τ'
⟧
Δ
).
iExists
(
⟦
τ'
⟧
Δ
).
iSplit
;
eauto
.
iPureIntro
.
apply
_.
by
rewrite
interp_subst
.
Qed
.
...
...
theories/logrel/semtypes.v
View file @
1ff8a563
...
...
@@ -96,7 +96,7 @@ Section semtypes.
Program
Definition
interp_exists
(
interp
:
listC
D
-
n
>
D
)
:
listC
D
-
n
>
D
:=
λ
ne
Δ
ww
,
(
∃
vv
,
⌜
ww
=
(
PackV
(
vv
.1
),
PackV
(
vv
.2
))
⌝
∧
□
∃
τ
i
:
D
,
⌜∀
ww
,
PersistentP
(
τ
i
ww
)
⌝
∧
interp
(
τ
i
::
Δ
)
vv
)
%
I
.
∧
∃
τ
i
:
D
,
⌜∀
ww
,
PersistentP
(
τ
i
ww
)
⌝
∧
interp
(
τ
i
::
Δ
)
vv
)
%
I
.
Solve
Obligations
with
solve_proper
.
Program
Definition
interp_rec1
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment