include sig ... end
type value = [ | `none |
| `hidden |
| `dotted |
| `dashed |
| `solid |
| `double |
| `groove |
| `ridge |
| `inset |
| `outset |
]
include sig ... end
val valueToJs : value -> stringval valueFromJs : string -> value option
type t = [ ]
val show : t -> string