diff options
| author |  Jason Gross <jagro@google.com> | 2018-06-13 17:04:25 -0400 |
|---|---|---|
| committer | Jason Gross <jagro@google.com> | 2018-06-13 17:04:25 -0400 |
| commit | 330e5af93e537710ae61364867b0303d2fe1315e (patch) | |
| tree | 72194ee5dea241a50a6a5a1a806f02ec89428502 /src/Util/PrimitiveHList.v | |
| parent | 86136b962eddd6bdc47d1e99b03fff2bac0578a8 (diff) | |
Actually use primitive projections in PrimitiveHList
Diffstat (limited to 'src/Util/PrimitiveHList.v')
| -rw-r--r-- | src/Util/PrimitiveHList.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Util/PrimitiveHList.v b/src/Util/PrimitiveHList.v index 356861ebe..b1f4498b5 100644 --- a/src/Util/PrimitiveHList.v +++ b/src/Util/PrimitiveHList.v @@ -1,6 +1,8 @@ Require Import Coq.Lists.List. Require Import Crypto.Util.PrimitiveProd. +Import Primitive.Notations. + Fixpoint hlist {A} (P : A -> Type) (ls : list A) : Type := match ls return Type with | nil => unit |