fig5_23c.eps

《射频电路设计——理论与应用》一书课后习题第五章Matlab程序代码

%!PS-Adobe-2.0 EPSF-1.2
%%Creator: MATLAB, The Mathworks, Inc.
%%Title: fig5_23c.eps
%%CreationDate: 10/05/99  21:12:25
%%DocumentNeededFonts: Helvetica
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%Pages: 1
%%BoundingBox:    72   209   545   590
%%EndComments

%%BeginProlog

% MathWorks dictionary
/MathWorks 150 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
/rc {rectclip} bdef
/rf {rectfill} bdef
/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

% 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

% coordinate system mappings
/dpi2point 0 def

% font control
/FontSize 0 def
/FMS {
	/FontSize xstore		%save size off stack
	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
	landscapeMode eq {90 rotate} if
	} 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
/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 setlinecap 3 1 roll 2 copy moveto lineto stroke setlinecap
	} bdef

/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



currentdict end def
%%EndProlog

%%BeginSetup
MathWorks begin

0 cap

end
%%EndSetup

%%Page: 1 1
%%BeginPageSetup
%%PageBoundingBox:    72   209   545   590
MathWorks begin
bpage
%%EndPageSetup

%%BeginObject: graph1 1
bplot

/dpi2point 12 def
portraitMode 0204 7344 csm

  662   255  5674  4572 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
1 j
1 sg
   0    0 6912 5184 PR
6 w
0 4224 5356 0 0 -4224 898 4612 4 MP
PP
-5356 0 0 4224 5356 0 0 -4224 898 4612 5 MP stroke
DO
4 w
SO
6 w
0 sg
 898 4612 mt 6254 4612 L
 898  388 mt 6254  388 L
 898 4612 mt  898  388 L
6254 4612 mt 6254  388 L
 898 4612 mt 6254 4612 L
 898 4612 mt  898  388 L
 898 4612 mt  898 4558 L
 898  388 mt  898  442 L
%%IncludeResource: font Helvetica
/Helvetica /WindowsLatin1Encoding 120 FMSR

 865 4758 mt 
(0) s
1434 4612 mt 1434 4558 L
1434  388 mt 1434  442 L
1351 4758 mt 
(0.2) s
1969 4612 mt 1969 4558 L
1969  388 mt 1969  442 L
1886 4758 mt 
(0.4) s
2505 4612 mt 2505 4558 L
2505  388 mt 2505  442 L
2422 4758 mt 
(0.6) s
3040 4612 mt 3040 4558 L
3040  388 mt 3040  442 L
2957 4758 mt 
(0.8) s
3576 4612 mt 3576 4558 L
3576  388 mt 3576  442 L
3543 4758 mt 
(1) s
4112 4612 mt 4112 4558 L
4112  388 mt 4112  442 L
4029 4758 mt 
(1.2) s
4647 4612 mt 4647 4558 L
4647  388 mt 4647  442 L
4564 4758 mt 
(1.4) s
5183 4612 mt 5183 4558 L
5183  388 mt 5183  442 L
5100 4758 mt 
(1.6) s
5718 4612 mt 5718 4558 L
5718  388 mt 5718  442 L
5635 4758 mt 
(1.8) s
6254 4612 mt 6254 4558 L
6254  388 mt 6254  442 L
6221 4758 mt 
(2) s
 898 4612 mt  952 4612 L
6254 4612 mt 6200 4612 L
 797 4656 mt 
(0) s
 898 3908 mt  952 3908 L
6254 3908 mt 6200 3908 L
 797 3952 mt 
(5) s
 898 3204 mt  952 3204 L
6254 3204 mt 6200 3204 L
 730 3248 mt 
(10) s
 898 2500 mt  952 2500 L
6254 2500 mt 6200 2500 L
 730 2544 mt 
(15) s
 898 1796 mt  952 1796 L
6254 1796 mt 6200 1796 L
 730 1840 mt 
(20) s
 898 1092 mt  952 1092 L
6254 1092 mt 6200 1092 L
 730 1136 mt 
(25) s
 898  388 mt  952  388 L
6254  388 mt 6200  388 L
 730  432 mt 
(30) s
 898 4612 mt 6254 4612 L
 898  388 mt 6254  388 L
 898 4612 mt  898  388 L
6254 4612 mt 6254  388 L
gs 898 388 5357 4225 MR c np
43 8 42 8 43 8 43 9 42 9 43 9 42 9 43 9 
43 9 42 10 43 9 42 10 43 10 43 9 42 10 43 10 
43 9 42 10 43 9 42 10 43 9 43 9 42 9 43 9 
43 8 42 8 43 7 42 8 43 6 43 6 42 6 43 4 
43 4 42 3 43 2 42 1 43 -1 43 -1 42 -3 43 -5 
43 -7 42 -8 43 -11 42 -13 43 -16 43 -19 42 -22 43 -25 
42 -28 43 -33 43 -35 42 -39 43 -40 43 -40 42 -37 43 -28 
42 -13 43 11 43 43 42 77 43 112 43 140 42 159 43 171 
42 177 43 179 43 178 42 176 43 174 43 171 42 168 43 165 
42 163 43 160 43 159 42 158 43 157 43 155 42 155 43 155 
42 155 43 155 43 156 42 156 43 158 42 159 43 160 43 162 
23 88 2456 -100 90 MP stroke

gr 

end

eplot
%%EndObject graph 1

epage
end

showpage

%%Trailer
%%EOF