\documentclass[11pt]{article} \input fig4tex.tex \begin{document} % 1. Definition of characteristic points \figinit{.8cm,orthogonal} %Axes. \figpt 1:(0,0,0) \figpt 2:(2,0,0) \figpt 3:(0,2,0) \figpt 4:(0,0,2) \figvectC 0 (0,6,0) \figpttra 1:=1 /1, 0/ \figpttra 2:$x$=2 /1, 0/ \figpttra 3:$y$=3 /1, 0/ \figpttra 4:$z$=4 /1, 0/ %Antenne. \def\ray{2} \def\hau{3} \figpt 5:(0,-\ray,-\hau) \figpt 6:(0,0,-\hau) \figpt 7:(0,\ray,-\hau) \figpt 8:(\ray,0,-\hau) \figpt 9:(-\ray,0,-\hau) \figpt 10:(0,-\ray,\hau) \figpt 11:(0,0,\hau) \figpt 12:(0,\ray,\hau) \figpt 13:(\ray,0,\hau) \figpt 14:(-\ray,0,\hau) \figptbary 15:[5,10;1,1] \figptbary 16:[7,12;1,1] % 2. Creation of the graphical file \figsetview(10) \psbeginfig{} %Axes. \psarrow[1,2] \psarrow[1,3] \psarrow[1,4] %Anneau du bas. \psarccircP 6;\ray[5,8,8] \pssetdash{7} \psarccircP 6;\ray[5,9,9] \pssetdash{1} %Anneau du haut. \psarccircP 11;\ray[12,13,13] \psarccircP 11;\ray[12,14,14] %Brins verticaux. \psline[5,10] \psline[7,12] %Courant. \pssetarrowheadfill{yes} \psarrowcirc 6,7,8 ; \ray (0,90) \pssetdash{7} \psarrowcirc 6,7,9 ; \ray (0,90) \pssetdash{1} \pssetarrowheadfill{yes} \psarrowcirc 11,10,13 ; \ray (0,90) \psarrowcirc 11,10,14 ; \ray (0,90) \psarrow[5,15] \psarrow[12,16] \psendfig % 3. Writing text on the figure \def\dist{3pt} \figvisu{\figBoxA}{{\sc Fig. 6}\ --\ L'antenne élémentaire pour $k$ impair}{% \figwritew 2:(\dist) \figwritene 3:(\dist) \figwriten 4:(\dist) \figwritew 10:$A$(\dist) \figwritee 12:$B$(\dist) \figwriten 8:$I/2$(\dist) \figwriten 9:$I/2$(\dist) \figwriten 13:$I/2$(\dist) \figwriten 14:$I/2$(\dist) \figwritew 15:$I$(\dist) \figwritee 16:$I$(\dist) } \box\figBoxA \end{document} |