https://github.com/EasyCrypt/easycrypt
Revision ae4fe9243635b8ec6bdabc4c44aa0f26a16b52a1 authored by Pierre-Yves Strub on 05 April 2022, 10:25:31 UTC, committed by Pierre-Yves Strub on 05 April 2022, 10:59:53 UTC
1 parent d5941d0
Raw File
Tip revision: ae4fe9243635b8ec6bdabc4c44aa0f26a16b52a1 authored by Pierre-Yves Strub on 05 April 2022, 10:25:31 UTC
[reduction]: use symmetric "and" when reducing tuples equality
Tip revision: ae4fe92
ecBaseLogic.ml
(* -------------------------------------------------------------------- *)
open EcTypes
open EcCoreFol

(* -------------------------------------------------------------------- *)
type local_kind =
| LD_var    of ty * form option
| LD_mem    of EcMemory.memtype
| LD_modty  of EcModules.module_type
| LD_hyp    of form
| LD_abs_st of EcModules.abs_uses

type l_local = EcIdent.t * local_kind

type hyps = {
  h_tvar  : EcDecl.ty_params;
  h_local : l_local list;
}
back to top