added simple perfect squared rectangles (guile 2 version)