https://github.com/EasyCrypt/easycrypt
Revision e77d6596f18ecb90f062f826c9c5a36fe7cc1a44 authored by Pierre-Yves Strub on 14 October 2019, 07:45:06 UTC, committed by Pierre-Yves Strub on 14 October 2019, 07:45:06 UTC
1 parent 297f528
Raw File
Tip revision: e77d6596f18ecb90f062f826c9c5a36fe7cc1a44 authored by Pierre-Yves Strub on 14 October 2019, 07:45:06 UTC
Misc. in SmtMap.ec
Tip revision: e77d659
ecTypeClass.mli
(* --------------------------------------------------------------------
 * Copyright (c) - 2012--2016 - IMDEA Software Institute
 * Copyright (c) - 2012--2018 - Inria
 * Copyright (c) - 2012--2018 - Ecole Polytechnique
 *
 * Distributed under the terms of the CeCILL-C-V1 license
 * -------------------------------------------------------------------- *)

(* -------------------------------------------------------------------- *)
open EcPath

type node = path

type graph
type nodes

exception CycleDetected

module Graph : sig
  val empty : graph
  val add : src:node -> dst:node -> graph -> graph
  val has_path : src:node -> dst:node -> graph -> bool
  val dump : graph -> string
end

module Nodes : sig
  val empty : graph -> nodes
  val add : node -> nodes -> nodes
  val toset : nodes -> Sp.t
  val reduce : Sp.t -> graph -> Sp.t
end
back to top