1*3e12c5d1SDavid du Colombier/LOGO-dict-mm dup where not 2*3e12c5d1SDavid du Colombier{ dup 64 dict def currentdict } if 3*3e12c5d1SDavid du Colombierexch get 4*3e12c5d1SDavid du Colombierbegin 5*3e12c5d1SDavid du Colombier/l { lineto } def 6*3e12c5d1SDavid du Colombier/rl { rlineto } def 7*3e12c5d1SDavid du Colombier/m { moveto } def 8*3e12c5d1SDavid du Colombier/rm { rmoveto } def 9*3e12c5d1SDavid du Colombier/C { closepath } def 10*3e12c5d1SDavid du Colombier/c { curveto } def 11*3e12c5d1SDavid du Colombier/rc { rcurveto } def 12*3e12c5d1SDavid du Colombier/T { m 0 29 rl -9.5 0 rl 0 7 rl 29 0 rl 0 -7 rl -9.5 0 rl 0 -29 rl C } def 13*3e12c5d1SDavid du Colombier/ATT { 14*3e12c5d1SDavid du Colombiernewpath 15*3e12c5d1SDavid du Colombier1 36 div dup scale 16*3e12c5d1SDavid du Colombier0 0 m 12 36 rl 8 0 rl -11 -36 rl C 17*3e12c5d1SDavid du Colombier25 0 m -11 36 rl 8 0 rl 12 -36 rl C 18*3e12c5d1SDavid du Colombier10 7 m 0 7 rl 14 0 rl 0 -7 rl C 19*3e12c5d1SDavid du Colombier36 0 T 20*3e12c5d1SDavid du Colombier80 6 m -3 0 -5 1.2 -6 2 rc -12 10 rl -2.4 2 -2.7 6 0 6 rc 21*3e12c5d1SDavid du Colombier1 0 2 -1 2 -2 rc 0 -4 rl 7 0 rl 0 4 rl 22*3e12c5d1SDavid du Colombier0 5 -3 7 -9 7 rc -6 0 -9 -3 -9 -7 rc 23*3e12c5d1SDavid du Colombier0 -2 0 -3.6 2 -6 rc 12 -10 rl 6 -5 10 -6 13 -6 rc C 24*3e12c5d1SDavid du Colombier71 18 m 0 -6 rl 0 -5 -3 -7 -7 -7 rc -3 0 -5 2 -5 4 rc 0 1 0 3 2 4 rc 25*3e12c5d1SDavid du Colombier-4 5 rl -4 -2 -6 -6 -6 -9 rc 0 -7 6 -10 13 -10 rc 26*3e12c5d1SDavid du Colombier9 0 14 6 14 11 rc 0 8 rl C 27*3e12c5d1SDavid du Colombier82 0 T 28*3e12c5d1SDavid du Colombier36 dup scale 29*3e12c5d1SDavid du Colombier} def 30*3e12c5d1SDavid du Colombierend 31*3e12c5d1SDavid du Colombier/build_LA { 32*3e12c5d1SDavid du Colombierpop 33*3e12c5d1SDavid du ColombierLOGO-dict-mm begin 34*3e12c5d1SDavid du Colombiergsave 35*3e12c5d1SDavid du Colombiercurrentpoint translate 36*3e12c5d1SDavid du Colombiersize 2.56 div dup scale % was size 2.75 div dup scale 37*3e12c5d1SDavid du Colombier.02 0 translate 38*3e12c5d1SDavid du ColombierATT fill 39*3e12c5d1SDavid du Colombiergrestore 40*3e12c5d1SDavid du Colombierend 41*3e12c5d1SDavid du Colombier} def 42