s3g.m

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

		'A','[]',...
		'B','[]',...
		'C','[]',...
		'D','K',...
		'Mask Display','K',...
		'Mask Type','Matrix Gain',...
		'Mask Dialogue','Matrix Gain.|Gain matrix:')
set_param([sys,'/',['gen/Rotor/Matrix',13,'Gain3']],...
		'Mask Translate','K = @1;',...
		'Mask Help','Multiplies input vector by entered matrix to produce output vector (y=Au).',...
		'Mask Entries','temmask\/')
set_param([sys,'/',['gen/Rotor/Matrix',13,'Gain3']],...
		'position',[175,106,200,134])

add_block('built-in/Sum',[sys,'/','gen/Rotor/Sum2'])
set_param([sys,'/','gen/Rotor/Sum2'],...
		'position',[230,76,250,134])

add_block('built-in/Integrator',[sys,'/',['gen/Rotor/modal',13,'angles']])
set_param([sys,'/',['gen/Rotor/modal',13,'angles']],...
		'Initial','thetam2to6o',...
		'position',[480,87,510,123])

add_block('built-in/State-Space',[sys,'/',['gen/Rotor/Modal',13,'speed']])
set_param([sys,'/',['gen/Rotor/Modal',13,'speed']],...
		'A','[]',...
		'B','[]',...
		'C','[]',...
		'D','K',...
		'Mask Display','K',...
		'Mask Type','Matrix Gain',...
		'Mask Dialogue','Matrix Gain.|Gain matrix:')
set_param([sys,'/',['gen/Rotor/Modal',13,'speed']],...
		'Mask Translate','K = @1;',...
		'Mask Help','Multiplies input vector by entered matrix to produce output vector (y=Au).',...
		'Mask Entries','omegam2to6\/')
set_param([sys,'/',['gen/Rotor/Modal',13,'speed']],...
		'position',[510,31,535,59])

add_block('built-in/Gain',[sys,'/','gen/Rotor/Gain5'])
set_param([sys,'/','gen/Rotor/Gain5'],...
		'orientation',2,...
		'Gain','wmi_xi_2',...
		'position',[325,25,425,65])

add_block('built-in/Gain',[sys,'/','gen/Rotor/Gain6'])
set_param([sys,'/','gen/Rotor/Gain6'],...
		'orientation',2,...
		'Gain','wmi_wmi',...
		'position',[345,140,445,180])

add_block('built-in/Sum',[sys,'/','gen/Rotor/Sum'])
set_param([sys,'/','gen/Rotor/Sum'],...
		'inputs','-+-',...
		'position',[345,78,360,132])

add_block('built-in/State-Space',[sys,'/',['gen/Rotor/Matrix',13,'Gain']])
set_param([sys,'/',['gen/Rotor/Matrix',13,'Gain']],...
		'A','[]',...
		'B','[]',...
		'C','[]',...
		'D','K',...
		'Mask Display','K',...
		'Mask Type','Matrix Gain',...
		'Mask Dialogue','Matrix Gain.|Gain matrix:')
set_param([sys,'/',['gen/Rotor/Matrix',13,'Gain']],...
		'Mask Translate','K = @1;',...
		'Mask Help','Multiplies input vector by entered matrix to produce output vector (y=Au).',...
		'Mask Entries','tdisk2m\/',...
		'position',[265,90,295,120])

add_block('built-in/Integrator',[sys,'/','gen/Rotor/modal_speed'])
set_param([sys,'/','gen/Rotor/modal_speed'],...
		'Initial','[0; 0 ; 0 ;0 ;0 ]',...
		'position',[395,84,425,126])

add_block('built-in/Outport',[sys,'/','gen/Rotor/wr//wb '])
set_param([sys,'/','gen/Rotor/wr//wb '],...
		'Port','2',...
		'position',[765,85,785,105])

