Module Ortho_routeSource

Sourcetype point = float * float
Sourcetype dir =
  1. | Left
  2. | Right
  3. | Up
  4. | Down
Sourcetype box = float * float * float * float
Sourceval route : boxes:box list -> margin:float -> (point * dir option) -> (point * dir option) -> point list
Sourceval bends : point list -> int