% This figure was an illustration for an exercice about
% homothecies.
% Copyright (c) Christian Obrecht 2001

frame(-1,-3,9.5,3)

u = vector(2,-30:) ; v = vector(sqrt(2),45:)
F = point(0,0)
F G A E parallelogram(u,v)
A B C D parallelogram(2*u,2*v)

draw(A,B,C,D)
draw("$A$",A,90:) ; draw("$B$",B,-90:)
draw("$C$",C,0:) ; draw("$D$",D,90:)
draw(A,E,F,G) ; draw("$B'$",E,90:)
draw("$C'$",F,180:) ; draw("$D'$",G,-90:)
color(gray) ; draw(segment(F,C))