fig5_23e.eps

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

%!PS-Adobe-2.0 EPSF-1.2
%%Creator: MATLAB, The Mathworks, Inc.
%%Title: fig5_23e.eps
%%CreationDate: 10/05/99  21:12:26
%%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
36 -571 43 -656 43 -669 42 -707 43 -773 42 -823 43 -502 43 105 
42 179 43 97 42 31 43 -11 43 -39 42 -54 43 -61 43 -63 
42 -59 43 -51 42 -40 43 -27 43 -15 42 -3 43 7 43 15 
42 20 43 24 42 27 43 27 43 27 42 27 43 26 43 24 
42 24 43 21 42 20 43 19 43 17 42 15 43 14 43 12 
42 12 43 9 42 9 43 7 43 7 42 5 43 4 42 2 
43 2 43 1 902 4188 51 MP stroke
43 1 42 2 43 3 43 3 42 4 43 5 42 6 43 7 
43 8 42 9 43 10 42 11 43 13 43 13 42 15 43 16 
43 16 42 18 43 19 42 20 43 20 43 22 42 21 43 22 
43 22 42 21 43 21 42 19 43 18 43 16 42 12 43 8 
43 2 42 -5 43 -15 42 -26 43 -42 43 -62 42 -82 43 -99 
43 -83 42 25 43 234 42 403 43 460 43 459 42 444 43 431 
42 423 43 422 43 425 42 435 43 449 8 92 3963 -100 55 MP stroke

gr 

end

eplot
%%EndObject graph 1

epage
end

showpage

%%Trailer
%%EOF