s2o.m

simulink electrical machine(2)

set_param([sys,'/',['Variable ',13,'Freq. source/-1']],...
		'Gain','-1',...
		'position',[185,233,225,267])

add_block('built-in/Integrator',[sys,'/',['Variable ',13,'Freq. source/cos']])
set_param([sys,'/',['Variable ',13,'Freq. source/cos']],...
		'Initial','1',...
		'position',[235,120,270,160])


%     Subsystem  ['Variable ',13,'Freq. source/Inner',13,'Product1'].

new_system([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],'Location',[33,479,253,634])

add_block('built-in/Product',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/Product']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/Product']],...
		'position',[65,55,90,75])

add_block('built-in/Sum',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/Sum']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/Sum']],...
		'inputs','+',...
		'position',[125,55,145,75])

add_block('built-in/Outport',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/out_1']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/out_1']],...
		'position',[185,55,205,75])

add_block('built-in/Inport',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/in_2']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/in_2']],...
		'Port','2',...
		'position',[15,90,35,110])

add_block('built-in/Inport',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/in_1']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1/in_1']],...
		'position',[15,25,35,45])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],[40,100;60,70])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],[40,35;60,60])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],[95,65;120,65])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],[150,65;180,65])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],...
		'Mask Display','.\n',...
		'Mask Type','Dot Product',...
		'Mask Dialogue','Inner (dot) product.\ny=sum(u1.*u2)')
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],...
		'Mask Help','Computes the inner (dot) product of the inputs: sum(u1.*u2).  The inputs are vectors of the same length. Output is a scalar.')


%     Finished composite block ['Variable ',13,'Freq. source/Inner',13,'Product1'].

set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product1']],...
		'position',[170,120,195,155])


%     Subsystem  ['Variable ',13,'Freq. source/Inner',13,'Product'].

new_system([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],'Location',[33,479,253,634])

add_block('built-in/Product',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/Product']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/Product']],...
		'position',[65,55,90,75])

add_block('built-in/Sum',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/Sum']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/Sum']],...
		'inputs','+',...
		'position',[125,55,145,75])

add_block('built-in/Outport',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/out_1']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/out_1']],...
		'position',[185,55,205,75])

add_block('built-in/Inport',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/in_2']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/in_2']],...
		'Port','2',...
		'position',[15,90,35,110])

add_block('built-in/Inport',[sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/in_1']])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product/in_1']],...
		'position',[15,25,35,45])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],[40,100;60,70])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],[40,35;60,60])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],[95,65;120,65])
add_line([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],[150,65;180,65])
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],...
		'Mask Display','.\n',...
		'Mask Type','Dot Product',...
		'Mask Dialogue','Inner (dot) product.\ny=sum(u1.*u2)')
set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],...
		'Mask Help','Computes the inner (dot) product of the inputs: sum(u1.*u2).  The inputs are vectors of the same length. Output is a scalar.')


%     Finished composite block ['Variable ',13,'Freq. source/Inner',13,'Product'].

set_param([sys,'/',['Variable ',13,'Freq. source/Inner',13,'Product']],...
		'position',[135,231,160,264])

add_block('built-in/Integrator',[sys,'/',['Variable ',13,'Freq. source/sin']])
set_param([sys,'/',['Variable ',13,'Freq. source/sin']],...
		'position',[245,231,280,269])
add_line([sys,'/',['Variable ',13,'Freq. source']],[55,130;165,130])
add_line([sys,'/',['Variable ',13,'Freq. source']],[55,130;120,130;130,240])
add_line([sys,'/',['Variable ',13,'Freq. source']],[230,250;240,250])
add_line([sys,'/',['Variable ',13,'Freq. source']],[165,250;180,250])
add_line([sys,'/',['Variable ',13,'Freq. source']],[285,250;295,250;295,210;155,210;165,145])
add_line([sys,'/',['Variable ',13,'Freq. source']],[200,140;230,140])
add_line([sys,'/',['Variable ',13,'Freq. source']],[275,140;285,140;285,100;110,100;110,255;130,255])
add_line([sys,'/',['Variable ',13,'Freq. source']],[375,175;385,175;385,115;410,115])
add_line([sys,'/',['Variable ',13,'Freq. source']],[375,175;405,175])
add_line([sys,'/',['Variable ',13,'Freq. source']],[375,175;385,175;385,235;405,235])
add_line([sys,'/',['Variable ',13,'Freq. source']],[55,130;65,130;65,55;95,55])
add_line([sys,'/',['Variable ',13,'Freq. source']],[535,175;560,175])
add_line([sys,'/',['Variable ',13,'Freq. source']],[540,235;560,235])
add_line([sys,'/',['Variable ',13,'Freq. source']],[275,140;335,140])
add_line([sys,'/',['Variable ',13,'Freq. source']],[285,250;295,250;295,210;335,210])
add_line([sys,'/',['Variable ',13,'Freq. source']],[690,230;715,230])
add_line([sys,'/',['Variable ',13,'Freq. source']],[690,170;710,170])
add_line([sys,'/',['Variable ',13,'Freq. source']],[685,110;715,110])
add_line([sys,'/',['Variable ',13,'Freq. source']],[210,55;625,55;625,225;650,225])
add_line([sys,'/',['Variable ',13,'Freq. source']],[625,105;645,105])
add_line([sys,'/',['Variable ',13,'Freq. source']],[625,165;650,165])
add_line([sys,'/',['Variable ',13,'Freq. source']],[600,235;650,235])
add_line([sys,'/',['Variable ',13,'Freq. source']],[600,175;650,175])
add_line([sys,'/',['Variable ',13,'Freq. source']],[605,115;645,115])
add_line([sys,'/',['Variable ',13,'Freq. source']],[540,115;565,115])


