\documentclass[11pt]{article} \input fig4tex.tex \begin{document} % 1. Definition of characteristic points %\figinit{1cm,orthogonal} \figinit{1cm,realistic} \def\ray{2} \def\hau{4.8} \def\lcap{.3} \def\haui{2.3} \def\ang{45} \def\angi{20} \def\angii{25} %Anneaux. \figpt 1:(0,0,0) \figpt 2:(0,-\ray,0) \figvectC 0 (0,0,1) \figptrot 3:=2/1,\ang,0/ \figptrot 4:=2/1,\angi,0/ \figptrot 5:=2/1,\angii,0/ \figpttra 6:=4/\lcap,0/ \figpttra 7:=5/\lcap,0/ \figpttra 8:=4/-\lcap,0/ \figpttra 9:=5/-\lcap,0/ \figvectC 0 (0,0,1) \figptstra 11=1,2,3,4,5,6,7,8,9/-\hau,0/ \figptsrot 22=2,3,4,5,6,7,8,9/1,\ang,0/ \figptsrot 32=12,13,14,15,16,17,18,19/11,\ang,0/ \figptsrot 42=22,23,24,25,26,27,28,29/1,\ang,0/ \figptsrot 52=32,33,34,35,36,37,38,39/11,\ang,0/ \figptsrot 62=42,43,44,45,46,47,48,49/1,\ang,0/ \figptsrot 72=52,53,54,55,56,57,58,59/11,\ang,0/ \figptsrot 82=62,63,64,65,66,67,68,69/1,\ang,0/ \figptsrot 92=72,73,74,75,76,77,78,79/11,\ang,0/ \figptsrot 102=82,83,84,85,86,87,88,89/1,\ang,0/ \figptsrot 112=92,93,94,95,96,97,98,99/11,\ang,0/ \figptsrot 122=102,103,104,105,106,107,108,109/1,\ang,0/ \figptsrot 132=112,113,114,115,116,117,118,119/11,\ang,0/ \figptsrot 142=122,123,124,125,126,127,128,129/1,\ang,0/ \figptsrot 152=132,133,134,135,136,137,138,139/11,\ang,0/ %Branches. \figvectC 0 (0,0,1) \figptstra 160=2,22,42,62,82,102,122,142/-\haui,0/ \figptstra 170=12,32,52,72,92,112,132,152/\haui,0/ \figvectC 0 (0,1,0) \figptstra 180=160,161,162,163,164,165,166,167/-\lcap,0/ \figptstra 190=160,161,162,163,164,165,166,167/\lcap,0/ \figptstra 200=170,171,172,173,174,175,176,177/-\lcap,0/ \figptstra 210=170,171,172,173,174,175,176,177/\lcap,0/ % 2. Creation of the graphical file %\figsetview(2) \figset proj(psi=-1,theta=15) \psbeginfig{} %Anneau du haut. \pssetwidth{1} \psarccircP 1;\ray[2,4,4] \psarccircP 1;\ray[5,3,3] \psline[6,8] \psline[7,9] \psarccircP 1;\ray[22,24,24] \psarccircP 1;\ray[25,23,23] \psline[26,28] \psline[27,29] \psarccircP 1;\ray[42,44,44] \psarccircP 1;\ray[45,43,43] \psline[46,48] \psline[47,49] \psarccircP 1;\ray[62,64,64] \psarccircP 1;\ray[65,63,63] \psline[66,68] \psline[67,69] \pssetwidth{\defaultwidth} \psarccircP 1;\ray[82,84,84] \psarccircP 1;\ray[85,83,83] \psline[86,88] \psline[87,89] \psarccircP 1;\ray[102,104,104] \psarccircP 1;\ray[105,103,103] \psline[106,108] \psline[107,109] \psarccircP 1;\ray[122,124,124] \psarccircP 1;\ray[125,123,123] \psline[126,128] \psline[127,129] \psarccircP 1;\ray[142,144,144] \psarccircP 1;\ray[145,143,143] \psline[146,148] \psline[147,149] %Brins verticaux. \pssetwidth{1} \psline[2,160] \psline[22,161] \psline[42,162] \psline[62,163] \psline[82,164] \pssetwidth{\defaultwidth} \psline[102,165] \psline[122,166] \psline[142,167] \pssetwidth{1} \psline[12,170] \psline[32,171] \psline[52,172] \psline[72,173] \psline[92,174] \pssetwidth{\defaultwidth} \psline[112,175] \psline[132,176] \psline[152,177] \pssetwidth{1} \psline[180,190] \psline[181,191] \psline[182,192] \psline[183,193] \psline[184,194] \pssetwidth{\defaultwidth} \psline[185,195] \psline[186,196] \psline[187,197] \pssetwidth{1} \psline[200,210] \psline[201,211] \psline[202,212] \psline[203,213] \psline[204,214] \pssetwidth{\defaultwidth} \psline[205,215] \psline[206,216] \psline[207,217] %Anneau du bas. \pssetwidth{1} \psarccircP 11;\ray[12,14,14] \psarccircP 11;\ray[15,13,13] \psline[16,18] \psline[17,19] \psarccircP 11;\ray[32,34,34] \psarccircP 11;\ray[35,33,33] \psline[36,38] \psline[37,39] \psarccircP 11;\ray[52,54,54] \psarccircP 11;\ray[55,53,53] \psline[56,58] \psline[57,59] \psarccircP 11;\ray[72,74,74] \psarccircP 11;\ray[75,73,73] \psline[76,78] \psline[77,79] \pssetwidth{\defaultwidth} \psarccircP 11;\ray[92,94,94] \psarccircP 11;\ray[95,93,93] \psline[96,98] \psline[97,99] \psarccircP 11;\ray[112,114,114] \psarccircP 11;\ray[115,113,113] \psline[116,118] \psline[117,119] \psarccircP 11;\ray[132,134,134] \psarccircP 11;\ray[135,133,133] \psline[136,138] \psline[137,139] \psarccircP 11;\ray[152,154,154] \psarccircP 11;\ray[155,153,153] \psline[156,158] \psline[157,159] \psendfig % 3. Writing text on the figure \figvisu{\figBoxA}{{\sc Fig. 1}\ --\ L'antenne cage d'oiseau}{} \box\figBoxA \end{document} |