add Strategy expand

theories/lithium/interpreter.v

@@ -7,12 +7,15 @@ Notation "'HIDDEN'" := (Envs _ _ _) (only printing).
 Definition LET_ID {A} (x : A) : A := x.
 Arguments LET_ID : simpl never.
 Notation "'HIDDEN'" := (LET_ID _) (only printing).
+Strategy expand [LET_ID].
 
 Definition EVAR_ID {A} (x : A) : A := x.
 Arguments EVAR_ID : simpl never.
+Strategy expand [EVAR_ID].
 
 Definition SHELVED_SIDECOND (P : Prop) : Prop := P.
 Arguments SHELVED_SIDECOND : simpl never.
+Strategy expand [SHELVED_SIDECOND].
 
 (** * Lemmas used by tactics *)
 Section coq_tactics.