add_block('built-in/Outport',[sys,'/','gen/Rotor/(wr-we)//wb'])
set_param([sys,'/','gen/Rotor/(wr-we)//wb'],...
		'Port','4',...
		'position',[760,45,780,65])

add_block('built-in/Sum',[sys,'/','gen/Rotor/Sum14'])
set_param([sys,'/','gen/Rotor/Sum14'],...
		'position',[710,76,725,109])

add_block('built-in/Constant',[sys,'/','gen/Rotor/we//wb'])
set_param([sys,'/','gen/Rotor/we//wb'],...
		'position',[645,88,675,112])

add_block('built-in/Sum',[sys,'/','gen/Rotor/Sum1'])
set_param([sys,'/','gen/Rotor/Sum1'],...
		'position',[665,37,680,68])

add_block('built-in/Mux',[sys,'/',['gen/Rotor/Modal',13,'angle']])
set_param([sys,'/',['gen/Rotor/Modal',13,'angle']],...
		'inputs','2',...
		'position',[595,191,620,224])

add_block('built-in/Gain',[sys,'/','gen/Rotor/gain4'])
set_param([sys,'/','gen/Rotor/gain4'],...
		'Gain','wb',...
		'position',[470,184,505,216])

add_block('built-in/Integrator',[sys,'/','gen/Rotor/delta_mode0'])
set_param([sys,'/','gen/Rotor/delta_mode0'],...
		'Initial','delio',...
		'position',[525,183,555,217])

add_block('built-in/Sum',[sys,'/','gen/Rotor/Sum4'])
set_param([sys,'/','gen/Rotor/Sum4'],...
		'inputs','+-',...
		'position',[785,155,800,190])

add_block('built-in/Sum',[sys,'/','gen/Rotor/Sum3'])
set_param([sys,'/','gen/Rotor/Sum3'],...
		'inputs','+-',...
		'position',[780,260,795,295])

add_block('built-in/Outport',[sys,'/','gen/Rotor/delta_gen'])
set_param([sys,'/','gen/Rotor/delta_gen'],...
		'position',[815,215,835,235])

add_block('built-in/Gain',[sys,'/','gen/Rotor/Gain'])
set_param([sys,'/','gen/Rotor/Gain'],...
		'Gain','k(2)',...
		'position',[815,157,850,193])

add_block('built-in/Gain',[sys,'/','gen/Rotor/Gain1'])
set_param([sys,'/','gen/Rotor/Gain1'],...
		'Gain','k(5)',...
		'position',[810,263,850,297])

add_block('built-in/Outport',[sys,'/',['gen/Rotor/LPA-LPB',13,'Shaft_torque']])
set_param([sys,'/',['gen/Rotor/LPA-LPB',13,'Shaft_torque']],...
		'Port','5',...
		'position',[880,165,900,185])

add_block('built-in/State-Space',[sys,'/','gen/Rotor/Qbar'])
set_param([sys,'/','gen/Rotor/Qbar'],...
		'A','[]',...
		'B','[]',...
		'C','[]',...
		'D','K',...
		'Mask Display','K',...
		'Mask Type','Matrix Gain',...
		'Mask Dialogue','Matrix Gain.|Gain matrix:',...
		'Mask Translate','K = @1;')
set_param([sys,'/','gen/Rotor/Qbar'],...
		'Mask Help','Multiplies input vector by entered matrix to produce output vector (y=Au).',...
		'Mask Entries','Qbar\/',...
		'position',[645,196,670,224])

add_block('built-in/Demux',[sys,'/',['gen/Rotor/Mass',13,'angle']])
set_param([sys,'/',['gen/Rotor/Mass',13,'angle']],...
		'outputs','6',...
		'position',[685,175,730,245])

add_block('built-in/Outport',[sys,'/',['gen/Rotor/Gen-Exc',13,'Shaft_torque']])
set_param([sys,'/',['gen/Rotor/Gen-Exc',13,'Shaft_torque']],...
		'Port','6',...
		'position',[875,270,895,290])

