Fig 7.2.4 & Fig 7.3.2

Fig 7.2.4

 1 documentclass[varwidth=true, border=2pt]{standalone}
 2 usepackage{tkz-euclide}
 3 
 4 egin{document}
 5 usetkzobj{all}
 6 egin{tikzpicture}
 7 	kzSetUpPoint[shape=circle,size=2,color=black,fill=black]
 8 	kzSetUpLine[line width=.5]
 9 	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
10 	kzDrawPolygon(A,B,C,D)
11 	kzDrawPolygon(A,E,F,D)
12 	kzDrawPoints(A,B,C,D,E,F)
13 coordinate[label=left:$T^+$] (T1) at  (0.75,1.35);
14 coordinate[label=right:$F$] (F) at  (1.5,1.5);
15 coordinate[label=right:$T^-$] (T2) at  (3.5,1.35);
16 end{tikzpicture}
17 end{document}

2015.5.1 16:30

Fig 7.3.2

 1 documentclass[varwidth=true, border=2pt]{standalone}
 2 usepackage{tkz-euclide}
 3 
 4 egin{document}
 5 usetkzobj{all}
 6 egin{tikzpicture}
 7 	kzSetUpPoint[shape=circle,size=2,color=black,fill=black]
 8 	kzSetUpLine[line width=.5]
 9 	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,
10 1.5/2.7/G}%x/y/P
11 	kzDrawPolygon(A,B,C,D)
12 	kzDrawPolygon(A,E,F,D)
13 	kzDrawPoints(A,B,C,D,E,F)
14 coordinate[label=left:$T^+$] (T1) at  (1.75,1.35);
15 coordinate[label=right:$F$] (F) at  (3.4,1.8);
16 coordinate[label=right:$T^- $] (T2) at  (4.5,1.35);
17 end{tikzpicture}
18 end{document}

2015.5.1 16:30