f7_30.eps

Gives all the matlab codes for dynamic simulation of electric machinery by Chee-Mun Ong

%!PS-Adobe-2.0 EPSF-1.2
%%Creator: MATLAB, The Mathworks, Inc.
%%Title: F7_30.eps
%%CreationDate: 07/15/97  14:35:27
%%DocumentNeededFonts: Helvetica
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%Pages: 1
%%BoundingBox:   115   127   491   644
%%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:   115   127   491   644
MathWorks begin
bpage
%%EndPageSetup

%%BeginObject: graph1 1
bplot

/dpi2point 12 def
portraitMode 1080 7992 csm

  306   262  4516  6206 MR c np
86 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 5184 6913 PR
6 w
0 1134 4017 0 0 -1134 673 3152 4 MP
PP
-4017 0 0 1134 4017 0 0 -1134 673 3152 5 MP stroke
DO
4 w
SO
6 w
0 sg
 673 3152 mt 4690 3152 L
 673 2018 mt 4690 2018 L
 673 3152 mt  673 2018 L
4690 3152 mt 4690 2018 L
 673 3152 mt 4690 3152 L
 673 3152 mt  673 2018 L
 673 3152 mt  673 3112 L
 673 2018 mt  673 2058 L
%%IncludeResource: font Helvetica
/Helvetica /WindowsLatin1Encoding 120 FMSR

 640 3298 mt 
(0) s
2012 3152 mt 2012 3112 L
2012 2018 mt 2012 2058 L
1929 3298 mt 
(0.5) s
3351 3152 mt 3351 3112 L
3351 2018 mt 3351 2058 L
3318 3298 mt 
(1) s
4690 3152 mt 4690 3112 L
4690 2018 mt 4690 2058 L
4607 3298 mt 
(1.5) s
 673 3152 mt  713 3152 L
4690 3152 mt 4650 3152 L
 572 3196 mt 
(0) s
 673 2774 mt  713 2774 L
4690 2774 mt 4650 2774 L
 572 2818 mt 
(1) s
 673 2396 mt  713 2396 L
4690 2396 mt 4650 2396 L
 572 2440 mt 
(2) s
 673 2018 mt  713 2018 L
4690 2018 mt 4650 2018 L
 572 2062 mt 
(3) s
 673 3152 mt 4690 3152 L
 673 2018 mt 4690 2018 L
 673 3152 mt  673 2018 L
