Sourcetype mode = | Solid| Outline
Sourcetype t = | Circle of float * mode * string| Ellipse of float * float * mode * string| Rectangle of float * float * mode * string| Triangle of float * mode * string| Text of string * float * string| Scene of float * float| Beside of t * t| Above of t * t| Overlay of t * t| Place of t * float * float * t