C'est la reconstitution de l'anamorphose conique de LouisXII par Jean François Nicéro...
[pst-anamorphosis.git] / pst / eye.pst
1 %@PATRON:pstricks
2 \makeatletter
3 \def\psfs@asolid{\pst@fill{\pst@usecolor\psfillcolor eofill}}
4 \makeatother
5 %@COULEURS:
6 \definecolor{CouleurI}{cmyk}{0,0,0,0}
7 \definecolor{CouleurII}{cmyk}{0.668,0.632,0.704,0.702}
8 \definecolor{CouleurIII}{cmyk}{0.843,0.718,0,0}
9 \definecolor{CouleurIV}{cmyk}{0.739,0.701,0.632,0.816}
10 %@BOUNDINGBOX: 0 0 215 124
11 %@TRANSLATION: -(107.5,62)
12 %@FACTEUR: 0.0186046511627907
13 %@PSPICTURE:
14 % \begin{pspicture}(-2.00000000,-1.15348837)(2.00000000,1.15348837)
15 %@PICTURE:
16 %% Path : 2
17 \pscustom[fillstyle=asolid,fillcolor=CouleurI,linestyle=none]{
18 \moveto(1.30865116,0.23655442)
19 \psbezier(1.30865116,0.23655442)(0.32920930,0.97869767)(-0.73560930,0.55835721)
20 \psbezier(-1.21184558,0.38016000)(-1.56911256,0.06228279)(-1.55189023,-0.33132279)
21 \psbezier(-1.54760186,-0.42972465)(-0.93808186,-0.76685953)(-0.54571163,-0.79484093)
22 \psbezier(-0.15341581,-0.82289302)(0.18786977,-0.94404093)(0.97252093,-0.52369116)
23 \psbezier(1.42195349,-0.30835721)(1.52463256,-0.19469395)(1.51838140,-0.05726698)
24 \psbezier(1.51235349,0.07601674)(1.43451163,0.13568372)(1.30865116,0.23655442)
25 }
26 %% Path : 3
27 \pscustom[fillstyle=asolid,fillcolor=CouleurIII,linestyle=none]{
28 \moveto(0.82368372,0.08626419)
29 \psbezier(0.82368372,0.46678698)(0.51518140,0.77536744)(0.13458605,0.77536744)
30 \psbezier(-0.24592930,0.77536744)(-0.55450605,0.46678698)(-0.55450605,0.08626419)
31 \psbezier(-0.55450605,-0.29433116)(-0.24592930,-0.60283349)(0.13458605,-0.60283349)
32 \psbezier(0.51518140,-0.60283349)(0.82368372,-0.29433116)(0.82368372,0.08626419)
33 }
34 %% Path : 4
35 \pscustom[linewidth=0.52738pt,linecolor=CouleurI]{
36 \moveto(1.30865116,0.23655442)
37 \psbezier(1.30865116,0.23655442)(0.32920930,0.97869767)(-0.73560930,0.55835721)
38 \psbezier(-1.21184558,0.38016000)(-1.56911256,0.06228279)(-1.55189023,-0.33132279)
39 \psbezier(-1.54760186,-0.42972465)(-0.93808186,-0.76685953)(-0.54571163,-0.79484093)
40 \psbezier(-0.15341581,-0.82289302)(0.18786977,-0.94404093)(0.97252093,-0.52369116)
41 \psbezier(1.42195349,-0.30835721)(1.52463256,-0.19469395)(1.51838140,-0.05726698)
42 \psbezier(1.51235349,0.07601674)(1.43451163,0.13568372)(1.30865116,0.23655442)
43 \closepath
44 }
45 %% Path : 5
46 \pscustom[fillstyle=asolid,fillcolor=CouleurII,linestyle=none]{
47 \moveto(0.51438140,0.12463628)
48 \psbezier(0.51438140,0.32340093)(0.35319070,0.48459349)(0.15436279,0.48459349)
49 \psbezier(-0.04440930,0.48459349)(-0.20559628,0.32340093)(-0.20559628,0.12463628)
50 \psbezier(-0.20559628,-0.07420093)(-0.04440930,-0.23539163)(0.15436279,-0.23539163)
51 \psbezier(0.35319070,-0.23539163)(0.51438140,-0.07420093)(0.51438140,0.12463628)
52 }
53 %% Path : 6
54 \pscustom[fillstyle=asolid,fillcolor=CouleurI,linestyle=none]{
55 \moveto(0.18329302,0.35733953)
56 \psbezier(0.18329302,0.35733953)(0.22340465,0.28270326)(0.20334884,0.22013023)
57 \psbezier(0.18329302,0.15755907)(0.38574884,0.11061023)(0.38574884,0.14585674)
58 \psbezier(0.38574884,0.18110512)(0.38574884,0.33379349)(0.30792558,0.35733953)
59 \psbezier(0.23000930,0.38081488)(0.18329302,0.35733953)(0.18329302,0.35733953)
60 }
61 %% Path : 7
62 \pscustom[fillstyle=asolid,fillcolor=CouleurIV,linestyle=none]{
63 \moveto(1.30865116,0.23655442)
64 \psbezier(1.30865116,0.23655442)(1.45951628,0.17231070)(1.59774884,0.32885209)
65 \psbezier(1.73590698,0.48539163)(1.40435349,0.22754419)(1.21105116,0.31046512)
66 \psbezier(1.30305116,0.27361860)(1.30865116,0.23655442)(1.30865116,0.23655442)
67 }
68 %% Path : 8
69 \pscustom[fillstyle=asolid,fillcolor=CouleurIV,linestyle=none]{
70 \moveto(1.36751628,0.20000000)
71 \psbezier(1.36751628,0.20000000)(1.50567442,0.09869209)(1.87399070,0.14469395)
72 \psbezier(1.59774884,0.16315349)(1.29389767,0.26438884)(1.29389767,0.26438884)
73 \psline(1.30865116,0.23655442)
74 \psline(1.36751628,0.20000000)
75 }
76 %% Path : 9
77 \pscustom[fillstyle=asolid,fillcolor=CouleurIV,linestyle=none]{
78 \moveto(1.10050233,0.34723907)
79 \psbezier(1.10050233,0.34723907)(1.36751628,0.38408372)(1.45036279,0.60508651)
80 \psbezier(1.31227907,0.47616372)(1.19229767,0.40515907)(0.98074419,0.42093023)
81 \psbezier(1.08204651,0.38408372)(1.10050233,0.34723907)(1.10050233,0.34723907)
82 }
83 %% Path : 10
84 \pscustom[fillstyle=asolid,fillcolor=CouleurIV,linestyle=none]{
85 \moveto(0.75893953,0.50973767)
86 \psbezier(0.75893953,0.50973767)(0.90880000,0.46606140)(1.05856744,0.67209302)
87 \psbezier(1.02115349,0.57216558)(0.88379535,0.45981023)(0.83386047,0.46606140)
88 \psbezier(0.78394419,0.47223814)(0.75893953,0.50973767)(0.75893953,0.50973767)
89 }
90 %% Path : 11
91 \pscustom[fillstyle=asolid,fillcolor=CouleurIV,linestyle=none]{
92 \moveto(0.87732093,0.49011721)
93 \psbezier(0.87732093,0.49011721)(1.02718140,0.44643907)(1.17696744,0.65247070)
94 \psbezier(1.13953488,0.55254326)(1.00217674,0.44018977)(0.95233488,0.44643907)
95 \psbezier(0.90232558,0.45268837)(0.87732093,0.49011721)(0.87732093,0.49011721)
96 }
97 %% Path : 12
98 \psclip{\psframe[fillstyle=none,linestyle=none](-2.00000000,-1.15348837)(2.00000000,1.15348837)}%
99 \pscustom{
100 \moveto(-1.88691851,-0.98263088)
101 \psline(1.87399070,-0.98263088)
102 \psline(1.87399070,1.03880930)
103 \psline(-1.88691851,1.03880930)
104 \closepath
105 }
106 \endpsclip
107 %% Path : 13
108 \pscustom[fillstyle=asolid,fillcolor=CouleurIV,linestyle=none]{
109 \moveto(-1.38851721,-0.42470884)
110 \psbezier(-1.39004279,-0.43212279)(-1.38917209,-0.44098791)(-1.38648186,-0.45094512)
111 \psbezier(-1.38510140,-0.41809674)(-1.38379349,-0.40123535)(-1.38851721,-0.42470884)
112 \moveto(1.13895814,0.36402605)
113 \psbezier(1.19142326,0.33328558)(1.24316279,0.30014512)(1.29389767,0.26438884)
114 \psbezier(1.29389767,0.26438884)(1.13438140,0.41359070)(0.94243721,0.54258791)
115 \psbezier(1.00792558,0.55828465)(1.08554419,0.58372093)(1.17586977,0.62398326)
116 \psbezier(1.07944186,0.60159814)(0.97652093,0.58837209)(0.88409302,0.58052279)
117 \psbezier(0.85624186,0.59796465)(0.82798140,0.61460837)(0.79962791,0.63008744)
118 \psbezier(0.82085581,0.65312558)(0.84091163,0.68241302)(0.85799070,0.71990698)
119 \psbezier(0.91257674,0.83938605)(0.83691163,0.74803721)(0.72130233,0.66954977)
120 \psbezier(0.67776744,0.68895442)(0.61925581,0.70987907)(0.54941395,0.72958140)
121 \psbezier(0.59404651,0.78364651)(0.63118140,0.85406512)(0.63678140,0.94135814)
122 \psbezier(0.59092093,0.86221395)(0.54506047,0.79737674)(0.48647442,0.74613953)
123 \psbezier(0.44426047,0.75653953)(0.39890233,0.76634419)(0.35093953,0.77499535)
124 \psbezier(0.39192558,0.80137674)(0.43640930,0.83320930)(0.48414884,0.87194419)
125 \psbezier(0.43518140,0.84578605)(0.38349767,0.82187907)(0.33218605,0.80042791)
126 \psbezier(0.34811163,0.83633488)(0.35931163,0.87376744)(0.36148837,0.90727442)
127 \psbezier(0.34455814,0.85864186)(0.32478140,0.81983256)(0.30392558,0.78874419)
128 \psbezier(0.30050233,0.78742326)(0.29709767,0.78604651)(0.29367442,0.78466977)
129 \psbezier(0.26889302,0.78852093)(0.24346047,0.79207442)(0.21750698,0.79527442)
130 \psbezier(0.23110698,0.82790698)(0.24048372,0.86141395)(0.24243721,0.89164651)
131 \psbezier(0.22965581,0.85493953)(0.21525581,0.82383256)(0.19992558,0.79737674)
132 \psbezier(0.17704186,0.80000000)(0.15371163,0.80232558)(0.13008372,0.80435349)
133 \psbezier(0.13953488,0.82695814)(0.14731163,0.85253953)(0.15233488,0.88219535)
134 \psbezier(0.17319070,1.00682791)(0.12827907,0.91170233)(0.04353488,0.81010233)
135 \psbezier(-0.01910698,0.81307907)(-0.08342326,0.81345116)(-0.14861953,0.81067907)
136 \psbezier(-0.11940465,0.87464186)(-0.10145116,0.95261395)(-0.11882791,1.03880930)
137 \psbezier(-0.14316837,0.94833488)(-0.17129302,0.87231628)(-0.21635163,0.80667907)
138 \psbezier(-0.27194791,0.80240000)(-0.32805209,0.79564651)(-0.38393860,0.78612093)
139 \psbezier(-0.37209302,0.83648372)(-0.36715163,0.89092093)(-0.37587163,0.93445581)
140 \psbezier(-0.38045023,0.87121860)(-0.39316837,0.82115349)(-0.40973767,0.78154419)
141 \psbezier(-0.43648186,0.77659535)(-0.46308093,0.77086512)(-0.48968000,0.76446512)
142 \psbezier(-0.48168558,0.80762791)(-0.47943256,0.85196279)(-0.48677209,0.88852093)
143 \psbezier(-0.49048000,0.83713488)(-0.49963721,0.79454884)(-0.51184558,0.75901395)
144 \psbezier(-0.55828465,0.74723721)(-0.60436093,0.73313488)(-0.64985488,0.71665116)
145 \psbezier(-0.69186047,0.74461395)(-0.73778977,0.78982326)(-0.78132279,0.86271628)
146 \psbezier(-0.76649674,0.80880000)(-0.72478140,0.74920930)(-0.68117767,0.70479628)
147 \psbezier(-0.69723721,0.69854698)(-0.71322605,0.69200558)(-0.72906977,0.68510140)
148 \psbezier(-0.78052279,0.70857674)(-0.84302326,0.75661395)(-0.90101767,0.85386047)
149 \psbezier(-0.88263070,0.78692093)(-0.82274791,0.71112558)(-0.76918512,0.66664186)
150 \psbezier(-0.79905488,0.65239814)(-0.82848744,0.63691907)(-0.85741209,0.62013023)
151 \psbezier(-0.99069767,0.64956465)(-1.08045023,0.72275349)(-1.17754419,0.83153488)
152 \psbezier(-1.13764465,0.68611907)(-1.01613395,0.60879442)(-0.93350326,0.57187535)
153 \psbezier(-0.95341581,0.55821209)(-0.97303814,0.54382326)(-0.99229581,0.52870698)
154 \psbezier(-1.00675907,0.52151256)(-1.02107535,0.51424372)(-1.03488372,0.50683163)
155 \psbezier(-1.22812465,0.50901209)(-1.45915721,0.71983256)(-1.34934512,0.56984000)
156 \psbezier(-1.29549395,0.49622140)(-1.23531907,0.46438884)(-1.18459349,0.45189023)
157 \psbezier(-1.30109023,0.43161302)(-1.47725209,0.40748465)(-1.64113302,0.41148279)
158 \psbezier(-1.42936000,0.36518884)(-1.29135256,0.37608930)(-1.21300837,0.39309581)
159 \psbezier(-1.26329860,0.35486884)(-1.30748465,0.31489860)(-1.34600372,0.27383814)
160 \psbezier(-1.39433116,0.27565395)(-1.45574140,0.28757209)(-1.53197581,0.31925953)
161 \psbezier(-1.48880744,0.28866233)(-1.42376372,0.26547907)(-1.36518884,0.25283349)
162 \psbezier(-1.37645395,0.24011721)(-1.38720930,0.22725209)(-1.39745674,0.21438884)
163 \psbezier(-1.44963721,0.21119256)(-1.52136558,0.22027535)(-1.61555163,0.25952000)
164 \psbezier(-1.56475349,0.22347349)(-1.48364837,0.19767442)(-1.41824186,0.18742698)
165 \psbezier(-1.43938977,0.15879442)(-1.45821209,0.12994233)(-1.47492651,0.10094512)
166 \psbezier(-1.57906977,0.07652651)(-1.68226791,0.08968000)(-1.80748465,0.12005767)
167 \psbezier(-1.70566884,0.04803721)(-1.59127814,0.03575628)(-1.50697674,0.03982512)
168 \psbezier(-1.52485395,0.00239814)(-1.53960744,-0.03510140)(-1.55145302,-0.07223814)
169 \psbezier(-1.70508651,-0.12332837)(-1.92674419,-0.09200558)(-1.77049488,-0.14338605)
170 \psbezier(-1.68393860,-0.17187535)(-1.61911256,-0.16773209)(-1.57347349,-0.15406884)
171 \psbezier(-1.64738419,-0.22049488)(-1.76344558,-0.31635163)(-1.88800874,-0.38670140)
172 \psbezier(-1.73422884,-0.33604651)(-1.64207814,-0.28016000)(-1.58771721,-0.23561116)
173 \psbezier(-1.59091535,-0.26024744)(-1.59309581,-0.28437581)(-1.59440372,-0.30799442)
174 \psbezier(-1.53372093,-0.39701953)(-1.46373581,-0.47194791)(-1.38713674,-0.53495628)
175 \psbezier(-1.38611907,-0.56271814)(-1.38343070,-0.59018977)(-1.37747163,-0.61112000)
176 \psbezier(-1.35559628,-0.68771721)(-1.21308093,-0.75356093)(-1.20210791,-0.79752930)
177 \psline(-1.19120558,-0.84127814)
178 \psline(-1.02674419,-0.80835721)
179 \psline(-0.96112000,-0.89592930)
180 \psline(-0.89527628,-0.80835721)
181 \psline(-0.77470884,-0.92892465)
182 \psline(-0.67608930,-0.85218047)
183 \psline(-0.44592930,-0.96184558)
184 \psline(-0.39113302,-0.93982512)
185 \psline(-0.25966512,-0.96184558)
186 \psline(-0.23764465,-0.90704930)
187 \psline(-0.04040930,-0.98372093)
188 \psline(0.05828837,-0.92892465)
189 \psbezier(0.05828837,-0.92892465)(0.41453023,-0.73270326)(0.56068837,-0.69476651)
190 \psbezier(0.46396279,-0.69585674)(0.23335814,-0.79440372)(0.19054884,-0.81039256)
191 \psbezier(0.29127442,-0.77238326)(0.25806512,-0.82441860)(0.07492093,-0.82579907)
192 \psbezier(-0.05559070,-0.82645395)(-0.24120558,-0.84127814)(-0.32536372,-0.85218047)
193 \psbezier(-0.33691907,-0.85370605)(-0.35988279,-0.84796465)(-0.38626419,-0.84266047)
194 \psbezier(-0.19963721,-0.84404093)(-0.03125581,-0.82463628)(0.09099535,-0.80421581)
195 \psbezier(-0.75014512,-0.84215070)(-1.17688930,-0.64091535)(-1.37972465,-0.46874977)
196 \psbezier(-1.38255814,-0.46250047)(-1.38495628,-0.45646884)(-1.38648186,-0.45094512)
197 \psbezier(-1.38662698,-0.45457860)(-1.38670140,-0.45864744)(-1.38691907,-0.46264558)
198 \psbezier(-1.47943256,-0.38234047)(-1.52347349,-0.30908465)(-1.53822698,-0.27049488)
199 \psbezier(-1.46337116,-0.06453395)(-1.19178791,0.31002977)(-0.96707907,0.44113302)
200 \psbezier(-0.06816744,0.94673488)(1.21460465,0.31002977)(1.30865116,0.23655442)
201 \psbezier(1.37892093,0.18161302)(1.42413023,0.13822698)(1.44243721,0.11991256)
202 \psbezier(1.34993488,0.21591628)(1.24738605,0.29651163)(1.13895814,0.36402605)
203 \moveto(-0.93880744,-0.76656930)
204 \psbezier(-0.99869209,-0.76860465)(-1.02122047,-0.76460837)(-1.13648186,-0.69869209)
205 \psbezier(-1.15457860,-0.68837209)(-1.17202047,-0.67739907)(-1.18880744,-0.66598884)
206 \psbezier(-1.10850233,-0.70813953)(-1.02441860,-0.74106047)(-0.93880744,-0.76656930)
207 \moveto(1.44243721,0.11991256)
208 \psbezier(1.44556279,0.11664186)(1.44876279,0.11351814)(1.45181395,0.11024744)
209 \psbezier(1.45181395,0.11024744)(1.44868837,0.11366326)(1.44243721,0.11991256)
210 }
211 %% Path : 14
212 \pscustom[fillstyle=solid,fillcolor=CouleurIV,linestyle=none]{
213 \moveto(1.40014884,-0.26998512)
214 \psbezier(1.45261395,-0.21722419)(1.34171163,-0.31497116)(1.22840930,-0.37928744)
215 \psbezier(1.14768372,-0.42485395)(1.03626047,-0.49636651)(0.98699535,-0.53074047)
216 \psbezier(0.98016744,-0.53546419)(0.96446512,-0.54077023)(0.94666047,-0.54745674)
217 \psbezier(1.06286512,-0.48321302)(1.16228837,-0.41562419)(1.23278140,-0.36351814)
218 \psbezier(0.90827907,-0.56002977)(0.66206512,-0.65341581)(0.48154419,-0.69302326)
219 \psbezier(0.43931163,-0.71707907)(0.39345116,-0.73510140)(0.34506047,-0.74556651)
220 \psline(0.27391628,-0.78539163)
221 \psbezier(0.31053023,-0.81039256)(0.41060465,-0.79338605)(0.42840930,-0.80973767)
222 \psline(0.44680930,-0.82652651)
223 \psline(0.54011163,-0.75392372)
224 \psline(0.60392558,-0.77216558)
225 \psline(0.62173023,-0.70821209)
226 \psline(0.72827907,-0.72289302)
227 \psline(0.76933953,-0.65254326)
228 \psline(0.94091163,-0.62412837)
229 \psline(0.96919070,-0.59469395)
230 \psline(1.05653953,-0.55937488)
231 \psline(1.05573953,-0.52601674)
232 \psline(1.19840000,-0.49345860)
233 \psline(1.24520930,-0.43343070)
234 \psbezier(1.24520930,-0.43343070)(1.48277209,-0.24149767)(1.49425116,-0.16453395)
235 \psbezier(1.47144186,-0.19585674)(1.42245581,-0.24760186)(1.40014884,-0.26998512)
236 \moveto(0.44323721,-0.74055256)
237 \psbezier(0.42928372,-0.74200558)(0.41555349,-0.74287814)(0.40210233,-0.74338605)
238 \psbezier(0.46308837,-0.73524651)(0.52390698,-0.72151070)(0.58372093,-0.70370605)
239 \psbezier(0.54708837,-0.72550884)(0.53213023,-0.73146791)(0.44323721,-0.74055256)
240 }
241 %% Path : 15
242 \pscustom[fillstyle=solid,fillcolor=CouleurI,linestyle=none]{
243 \moveto(0.31315349,-0.01606140)
244 \psbezier(0.31315349,-0.04920000)(0.28634419,-0.07608930)(0.25319070,-0.07608930)
245 \psbezier(0.22005581,-0.07608930)(0.19324651,-0.04920000)(0.19324651,-0.01606140)
246 \psbezier(0.19324651,0.01700651)(0.22005581,0.04389581)(0.25319070,0.04389581)
247 \psbezier(0.28634419,0.04389581)(0.31315349,0.01700651)(0.31315349,-0.01606140)
248 }
249 %@---
250 % \end{pspicture}

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.