4690 3152 mt 4690 2018 L
gs 673 2018 4018 1135 MR c np
1 1 1 0 1 1 1 1 1 0 1 1 1 1 2 0 
1 1 1 1 1 0 1 1 1 1 1 0 1 1 1 1 
1 1 1 0 1 1 1 1 1 0 1 1 1 1 1 1 
1 0 2 1 1 1 1 1 1 0 1 1 1 1 1 0 
1 1 1 1 1 0 1 1 1 1 1 1 1 0 1 1 
1 1 1 0 2 1 1 1 1 0 1 1 1 1 1 0 
1 1 1 0 1 1 1 1 1 0 1 1 1 1 1 0 
1 1 1 1 1 1 2 0 1 1 1 1 1 0 1 1 
1 1 1 0 1 1 1 1 1 0 1 1 1 1 1 0 
1 1 1 1 1 0 1 1 2 1 1 0 1 1 1 1 
1 0 1 1 1 1 1 0 1 1 1 0 1 1 1 1 
1 0 1 1 1 0 1 1 1 1 2 0 1 1 1 0 
1 1 1 1 1 0 4585 2602 100 MP stroke
1 1 1 1 1 0 1 1 1 0 1 1 1 1 1 0 
1 1 1 1 1 0 2 1 1 0 1 1 1 1 1 0 
1 1 1 0 1 1 1 1 1 0 1 1 1 0 1 1 
1 0 1 1 1 0 1 1 2 1 1 0 1 1 1 0 
1 1 1 0 1 1 1 0 1 1 1 0 1 1 1 0 
1 1 1 0 1 1 1 0 1 1 2 0 1 1 1 0 
1 1 1 0 1 1 1 0 1 1 1 0 1 1 1 1 
1 0 1 1 1 0 1 1 1 0 1 0 2 1 1 0 
1 1 1 0 1 1 1 0 1 1 1 0 1 0 1 1 
1 0 1 1 1 0 1 0 1 1 1 0 1 1 2 0 
1 0 1 1 1 0 1 0 1 1 1 0 1 1 1 0 
1 0 1 1 1 0 1 1 1 0 1 0 1 1 1 0 
2 1 1 0 1 0 4480 2553 100 MP stroke
1 1 1 0 1 0 1 1 1 0 1 0 1 1 1 0 
1 0 1 1 1 0 1 0 1 1 1 0 2 0 1 0 
1 1 1 0 1 0 1 0 1 1 1 0 1 0 1 0 
1 0 1 1 1 0 1 0 1 0 1 1 1 0 2 0 
1 0 1 1 1 0 1 0 1 0 1 1 1 0 1 0 
1 0 1 0 1 1 1 0 1 0 1 0 1 0 1 1 
2 0 1 0 1 0 1 0 1 0 1 0 1 1 1 0 
1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 
1 0 2 0 1 0 1 1 1 0 1 0 1 0 1 0 
1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 
1 0 1 0 1 1 2 0 1 0 1 0 1 0 1 0 
1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 0 
1 -1 1 0 1 0 4376 2538 100 MP stroke
1 0 2 0 1 0 1 0 1 0 1 0 1 -1 1 0 
1 0 1 0 1 0 1 0 1 0 1 0 1 0 1 -1 
1 0 1 0 2 0 1 0 1 0 1 0 1 0 1 0 
1 -1 1 0 1 0 1 0 1 0 1 0 1 0 1 -1 
1 0 1 0 1 0 2 0 1 -1 1 0 1 0 1 0 
1 -1 1 0 1 0 1 0 1 -1 1 0 1 0 1 -1 
1 0 1 0 1 -1 1 0 2 0 1 0 1 -1 1 0 
1 0 1 -1 1 0 1 0 1 -1 1 0 1 0 1 0 
1 -1 1 0 1 0 1 -1 1 0 2 0 1 0 1 -1 
1 0 1 0 1 -1 1 0 1 -1 1 0 1 0 1 -1 
1 0 1 -1 1 0 1 -1 1 0 1 0 2 -1 1 0 
1 -1 1 0 1 -1 1 0 1 -1 1 0 1 -1 1 0 
1 -1 1 0 1 -1 4271 2565 100 MP stroke
1 0 1 -1 1 0 1 -1 2 0 1 -1 1 0 1 0 
1 -1 1 0 1 -1 1 0 1 -1 1 0 1 -1 1 0 
1 -1 1 0 1 -1 1 0 1 -1 2 0 1 -1 1 -1 
1 0 1 -1 1 0 1 -1 1 -1 1 0 1 -1 1 -1 
1 0 1 -1 1 -1 1 0 1 -1 1 0 2 -1 1 -1 
1 0 1 -1 1 -1 1 0 1 -1 1 0 1 -1 1 -1 
1 0 1 -1 1 0 1 -1 1 -1 1 0 1 -1 2 -1 
1 0 1 -1 1 0 1 -1 1 -1 1 0 1 -1 1 -1 
1 -1 1 0 1 -1 1 -1 1 -1 1 0 1 -1 1 -1 
2 -1 1 0 1 -1 1 -1 1 -1 1 -1 1 0 1 -1 
1 -1 1 -1 1 0 1 -1 1 -1 1 -1 1 0 1 -1 
1 -1 2 -1 1 0 1 -1 1 -1 1 0 1 -1 1 -1 
1 -1 1 0 1 -1 4166 2628 100 MP stroke
1 -1 1 -1 1 0 1 -1 1 -1 1 -1 1 -1 2 0 
1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 0 
1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 
2 0 1 -1 1 -1 1 -1 1 -1 1 -1 1 0 1 -1 
1 -1 1 -1 1 -1 1 0 1 -1 1 -1 1 -1 1 -1 
1 0 2 -1 1 -1 1 -1 1 -1 1 -1 1 0 1 -1 
1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 
1 -1 1 -1 1 -1 2 -1 1 -1 1 -1 1 -1 1 -1 
1 0 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 
1 -1 1 0 1 -1 1 -1 2 -1 1 -1 1 -1 1 -1 
1 0 1 -1 1 -1 1 -1 1 -1 1 -1 1 0 1 -1 
1 -1 1 -1 1 -1 1 -1 1 -1 2 -1 1 -1 1 -1 
1 -1 1 -1 1 -1 4061 2715 100 MP stroke
1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 
1 -1 1 -1 1 -1 2 -1 1 0 1 -1 1 -1 1 -1 
1 -1 1 -1 1 -1 1 0 1 -1 1 -1 1 -1 1 -1 
1 -1 1 0 1 -1 1 -1 2 -1 1 -1 1 -1 1 -1 
1 -1 1 0 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 
1 -1 1 -1 1 -1 1 -1 1 -1 2 -1 1 -1 1 -1 
1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 0 
1 -1 1 -1 1 -1 1 -1 1 0 1 -1 2 -1 1 -1 
1 -1 1 0 1 -1 1 -1 1 -1 1 -1 1 0 1 -1 
1 -1 1 -1 1 -1 1 -1 1 -1 1 0 1 -1 2 -1 
1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 1 -1 
1 -1 1 -1 1 0 1 -1 1 -1 1 -1 1 -1 1 -1 
2 -1 1 0 1 -1 3956 2803 100 MP stroke
1 -1 1 -1 1 0 1 -1 1 -1 1 0 1 -1 1 -1 
1 -1 1 0 1 -1 1 -1 1 0 1 -1 2 -1 1 -1