diff options
| author |  Jason Gross <jgross@mit.edu> | 2016-10-30 00:08:48 -0400 |
|---|---|---|
| committer | Jason Gross <jgross@mit.edu> | 2016-10-30 00:09:14 -0400 |
| commit | ace7f0b6307fb229fe8dc8fab0519da27a07e570 (patch) | |
| tree | 7588cace73787c6226392d56fee86a5b21e40e1b /src/Reflection/LinearizeInterp.v | |
| parent | 9855192886a47614a4a76bb377223b0bba20e667 (diff) | |
Minor reflective changes
Diffstat (limited to 'src/Reflection/LinearizeInterp.v')
| -rw-r--r-- | src/Reflection/LinearizeInterp.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Reflection/LinearizeInterp.v b/src/Reflection/LinearizeInterp.v index 1da4ac851..dfc37824d 100644 --- a/src/Reflection/LinearizeInterp.v +++ b/src/Reflection/LinearizeInterp.v @@ -77,7 +77,7 @@ Section language. Local Hint Resolve interpf_linearizef. Lemma interp_linearize {t} e - : interp_type_gen_rel_pointwise interp_flat_type (fun _ => @eq _) + : interp_type_gen_rel_pointwise (fun _ => @eq _) (interp interp_op (linearize (t:=t) e)) (interp interp_op e). Proof. @@ -86,7 +86,7 @@ Section language. Qed. Lemma Interp_Linearize {t} (e : Expr t) - : interp_type_gen_rel_pointwise interp_flat_type (fun _ => @eq _) + : interp_type_gen_rel_pointwise (fun _ => @eq _) (Interp interp_op (Linearize e)) (Interp interp_op e). Proof. |