%     Finished composite block ['Variable ',13,'Freq. source'].

set_param([sys,'/',['Variable ',13,'Freq. source']],...
		'position',[75,193,120,267])


%     Subsystem  'qds2abc'.

new_system([sys,'/','qds2abc'])
set_param([sys,'/','qds2abc'],'Location',[487,91,1006,301])

add_block('built-in/Inport',[sys,'/','qds2abc/iqs'])
set_param([sys,'/','qds2abc/iqs'],...
		'position',[45,35,65,55])

add_block('built-in/Inport',[sys,'/','qds2abc/ids'])
set_param([sys,'/','qds2abc/ids'],...
		'Port','2',...
		'position',[45,95,65,115])

add_block('built-in/Inport',[sys,'/','qds2abc/i0s'])
set_param([sys,'/','qds2abc/i0s'],...
		'Port','3',...
		'position',[45,155,65,175])

add_block('built-in/Mux',[sys,'/','qds2abc/Mux'])
set_param([sys,'/','qds2abc/Mux'],...
		'inputs','3',...
		'position',[110,34,135,176])

add_block('built-in/Fcn',[sys,'/','qds2abc/Fcn1'])
set_param([sys,'/','qds2abc/Fcn1'],...
		'Expr','-(u[1]+sqrt(3)*u[2])/2 +u[3]',...
		'position',[185,92,370,118])

add_block('built-in/Outport',[sys,'/','qds2abc/ibs'])
set_param([sys,'/','qds2abc/ibs'],...
		'Port','2',...
		'position',[440,95,460,115])

add_block('built-in/Outport',[sys,'/','qds2abc/ias'])
set_param([sys,'/','qds2abc/ias'],...
		'position',[440,40,460,60])

add_block('built-in/Fcn',[sys,'/','qds2abc/Fcn2'])
set_param([sys,'/','qds2abc/Fcn2'],...
		'Expr','-(u[1]-sqrt(3)*u[2])/2 + u[3]',...
		'position',[185,147,375,173])

add_block('built-in/Fcn',[sys,'/','qds2abc/Fcn'])
set_param([sys,'/','qds2abc/Fcn'],...
		'Expr','u[1] + u[3]',...
		'position',[185,36,375,64])

add_block('built-in/Outport',[sys,'/','qds2abc/ics'])
set_param([sys,'/','qds2abc/ics'],...
		'Port','3',...
		'position',[440,150,460,170])
add_line([sys,'/','qds2abc'],[70,105;105,105])
add_line([sys,'/','qds2abc'],[70,45;80,45;80,60;105,60])
add_line([sys,'/','qds2abc'],[70,165;80,165;80,150;105,150])
add_line([sys,'/','qds2abc'],[140,105;180,105])
add_line([sys,'/','qds2abc'],[375,105;435,105])
add_line([sys,'/','qds2abc'],[380,50;435,50])
add_line([sys,'/','qds2abc'],[140,105;155,105;155,50;180,50])
add_line([sys,'/','qds2abc'],[140,105;155,105;155,160;180,160])
add_line([sys,'/','qds2abc'],[380,160;435,160])


%     Finished composite block 'qds2abc'.

set_param([sys,'/','qds2abc'],...
		'position',[635,207,675,263])

add_block('built-in/Scope',[sys,'/','Scope1'])
set_param([sys,'/','Scope1'],...
		'Vgain','20.000000',...
		'Hgain','0.200000',...
		'Vmax','20.000000',...
		'Hmax','0.377358',...
		'Window',[148,833,1041,1000],...
		'position',[615,23,630,47])

