Env (catala.Shared_ast.Typing.Env)

type 'e t

val empty : Shared_ast__Definitions.decl_ctx -> 'e t

val add_var : 
  'e Var.t ->
  Shared_ast__Definitions.naked_typ Catala_utils.Mark.pos ->
  'e t ->
  'e t

val add_toplevel_var : 
  Shared_ast__Definitions.TopdefName.t ->
  Shared_ast__Definitions.naked_typ Catala_utils.Mark.pos ->
  'e t ->
  'e t

val add_scope_var : 
  Shared_ast__Definitions.ScopeVar.t ->
  Shared_ast__Definitions.naked_typ Catala_utils.Mark.pos ->
  'e t ->
  'e t

val add_scope : 
  Shared_ast__Definitions.ScopeName.t ->
  vars:
    Shared_ast__Definitions.naked_typ Catala_utils.Mark.pos
      Shared_ast__Definitions.ScopeVar.Map.t ->
  'e t ->
  'e t

val open_scope : Shared_ast__Definitions.ScopeName.t -> 'e t -> 'e t