fig9d1.ps

matlab的一些例子,对入门的新手有帮助

%!PS-Adobe-2.0 
%%Creator: MATLAB, The Mathworks, Inc.
%%Title: fig9d1.ps
%%CreationDate: 02/24/2001  03:58:03
%%DocumentNeededFonts: Helvetica
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%Pages: (atend)
%%BoundingBox: (atend)
%%EndComments

%%BeginProlog
% MathWorks dictionary
/MathWorks 160 dict begin
% definition operators
/bdef {bind def} bind def
/ldef {load def} bind def
/xdef {exch def} bdef
/xstore {exch store} bdef
% operator abbreviations
/c  /clip ldef
/cc /concat ldef
/cp /closepath ldef
/gr /grestore ldef
/gs /gsave ldef
/mt /moveto ldef
/np /newpath ldef
/cm /currentmatrix ldef
/sm /setmatrix ldef
/rm /rmoveto ldef
/rl /rlineto ldef
/s /show ldef
/sc {setcmykcolor} bdef
/sr /setrgbcolor ldef
/sg /setgray ldef
/w /setlinewidth ldef
/j /setlinejoin ldef
/cap /setlinecap ldef
/rc {rectclip} bdef
/rf {rectfill} bdef
% page state control
/pgsv () def
/bpage {/pgsv save def} bdef
/epage {pgsv restore} bdef
/bplot /gsave ldef
/eplot {stroke grestore} bdef
% orientation switch
/portraitMode 0 def /landscapeMode 1 def /rotateMode 2 def
% coordinate system mappings
/dpi2point 0 def
% font control
/FontSize 0 def
/FMS {/FontSize xstore findfont [FontSize 0 0 FontSize neg 0 0]
  makefont setfont} bdef
/ISOLatin1Encoding where {pop /WindowsLatin1Encoding 256 array bdef
ISOLatin1Encoding WindowsLatin1Encoding copy pop
/.notdef/.notdef/quotesinglbase/florin/quotedblbase/ellipsis/dagger
/daggerdbl/circumflex/perthousand/Scaron/guilsinglleft/OE/.notdef/.notdef
/.notdef/.notdef/quoteleft/quoteright/quotedblleft/quotedblright/bullet
/endash/emdash/tilde/trademark/scaron/guilsinglright/oe/.notdef/.notdef
/Ydieresis WindowsLatin1Encoding 128 32 getinterval astore pop}
{/WindowsLatin1Encoding StandardEncoding bdef} ifelse
/reencode {exch dup where {pop load} {pop StandardEncoding} ifelse
  exch dup 3 1 roll findfont dup length dict begin
  { 1 index /FID ne {def}{pop pop} ifelse } forall
  /Encoding exch def currentdict end definefont pop} bdef
/isroman {findfont /CharStrings get /Agrave known} bdef
/FMSR {3 1 roll 1 index dup isroman {reencode} {pop pop} ifelse
  exch FMS} bdef
/csm {1 dpi2point div -1 dpi2point div scale neg translate
 dup landscapeMode eq {pop -90 rotate}
  {rotateMode eq {90 rotate} if} ifelse} bdef
% line types: solid, dotted, dashed, dotdash
/SO { [] 0 setdash } bdef
/DO { [.5 dpi2point mul 4 dpi2point mul] 0 setdash } bdef
/DA { [6 dpi2point mul] 0 setdash } bdef
/DD { [.5 dpi2point mul 4 dpi2point mul 6 dpi2point mul 4
  dpi2point mul] 0 setdash } bdef
% macros for lines and objects
/L {lineto stroke} bdef
/MP {3 1 roll moveto 1 sub {rlineto} repeat} bdef
/AP {{rlineto} repeat} bdef
/PDlw -1 def
/W {/PDlw currentlinewidth def setlinewidth} def
/PP {closepath eofill} bdef
/DP {closepath stroke} bdef
/MR {4 -2 roll moveto dup  0 exch rlineto exch 0 rlineto
  neg 0 exch rlineto closepath} bdef
/FR {MR stroke} bdef
/PR {MR fill} bdef
/L1i {{currentfile picstr readhexstring pop} image} bdef
/tMatrix matrix def
/MakeOval {newpath tMatrix currentmatrix pop translate scale
0 0 1 0 360 arc tMatrix setmatrix} bdef
/FO {MakeOval stroke} bdef
/PO {MakeOval fill} bdef
/PD {currentlinecap 1 cap 3 1 roll 2 copy mt lineto stroke
   cap PDlw -1 eq not {PDlw w /PDlw -1 def} if} def
