tiny_appkits.appkit_cad
Cad_snap
tiny_appkits.appkit_astronomy
tiny_appkits.appkit_blocks
tiny_appkits.appkit_diagram
tiny_appkits.appkit_document
tiny_appkits.appkit_draw
tiny_appkits.appkit_editor
tiny_appkits.appkit_indexed
tiny_appkits.appkit_modeler
tiny_appkits.appkit_money
tiny_appkits.appkit_nls
tiny_appkits.appkit_paint
tiny_appkits.appkit_pim
tiny_appkits.appkit_pushpull
tiny_appkits.appkit_richtext
tiny_appkits.appkit_sheet
tiny_appkits.appkit_sheet_view
tiny_appkits.appkit_sketch
tiny_appkits.appkit_slides
tiny_appkits.appkit_teletype
tiny_appkits.appkit_tui
tiny_appkits.appkit_typeset
tiny_appkits.browser_layout
type kind =
| Endpoint
| Midpoint
| Center
| Quadrant
| Intersection
| Perpendicular
val name : kind -> string
val find : Cad_drawing.t -> aperture:float -> ?from:Cad_geom.pt -> Cad_geom.pt -> (kind * Cad_geom.pt) option