diff options
m--------- | docs | 0 | ||||
-rw-r--r-- | src/hls/Abstr.v | 7 |
2 files changed, 6 insertions, 1 deletions
diff --git a/docs b/docs -Subproject f85238030a96a082f19446a7998da97123ce702 +Subproject 20ed00b92c1a5bf2806a27e9c85d90c6d265e5b diff --git a/src/hls/Abstr.v b/src/hls/Abstr.v index 512235e..c7deab3 100644 --- a/src/hls/Abstr.v +++ b/src/hls/Abstr.v @@ -794,7 +794,12 @@ Section CORRECT. sem_val_list ictx p v -> sem_val_list octx p v' -> v = v'); try solve [inversion 1]; inv HSIM; simplify. - inv H0. inv H1. auto. - - inv H0. inv H1. + - inv H0. inv H1. simplify. + assert (lv = lv0). { apply IHe; auto. } subst. + crush. + - inv H0; inv H1; auto. + - inv H0; inv H1; f_equal. + eapply sem_value_det. Lemma check_correct_sem_value: forall x x' v v' n, |