Fig 7.2.4 & Fig 7.3.2

Fig 7.2.4

documentclass[varwidth=true, border=2pt]{standalone}
usepackage{tkz-euclide}

egin{document}
usetkzobj{all}
egin{tikzpicture}
	kzSetUpPoint[shape=circle,size=2,color=black,fill=black]
	kzSetUpLine[line width=.5]
	kzDefPoints{0/0/A, 5.5/0/B, 5.5/2.7/C, 0/2.7/D, 1.5/0/E, 1.5/2.7/F, 1.5/2.7/G}%x/y/P
	kzDrawPolygon(A,B,C,D)
	kzDrawPolygon(A,E,F,D)
	kzDrawPoints(A,B,C,D,E,F)
coordinate[label=left:$T^+$] (T1) at  (0.75,1.35);
coordinate[label=right:$F$] (F) at  (1.5,1.5);
coordinate[label=right:$T^-$] (T2) at  (3.5,1.35);
end{tikzpicture}
end{document}

Fig 7.3.2

documentclass[varwidth=true, border=2pt]{standalone}
usepackage{tkz-euclide}

egin{document}
usetkzobj{all}
egin{tikzpicture}
	kzSetUpPoint[shape=circle,size=2,color=black,fill=black]
	kzSetUpLine[line width=.5]
	kzDefPoints{0/0/A, 5.5/0/B, 5.5/2.7/C, 0/2.7/D, 3.4/0/E, 3.4/2.7/F,
1.5/2.7/G}%x/y/P
	kzDrawPolygon(A,B,C,D)
	kzDrawPolygon(A,E,F,D)
	kzDrawPoints(A,B,C,D,E,F)
coordinate[label=left:$T^+$] (T1) at  (1.75,1.35);
coordinate[label=right:$F$] (F) at  (3.4,1.8);
coordinate[label=right:$T^- $] (T2) at  (4.5,1.35);
end{tikzpicture}
end{document}