add_block('built-in/Note',[sys,'/',['gen/Rotor/Tem negative',13,' for generating  ']])
set_param([sys,'/',['gen/Rotor/Tem negative',13,' for generating  ']],...
		'position',[320,325,325,330])
add_line([sys,'/','gen/Rotor'],[225,200;190,200;190,240;205,240])
add_line([sys,'/','gen/Rotor'],[155,280;205,280])
add_line([sys,'/','gen/Rotor'],[510,200;520,200])
add_line([sys,'/','gen/Rotor'],[120,305;125,305])
add_line([sys,'/','gen/Rotor'],[370,260;385,260])
add_line([sys,'/','gen/Rotor'],[680,100;705,100])
add_line([sys,'/','gen/Rotor'],[230,260;240,260])
add_line([sys,'/','gen/Rotor'],[120,255;125,255])
add_line([sys,'/','gen/Rotor'],[75,210;80,210;80,250;95,250])
add_line([sys,'/','gen/Rotor'],[75,260;95,260])
add_line([sys,'/','gen/Rotor'],[75,300;95,300])
add_line([sys,'/','gen/Rotor'],[75,350;80,350;80,310;95,310])
add_line([sys,'/','gen/Rotor'],[730,95;760,95])
add_line([sys,'/','gen/Rotor'],[155,280;165,280;165,335;230,335])
add_line([sys,'/','gen/Rotor'],[425,260;445,260;445,200;315,200])
add_line([sys,'/','gen/Rotor'],[75,170;175,170;175,260;205,260])
add_line([sys,'/','gen/Rotor'],[430,105;455,105;455,45;430,45])
add_line([sys,'/','gen/Rotor'],[320,45;310,45;310,85;340,85])
add_line([sys,'/','gen/Rotor'],[300,105;340,105])
add_line([sys,'/','gen/Rotor'],[255,105;260,105])
add_line([sys,'/','gen/Rotor'],[155,280;165,280;165,210;140,210;140,120;170,120])
add_line([sys,'/','gen/Rotor'],[205,120;225,120])
add_line([sys,'/','gen/Rotor'],[145,90;225,90])
add_line([sys,'/','gen/Rotor'],[75,170;85,170;85,90;110,90])
add_line([sys,'/','gen/Rotor'],[365,105;390,105])
add_line([sys,'/','gen/Rotor'],[455,105;475,105])
add_line([sys,'/','gen/Rotor'],[515,105;530,105;530,160;450,160])
add_line([sys,'/','gen/Rotor'],[340,160;320,160;320,125;340,125])
add_line([sys,'/','gen/Rotor'],[685,55;690,55;690,85;705,85])
add_line([sys,'/','gen/Rotor'],[430,105;455,105;455,45;505,45])
add_line([sys,'/','gen/Rotor'],[685,55;755,55])
add_line([sys,'/','gen/Rotor'],[425,260;445,260;445,200;465,200])
add_line([sys,'/','gen/Rotor'],[540,45;660,45])
add_line([sys,'/','gen/Rotor'],[445,260;630,260;630,60;660,60])
add_line([sys,'/','gen/Rotor'],[515,105;565,105;565,215;590,215])
add_line([sys,'/','gen/Rotor'],[560,200;590,200])
add_line([sys,'/','gen/Rotor'],[625,210;640,210])
add_line([sys,'/','gen/Rotor'],[675,210;680,210])
add_line([sys,'/','gen/Rotor'],[735,225;810,225])
add_line([sys,'/','gen/Rotor'],[735,205;760,205;760,165;780,165])
add_line([sys,'/','gen/Rotor'],[735,215;765,215;765,180;780,180])
add_line([sys,'/','gen/Rotor'],[735,225;765,225;775,270])
add_line([sys,'/','gen/Rotor'],[735,235;755,235;755,285;775,285])
add_line([sys,'/','gen/Rotor'],[805,175;810,175])
add_line([sys,'/','gen/Rotor'],[800,280;805,280])
add_line([sys,'/','gen/Rotor'],[855,175;875,175])
add_line([sys,'/','gen/Rotor'],[855,280;870,280])


