environment a
initialshells:b
{
    menu b
    (
	button "Toggle (orientation)" 
	    popup:toggles_orient
	    ;
	button "Toggle (long)" 
	    popup:toggles_long
	    ;
	button "Quit" 
	    exit:0
	    ;
    )
    commandboard toggles_orient
       pane:on
    (
	toggle Horizontal
	    orientation:horizontal
	    listelement:alpha
	    listelement:beta
	    listelement:cats
	    ;
	toggle Vertical
	    toggletype:radio
	    orientation:vertical
	    listelement:a
	    listelement:b
	    listelement:c
	    ;
    )
    commandboard toggles_long
       width:300
       height:300
    (
	toggle Horizontal
	    x:0 y:0
	    columns:4
	    toggletype:radio
	    orientation:vertical
	    listelement:alpha
	    listelement:beta
	    listelement:cats
	    listelement:a_alpha
	    listelement:a_beta
	    listelement:a_cats
	    listelement:b_alpha
	    listelement:b_beta
	    listelement:b_cats
	    listelement:c_alpha
	    listelement:c_beta
	    listelement:c_cats
	    listelement:d_alpha
	    listelement:d_beta
	    listelement:d_cats
	    ;
	toggle Vertical
	    x:0 y:140
	    toggletype:radio
	    orientation:vertical
	    listelement:a
	    listelement:b
	    listelement:c
	    ;
    )
}
