Definition all_assertions_computable  :=
  forall (Espec: OracleKind) psi tx vx (Q: assert), 
     exists k,  assert_safe Espec psi tx vx k = Q.

Lemma guard_environ_eqv: forall Delta Delta' f rho, tycontext_eqv Delta Delta' -> guard_environ Delta f rho -> guard_environ Delta' f rho.