(VBox
  (Rim
    (Pen 2)
    (Radio
      =alg
      (HBox
        (Button %clear "CLEAR")
        (Glue 4)
        (Choice %alg "Alg")
        (Glue 4)
        (Choice %zeus "Zeus")
        (Glue 4)
        (Choice %both "Both")
        Fill)))
  (Bar 1)
  (Shape (ShadowSize 0) (Height 200 + INF) (TextEdit ReadOnly %transcript)))