blob: f4aef6bbb109760c6e4048076ad7800024a1048a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
%!PS-ADOBE-3.0
%%BoundingBox: 0 0 10 2400
%%Title: vague.eps
%%Creator: Vincent Zoonekynd
%%CreationDate: June 1998
%%EndComments
/vz@Dict 20 dict def vz@Dict begin
/une_vague {
/y exch def /x exch def
gsave
x y moveto
x 4 sub y 2 add lineto
x y 4 add lineto
stroke
grestore
} bind def
/deux_vagues {
gsave
1 setlinecap
1 setlinejoin
2 copy
une_vague
exch 4 add exch une_vague
grestore
} bind def
/do_it {
0 4 2400 { 5 exch deux_vagues } for
} bind def
end
vz@Dict begin do_it end
|
