type graph = [ | `Center of bool| `Fontcolor of color| `Fontname of string| `Fontsize of int| `HtmlLabel of string| `Label of string| `OrderingOut| `Orientation of [ `Landscape | `Portrait ]| `Page of float * float| `Pagedir of [ `LeftToRight | `TopToBottom ]| `Size of float * float ]type vertex = [ | `Color of color| `ColorWithTransparency of color_with_transparency| `Fontcolor of color| `Fontname of string| `Fontsize of int| `Height of float| `HtmlLabel of string| `Label of string| `Orientation of float| `Penwidth of float| `Peripheries of int| `Regular of bool| `Shape of
[ `Assembly
| `Box
| `Box3d
| `Cds
| `Circle
| `Component
| `Diamond
| `Doublecircle
| `Doubleoctagon
| `Egg
| `Ellipse
| `Fivepoverhang
| `Folder
| `House
| `Insulator
| `Invhouse
| `Invtrapezium
| `Invtriangle
| `Larrow
| `Lpromoter
| `Mcircle
| `Mdiamond
| `Msquare
| `Note
| `Noverhang
| `Oval
| `Parallelogram
| `Plaintext
| `Polygon of int * float
| `Primersite
| `Promoter
| `Proteasesite
| `Proteinstab
| `Rarrow
| `Record
| `Restrictionsite
| `Ribosite
| `Rnastab
| `Rpromoter
| `Signature
| `Star
| `Tab
| `Terminator
| `Threepoverhang
| `Trapezium
| `Triangle
| `Tripleoctagon
| `Underline
| `Utr ]| `Style of [ `Bold | `Dashed | `Dotted | `Filled | `Invis | `Rounded | `Solid ]| `Width of float ]type edge = [ | `Color of color| `ColorWithTransparency of color_with_transparency| `Decorate of bool| `Dir of [ `Back | `Both | `Forward | `None ]| `Fontcolor of color| `Fontname of string| `Fontsize of int| `HtmlLabel of string| `Label of string| `Labelfontcolor of color| `Labelfontname of string| `Labelfontsize of int| `Penwidth of float| `Style of [ `Bold | `Dashed | `Dotted | `Invis | `Solid ] ]