sig
  type t = Maths.math
  val make_matrix :
    Matrix.T.Style.t list ->
    (Diagrams.Node.Transfo.Style.t list * Maths.math list) list list ->
    Diagrams.Node.info * Diagrams.Node.info Diagrams.Matrix.matrix
end