add_block('built-in/To Workspace',[sys,'/','To Workspace'])
set_param([sys,'/','To Workspace'],...
		'orientation',2,...
		'mat-name','y',...
		'buffer','10000',...
		'position',[305,27,345,43])

add_block('built-in/Scope',[sys,'/','Scope'])
set_param([sys,'/','Scope'],...
		'Vgain','300.000000',...
		'Hgain','2.000000',...
		'Vmax','300.000000',...
		'Hmax','3.773585',...
		'Window',[165,605,982,759])
open_system([sys,'/','Scope'])
set_param([sys,'/','Scope'],...
		'position',[505,24,520,46])

add_block('built-in/Mux',[sys,'/','Mux'])
set_param([sys,'/','Mux'],...
		'orientation',3,...
		'inputs','7',...
		'position',[150,65,680,80])

add_block('built-in/Clock',[sys,'/','Clock'])
set_param([sys,'/','Clock'],...
		'position',[140,90,160,110])

add_block('built-in/Note',[sys,'/','psir'])
set_param([sys,'/','psir'],...
		'position',[505,92,510,97])

add_block('built-in/Note',[sys,'/','psis'])
set_param([sys,'/','psis'],...
		'position',[595,90,600,95])


%     Subsystem  'm1o'.

new_system([sys,'/','m1o'])
set_param([sys,'/','m1o'],'Location',[90,5243146,238,5243224])

add_block('built-in/Note',[sys,'/',['m1o/Masked block of m1o.m',13,'to initilialize s2o.m',13,'and to plot the results.']])
set_param([sys,'/',['m1o/Masked block of m1o.m',13,'to initilialize s2o.m',13,'and to plot the results.']],...
		'position',[65,47,70,52])
set_param([sys,'/','m1o'],...
		'Mask Display','Initialize\nand plot',...
		'Mask Type','Masked block of m1o.m',...
		'Mask Dialogue','eval(''m1o'')',...
		'Mask Help','Uses m1o.m to initialize and plot')


%     Finished composite block 'm1o'.

set_param([sys,'/','m1o'],...
		'Drop Shadow',4,...
		'position',[59,129,124,164])

add_block('built-in/Note',[sys,'/',['Induction Machine Simulation  ',13,'in Stationary Reference Frame']])
set_param([sys,'/',['Induction Machine Simulation  ',13,'in Stationary Reference Frame']],...
		'position',[125,25,130,30])
add_line(sys,[370,315;575,315;575,235;630,235])
add_line(sys,[335,255;300,255;300,160;315,160])
add_line(sys,[360,125;560,125;560,230;510,230])
add_line(sys,[230,220;290,220;290,310;325,310])
add_line(sys,[230,200;290,200;290,135;315,135])
add_line(sys,[360,140;575,140;575,215;630,215])
add_line(sys,[600,215;510,215])
add_line(sys,[330,210;310,210;310,335;325,335])
add_line(sys,[370,300;545,300;545,200;510,200])
add_line(sys,[460,250;395,250;395,215;360,215])
add_line(sys,[460,250;365,250])
add_line(sys,[455,280;525,280;525,260;510,260])
add_line(sys,[415,60;415,35;350,35])
add_line(sys,[415,60;415,35;500,35])
add_line(sys,[165,100;190,100;190,85])
add_line(sys,[360,170;380,170;380,205;360,205])
add_line(sys,[125,205;180,205])
add_line(sys,[125,230;180,230])
add_line(sys,[125,255;180,255])
add_line(sys,[125,205;165,205;165,170;265,170;265,85])
add_line(sys,[485,360;610,360;610,255;630,255])
add_line(sys,[680,215;695,215;695,235;710,235])
add_line(sys,[680,235;690,235;690,245;710,245])
add_line(sys,[680,255;710,255])
add_line(sys,[230,240;270,240;270,360;440,360])
add_line(sys,[740,245;745,245;745,400;165,400;165,280;180,280])
add_line(sys,[370,315;535,315;535,245;510,245])
add_line(sys,[370,345;405,345;405,260;365,260])
add_line(sys,[620,135;635,135])
add_line(sys,[360,125;590,125])
add_line(sys,[370,300;545,300;545,145;590,145])
add_line(sys,[445,170;460,170])
add_line(sys,[360,170;380,170;380,160;415,160])
add_line(sys,[370,345;405,345;415,175])
add_line(sys,[460,250;395,250;395,110;340,110;340,85])
add_line(sys,[460,215;450,215;450,105;415,105;415,85])
add_line(sys,[500,170;510,170;510,115;490,115;490,85])
add_line(sys,[685,135;710,135;710,110;565,110;565,85])
add_line(sys,[680,215;735,215;735,95;640,85])

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