Require Import Basics.Overture.

(** * Graphs *)

(** A [Graph] is a type [graph0] of points together with a type [graph1] of arrows between each points. *)

Record Graph := {
  graph0 : Type;
  graph1 : graph0 -> graph0 -> Type;
}.

Coercion graph0 : Graph >-> Sortclass.
Coercion graph1 : Graph >-> Funclass.