%     Finished composite block 'gen/Rotor'.

set_param([sys,'/','gen/Rotor'],...
		'Font Number',3,...
		'position',[495,183,540,322])

add_block('built-in/Outport',[sys,'/','gen/out_delta_gen'])
set_param([sys,'/','gen/out_delta_gen'],...
		'Port','5',...
		'position',[630,180,650,200])

add_block('built-in/Outport',[sys,'/','gen/out_(wr-we)//wb'])
set_param([sys,'/','gen/out_(wr-we)//wb'],...
		'Port','7',...
		'position',[695,255,715,275])

add_block('built-in/Outport',[sys,'/','gen/out_LPA-LPB'])
set_param([sys,'/','gen/out_LPA-LPB'],...
		'Port','10',...
		'position',[625,280,645,300])

add_block('built-in/Outport',[sys,'/','gen/out_Tem'])
set_param([sys,'/','gen/out_Tem'],...
		'Port','6',...
		'position',[625,230,645,250])

add_block('built-in/Outport',[sys,'/','gen/out_Gen-Exc'])
set_param([sys,'/','gen/out_Gen-Exc'],...
		'Port','11',...
		'position',[695,305,715,325])
add_line([sys,'/','gen'],[305,205;365,205;365,155;325,155])
add_line([sys,'/','gen'],[305,305;355,305;355,125;290,125])
add_line([sys,'/','gen'],[545,215;560,215;560,140;290,140])
add_line([sys,'/','gen'],[545,215;560,215;560,170;325,170])
add_line([sys,'/','gen'],[305,325;380,325;380,280;490,280])
add_line([sys,'/','gen'],[305,305;430,305;430,230;490,230])
add_line([sys,'/','gen'],[300,165;230,165;230,335;255,335])
add_line([sys,'/','gen'],[545,190;625,190])
add_line([sys,'/','gen'],[545,240;620,240])
add_line([sys,'/','gen'],[215,360;255,360])
add_line([sys,'/','gen'],[545,265;690,265])
add_line([sys,'/','gen'],[475,305;490,305])
add_line([sys,'/','gen'],[180,285;220,285;220,310;255,310])
add_line([sys,'/','gen'],[305,230;405,230;405,65;485,65])
add_line([sys,'/','gen'],[305,325;380,325;380,115;485,115])
add_line([sys,'/','gen'],[180,250;205,250;205,40;485,40])
add_line([sys,'/','gen'],[180,285;220,285;220,90;485,90])
add_line([sys,'/','gen'],[55,240;130,240])
add_line([sys,'/','gen'],[105,265;130,265])
add_line([sys,'/','gen'],[545,190;590,190;590,445;405,445;405,410;445,410])
add_line([sys,'/','gen'],[545,190;590,190;590,445;115,445;115,290;130,290])
add_line([sys,'/','gen'],[305,230;405,230;405,380;445,380])
add_line([sys,'/','gen'],[305,325;380,325;380,395;445,395])
add_line([sys,'/','gen'],[305,205;490,205])
add_line([sys,'/','gen'],[305,230;405,230;405,255;490,255])
add_line([sys,'/','gen'],[495,385;520,385])
add_line([sys,'/','gen'],[495,410;620,410])
add_line([sys,'/','gen'],[530,40;575,40])
add_line([sys,'/','gen'],[530,90;575,90])
add_line([sys,'/','gen'],[530,115;635,115])
add_line([sys,'/','gen'],[530,65;635,65])
add_line([sys,'/','gen'],[180,250;205,250;205,215;255,215])
add_line([sys,'/','gen'],[265,135;240,135;240,250;255,250])
add_line([sys,'/','gen'],[545,290;620,290])
add_line([sys,'/','gen'],[545,315;690,315])