/FA {newpath tMatrix currentmatrix pop translate scale
  0 0 1 5 -2 roll arc tMatrix setmatrix stroke} bdef
/PA {newpath tMatrix currentmatrix pop	translate 0 0 moveto scale
  0 0 1 5 -2 roll arc closepath tMatrix setmatrix fill} bdef
/FAn {newpath tMatrix currentmatrix pop translate scale
  0 0 1 5 -2 roll arcn tMatrix setmatrix stroke} bdef
/PAn {newpath tMatrix currentmatrix pop translate 0 0 moveto scale
  0 0 1 5 -2 roll arcn closepath tMatrix setmatrix fill} bdef
/vradius 0 def /hradius 0 def /lry 0 def
/lrx 0 def /uly 0 def /ulx 0 def /rad 0 def
/MRR {/vradius xdef /hradius xdef /lry xdef /lrx xdef /uly xdef
  /ulx xdef newpath tMatrix currentmatrix pop ulx hradius add uly
  vradius add translate hradius vradius scale 0 0 1 180 270 arc 
  tMatrix setmatrix lrx hradius sub uly vradius add translate
  hradius vradius scale 0 0 1 270 360 arc tMatrix setmatrix
  lrx hradius sub lry vradius sub translate hradius vradius scale
  0 0 1 0 90 arc tMatrix setmatrix ulx hradius add lry vradius sub
  translate hradius vradius scale 0 0 1 90 180 arc tMatrix setmatrix
  closepath} bdef
/FRR {MRR stroke } bdef
/PRR {MRR fill } bdef
/MlrRR {/lry xdef /lrx xdef /uly xdef /ulx xdef /rad lry uly sub 2 div def
  newpath tMatrix currentmatrix pop ulx rad add uly rad add translate
  rad rad scale 0 0 1 90 270 arc tMatrix setmatrix lrx rad sub lry rad
  sub translate rad rad scale 0 0 1 270 90 arc tMatrix setmatrix
  closepath} bdef
/FlrRR {MlrRR stroke } bdef
/PlrRR {MlrRR fill } bdef
/MtbRR {/lry xdef /lrx xdef /uly xdef /ulx xdef /rad lrx ulx sub 2 div def
  newpath tMatrix currentmatrix pop ulx rad add uly rad add translate
  rad rad scale 0 0 1 180 360 arc tMatrix setmatrix lrx rad sub lry rad
  sub translate rad rad scale 0 0 1 0 180 arc tMatrix setmatrix
  closepath} bdef
/FtbRR {MtbRR stroke } bdef
/PtbRR {MtbRR fill } bdef
/stri 6 array def /dtri 6 array def
/smat 6 array def /dmat 6 array def
/tmat1 6 array def /tmat2 6 array def /dif 3 array def
/asub {/ind2 exch def /ind1 exch def dup dup
  ind1 get exch ind2 get sub exch } bdef
/tri_to_matrix {
  2 0 asub 3 1 asub 4 0 asub 5 1 asub
  dup 0 get exch 1 get 7 -1 roll astore } bdef
/compute_transform {
  dmat dtri tri_to_matrix tmat1 invertmatrix 
  smat stri tri_to_matrix tmat2 concatmatrix } bdef
/ds {stri astore pop} bdef
/dt {dtri astore pop} bdef
/db {2 copy /cols xdef /rows xdef mul dup string
  currentfile exch readhexstring pop
  /bmap xdef pop pop} bdef
/it {gs np dtri aload pop moveto lineto lineto cp c
  cols rows 8 compute_transform 
  {bmap} image gr}bdef
/il {newpath moveto lineto stroke}bdef
currentdict end def
%%EndProlog

%%BeginSetup
MathWorks begin

0 cap

end
%%EndSetup

%%Page: 1 1
%%BeginPageSetup
%%PageBoundingBox:    47   193   549   589
MathWorks begin
bpage
%%EndPageSetup

%%BeginObject: obj1
bplot

/dpi2point 12 def
portraitMode 0204 7344 csm

  367   274  6020  4749 MR c np
85 dict begin %Colortable dictionary
/c0 { 0 0 0 sr} bdef
/c1 { 1 1 1 sr} bdef
/c2 { 1 0 0 sr} bdef
/c3 { 0 1 0 sr} bdef
/c4 { 0 0 1 sr} bdef
/c5 { 1 1 0 sr} bdef
/c6 { 1 0 1 sr} bdef
/c7 { 0 1 1 sr} bdef
c0
1 j
1 sg
   0    0 6913 5185 PR
