(cs)
(load "~/proj2/look/picture.scm")

((up-split (below (flip-vert wave)
		  (beside (rotate90 wave) (rotate270 wave))) 2) full-frame)

(cs)
((right-split (below diamond x-painter) 3) full-frame)