%     Finished composite block 'gen'.

set_param([sys,'/','gen'],...
		'position',[120,51,190,229])

add_block('built-in/Note',[sys,'/','Gen_Exc'])
set_param([sys,'/','Gen_Exc'],...
		'position',[270,190,275,195])

add_block('built-in/Note',[sys,'/','LPA_LPB'])
set_param([sys,'/','LPA_LPB'],...
		'position',[270,161,275,166])

add_block('built-in/Note',[sys,'/','delta'])
set_param([sys,'/','delta'],...
		'position',[260,137,265,142])

add_block('built-in/Note',[sys,'/','Qgen'])
set_param([sys,'/','Qgen'],...
		'position',[265,105,270,110])

add_block('built-in/Note',[sys,'/','Pgen'])
set_param([sys,'/','Pgen'],...
		'position',[265,75,270,80])

add_block('built-in/Note',[sys,'/','|it|'])
set_param([sys,'/','|it|'],...
		'position',[265,45,270,50])

add_block('built-in/Mux',[sys,'/','Mux'])
set_param([sys,'/','Mux'],...
		'inputs','7',...
		'position',[315,16,340,234])

add_block('built-in/To Workspace',[sys,'/','To Workspace'])
set_param([sys,'/','To Workspace'],...
		'mat-name','y',...
		'buffer','8000',...
		'position',[385,37,435,53])

add_block('built-in/Scope',[sys,'/','Scope'])
set_param([sys,'/','Scope'],...
		'Vgain','2.000000',...
		'Hgain','10.000000',...
		'Vmax','4.000000',...
		'Hmax','20.000000',...
		'Window',[78,341,692,489])
open_system([sys,'/','Scope'])
set_param([sys,'/','Scope'],...
		'position',[385,113,410,137])


%     Subsystem  'm3g'.

new_system([sys,'/','m3g'])
set_param([sys,'/','m3g'],'Location',[335,6685173,448,6685263])

add_block('built-in/Note',[sys,'/',['m3g/Masked block of m3g.m to initialize',13,'s3g.m in Chapter 10 and plot results']])
set_param([sys,'/',['m3g/Masked block of m3g.m to initialize',13,'s3g.m in Chapter 10 and plot results']],...
		'position',[55,50,60,55])
set_param([sys,'/','m3g'],...
		'Mask Display','Initialize\nand plot',...
		'Mask Type','Masked block of m3g.m',...
		'Mask Dialogue','eval(''m3g'')',...
		'Mask Help','Uses m3g.m to initialize and plot')


%     Finished composite block 'm3g'.

set_param([sys,'/','m3g'],...
		'Drop Shadow',4,...
		'position',[361,187,432,225])
add_line(sys,[95,165;115,165])
add_line(sys,[95,210;115,210])
add_line(sys,[95,75;115,75])
add_line(sys,[95,120;115,120])
add_line(sys,[245,35;310,35])
add_line(sys,[195,80;225,80;225,65;310,65])
add_line(sys,[195,95;310,95])
add_line(sys,[195,110;230,110;230,125;310,125])
add_line(sys,[195,125;215,125;215,155;310,155])
add_line(sys,[195,200;220,200;220,185;310,185])
add_line(sys,[195,215;310,215])
add_line(sys,[345,125;380,125])
add_line(sys,[345,125;355,125;355,45;380,45])

drawnow

% Return any arguments.
if (nargin | nargout)
	% Must use feval here to access system in memory
	if (nargin > 3)
		if (flag == 0)
			eval(['[ret,x0,str,ts,xts]=',sys,'(t,x,u,flag);'])
		else
			eval(['ret =', sys,'(t,x,u,flag);'])
		end
	else
		[ret,x0,str,ts,xts] = feval(sys);
	end
else
	drawnow % Flash up the model and execute load callback
end