6 w
0 4225 5356 0 0 -4225 899 4614 4 MP
PP
-5356 0 0 4225 5356 0 0 -4225 899 4614 5 MP stroke
4 w
DO
SO
6 w
0 sg
 899  389 mt 6255  389 L
 899 4614 mt 6255 4614 L
6255 4614 mt 6255  389 L
 899 4614 mt  899  389 L
 899 4614 mt 6255 4614 L
 899 4614 mt  899  389 L
 899 4614 mt  899 4560 L
 899  389 mt  899  442 L
%%IncludeResource: font Helvetica
/Helvetica /WindowsLatin1Encoding 120 FMSR

 796 4759 mt 
(-1) s
1494 4614 mt 1494 4560 L
1494  389 mt 1494  442 L
1341 4759 mt 
(-0.5) s
2089 4614 mt 2089 4560 L
2089  389 mt 2089  442 L
2056 4759 mt 
(0) s
2684 4614 mt 2684 4560 L
2684  389 mt 2684  442 L
2601 4759 mt 
(0.5) s
3279 4614 mt 3279 4560 L
3279  389 mt 3279  442 L
3246 4759 mt 
(1) s
3874 4614 mt 3874 4560 L
3874  389 mt 3874  442 L
3791 4759 mt 
(1.5) s
4469 4614 mt 4469 4560 L
4469  389 mt 4469  442 L
4436 4759 mt 
(2) s
5064 4614 mt 5064 4560 L
5064  389 mt 5064  442 L
4981 4759 mt 
(2.5) s
5659 4614 mt 5659 4560 L
5659  389 mt 5659  442 L
5626 4759 mt 
(3) s
6255 4614 mt 6255 4560 L
6255  389 mt 6255  442 L
6172 4759 mt 
(3.5) s
 899 4614 mt  952 4614 L
6255 4614 mt 6201 4614 L
 728 4658 mt 
(-1) s
 899 4191 mt  952 4191 L
6255 4191 mt 6201 4191 L
 628 4235 mt 
(-0.8) s
 899 3769 mt  952 3769 L
6255 3769 mt 6201 3769 L
 628 3813 mt 
(-0.6) s
 899 3346 mt  952 3346 L
6255 3346 mt 6201 3346 L
 628 3390 mt 
(-0.4) s
 899 2924 mt  952 2924 L
6255 2924 mt 6201 2924 L
 628 2968 mt 
(-0.2) s
 899 2501 mt  952 2501 L
6255 2501 mt 6201 2501 L
 798 2545 mt 
(0) s
 899 2078 mt  952 2078 L
6255 2078 mt 6201 2078 L
 698 2122 mt 
(0.2) s
 899 1656 mt  952 1656 L
6255 1656 mt 6201 1656 L
 698 1700 mt 
(0.4) s
 899 1234 mt  952 1234 L
6255 1234 mt 6201 1234 L
 698 1278 mt 
(0.6) s
 899  811 mt  952  811 L
6255  811 mt 6201  811 L
 698  855 mt 
(0.8) s
 899  389 mt  952  389 L
6255  389 mt 6201  389 L
 798  433 mt 
(1) s
 899  389 mt 6255  389 L
 899 4614 mt 6255 4614 L
6255 4614 mt 6255  389 L
 899 4614 mt  899  389 L
gs 899 389 5357 4226 MR c np
24 w
gr

24 w
gs 801 1769 5060 1887 MR c np
  36   36  899 2501 FO
  36   36 1058 3029 FO
  36   36 1494 3416 FO
  36   36 2089 3557 FO
  36   36 2684 3416 FO
  36   36 3119 3029 FO
  36   36 3279 2501 FO
  36   36 3327 2184 FO
  36   36 3457 1952 FO
  36   36 3636 1867 FO
  36   36 3922 1867 FO
  36   36 4264 1867 FO
  36   36 4676 1867 FO
  36   36 5169 1867 FO
  36   36 5762 1867 FO
gr

gs 899 389 5357 4226 MR c np
gr

%%IncludeResource: font Helvetica
/Helvetica /WindowsLatin1Encoding 216 FMSR

3522 4973 mt 
(x) s
 573 2556 mt  -90 rotate
(y) s
90 rotate
6 w

end

eplot
%%EndObject

epage
end

showpage

%%Trailer
%%BoundingBox:    47   193   549   589
%%Pages: 001
%%EOF