coax.eps 3.92 KB
%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: 155 625 294 764
%%Title: coax
%%CreationDate: Tue Dec 20 14:50:06 2016
%%Creator: Tgif-4.2.5-QPL written by William Chia-Wei Cheng (bill.cheng@acm.org)
%%ProducedBy: (unknown)
%%Pages: 1
%%DocumentFonts: (atend)
%%EndComments
%%BeginProlog

/tgifdict 56 dict def
tgifdict begin

/tgifellipsedict 6 dict def
tgifellipsedict /mtrx matrix put

/TGEL % tgifellipse
 { tgifellipsedict begin
      /yrad exch def
      /xrad exch def
      /y exch def
      /x exch def
      /savematrix mtrx currentmatrix def
      x y translate
      xrad yrad scale
      0 0 1 0 360 arc
      savematrix setmatrix
   end
 } def

/tgifarrowtipdict 8 dict def
tgifarrowtipdict /mtrx matrix put

/TGAT % tgifarrowtip
 { tgifarrowtipdict begin
      /dy exch def
      /dx exch def
      /h exch def
      /w exch def
      /y exch def
      /x exch def
      /savematrix mtrx currentmatrix def
      x y translate
      dy dx atan rotate
      0 0 moveto
      w neg h lineto
      w neg h neg lineto
      savematrix setmatrix
   end
 } def

/TGMAX
 { exch dup 3 1 roll exch dup 3 1 roll gt { pop } { exch pop } ifelse
 } def
/TGMIN
 { exch dup 3 1 roll exch dup 3 1 roll lt { pop } { exch pop } ifelse
 } def
/TGSW { stringwidth pop } def
/tgifstrw 0 def

/bd { bind def } bind def

/GS { gsave } bd
/GR { grestore } bd
/NP { newpath } bd
/CP { closepath } bd
/CHP { charpath } bd
/CT { curveto } bd
/L { lineto } bd
/RL { rlineto } bd
/M { moveto } bd
/RM { rmoveto } bd
/S { stroke } bd
/F { fill } bd
/TR { translate } bd
/RO { rotate } bd
/SC { scale } bd
/MU { mul } bd
/DI { div } bd
/DU { dup } bd
/NE { neg } bd
/AD { add } bd
/SU { sub } bd
/PO { pop } bd
/EX { exch } bd
/CO { concat } bd
/CL { clip } bd
/EC { eoclip } bd
/EF { eofill } bd
/IM { image } bd
/IMM { imagemask } bd
/ARY { array } bd
/SG { setgray } bd
/RG { setrgbcolor } bd
/SD { setdash } bd
/W { setlinewidth } bd
/SM { setmiterlimit } bd
/SLC { setlinecap } bd
/SLJ { setlinejoin } bd
/SH { show } bd
/FF { findfont } bd
/MS { makefont setfont } bd
/AR { arcto 4 {pop} repeat } bd
/CURP { currentpoint } bd
/FLAT { flattenpath strokepath clip newpath } bd
/TGSM { tgiforigctm setmatrix } def
/TGRM { savematrix setmatrix } def

end

%%EndProlog
%%Page: 1 1

%%PageBoundingBox: 155 625 294 764
tgifdict begin
/tgifsavedpage save def

1 SM
1 W

0 SG

72 0 MU 72 11.602 MU TR
72 128 DI 100.000 MU 100 DI DU NE SC

GS

/tgiforigctm matrix currentmatrix def

% OVAL
0 SG
GS
   GS
      NP 400 250 20 20 TGEL
      3 W
      S
   GR
GR

% OVAL
0 SG
GS
   GS
      NP 400 250 120 120 TGEL
      3 W
      S
   GR
GR

% POLY/OPEN-SPLINE
0 SG
GS
   NP
      400 250 M
      -13 15 atan DU cos 8.000 MU 415 exch SU
      exch sin 8.000 MU 237 exch SU L
   TGSM
   1 W
   S
GR
GS
   TGSM
   NP
      415 237 8.000 3.000 15 -13 TGAT
   1 SG CP F
   0 SG
   NP
      415 237 8.000 3.000 15 -13 TGAT
   CP F
GR

% POLY/OPEN-SPLINE
0 SG
GS
   NP
      400 250 M
      80 90 atan DU cos 8.000 MU 490 exch SU
      exch sin 8.000 MU 330 exch SU L
   TGSM
   1 W
   S
GR
GS
   TGSM
   NP
      490 330 8.000 3.000 90 80 TGAT
   1 SG CP F
   0 SG
   NP
      490 330 8.000 3.000 90 80 TGAT
   CP F
GR

% TEXT
NP
0 SG
   GS
      1 W
      420 230 M
      GS
            0 SG
            /Courier FF [18 0 0 -18 0 0] MS
            (r) SH
            0 SG
            /Courier FF [12 0 0 -12 0 0] MS
            (w) SH
      GR
   GR

% TEXT
NP
0 SG
   GS
      1 W
      440 314 M
      GS
            0 SG
            /Courier FF [18 0 0 -18 0 0] MS
            (r) SH
            0 SG
            /Courier FF [12 0 0 -12 0 0] MS
            (s) SH
      GR
   GR

% TEXT
NP
0 SG
   GS
      1 W
      315 228 M
      GS
            0 SG
            /Symbol FF [18 0 0 -18 0 0] MS
            (e) SH
            0 SG
            /Courier FF [12 0 0 -12 0 0] MS
            (r) SH
      GR
   GR

GR
tgifsavedpage restore
end
showpage

%%Trailer
%MatchingCreationDate: Tue Dec 20 14:50:06 2016
%%DocumentFonts: Symbol
%%+ Courier
%%EOF