shikaku:=polygon(point(0,0),point(1,0),point(1,1),point(0,1),Closed=TRUE); plot2d([Mode=List,[shikaku]]);