s2.m

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

		'Port','2',...
		'position',[420,120,440,140])

add_block('built-in/Fcn',[sys,'/','tmodel1/qdr2qde/fcn1'])
set_param([sys,'/','tmodel1/qdr2qde/fcn1'],...
		'Expr','-u[1]*sin(u[3]) + u[2]*cos(u[3])',...
		'position',[150,116,360,144])
add_line([sys,'/','tmodel1/qdr2qde'],[365,130;415,130])
add_line([sys,'/','tmodel1/qdr2qde'],[40,50;70,50])
add_line([sys,'/','tmodel1/qdr2qde'],[365,50;415,50])
add_line([sys,'/','tmodel1/qdr2qde'],[105,90;125,90;125,50;150,50])
add_line([sys,'/','tmodel1/qdr2qde'],[105,90;125,90;125,130;145,130])
add_line([sys,'/','tmodel1/qdr2qde'],[40,90;70,90])
add_line([sys,'/','tmodel1/qdr2qde'],[40,130;70,130])


%     Finished composite block 'tmodel1/qdr2qde'.

set_param([sys,'/','tmodel1/qdr2qde'],...
		'position',[525,432,565,488])

add_block('built-in/Outport',[sys,'/','tmodel1/out_Eqpe'])
set_param([sys,'/','tmodel1/out_Eqpe'],...
		'Port','8',...
		'position',[725,435,745,455])


%     Subsystem  'tmodel1/qde2qdr'.

new_system([sys,'/','tmodel1/qde2qdr'])
set_param([sys,'/','tmodel1/qde2qdr'],'Location',[103,460,628,647])

add_block('built-in/Mux',[sys,'/','tmodel1/qde2qdr/Mux'])
set_param([sys,'/','tmodel1/qde2qdr/Mux'],...
		'hide name',0,...
		'inputs','3',...
		'position',[75,50,105,130])

add_block('built-in/Fcn',[sys,'/','tmodel1/qde2qdr/fcn'])
set_param([sys,'/','tmodel1/qde2qdr/fcn'],...
		'Expr','u[1]*cos(u[3]) - u[2]*sin(u[3])',...
		'position',[150,52,390,78])

add_block('built-in/Fcn',[sys,'/','tmodel1/qde2qdr/fcn1'])
set_param([sys,'/','tmodel1/qde2qdr/fcn1'],...
		'Expr','u[1]*sin(u[3]) + u[2]*cos(u[3])',...
		'position',[150,97,390,123])

add_block('built-in/Inport',[sys,'/','tmodel1/qde2qdr/ide'])
set_param([sys,'/','tmodel1/qde2qdr/ide'],...
		'Port','2',...
		'position',[15,80,35,100])

add_block('built-in/Inport',[sys,'/','tmodel1/qde2qdr/delta '])
set_param([sys,'/','tmodel1/qde2qdr/delta '],...
		'Port','3',...
		'position',[15,124,35,146])

add_block('built-in/Inport',[sys,'/','tmodel1/qde2qdr/iqe'])
set_param([sys,'/','tmodel1/qde2qdr/iqe'],...
		'position',[15,35,35,55])

add_block('built-in/Outport',[sys,'/','tmodel1/qde2qdr/vdr'])
set_param([sys,'/','tmodel1/qde2qdr/vdr'],...
		'Port','2',...
		'position',[445,100,465,120])

add_block('built-in/Outport',[sys,'/','tmodel1/qde2qdr/iqr'])
set_param([sys,'/','tmodel1/qde2qdr/iqr'],...
		'position',[445,55,465,75])
add_line([sys,'/','tmodel1/qde2qdr'],[395,110;440,110])
add_line([sys,'/','tmodel1/qde2qdr'],[40,45;50,45;50,65;70,65])
add_line([sys,'/','tmodel1/qde2qdr'],[395,65;440,65])
add_line([sys,'/','tmodel1/qde2qdr'],[110,90;125,90;125,65;145,65])
add_line([sys,'/','tmodel1/qde2qdr'],[110,90;125,90;125,110;145,110])
add_line([sys,'/','tmodel1/qde2qdr'],[40,135;50,135;50,115;70,115])
add_line([sys,'/','tmodel1/qde2qdr'],[40,90;70,90])


%     Finished composite block 'tmodel1/qde2qdr'.

set_param([sys,'/','tmodel1/qde2qdr'],...
		'position',[135,299,175,351])

add_block('built-in/Note',[sys,'/','tmodel1/iq'])
set_param([sys,'/','tmodel1/iq'],...
		'position',[195,295,200,300])

add_block('built-in/Note',[sys,'/','tmodel1/id'])
set_param([sys,'/','tmodel1/id'],...
		'position',[190,320,195,325])

add_block('built-in/Switch',[sys,'/','tmodel1/Sw'])
set_param([sys,'/','tmodel1/Sw'],...
		'orientation',2,...
		'Threshold','0.5',...
		'position',[190,37,205,113])

add_block('built-in/Constant',[sys,'/','tmodel1/Exc_sw'])
set_param([sys,'/','tmodel1/Exc_sw'],...
		'orientation',2,...
		'Value','Exc_sw(2)',...
		'position',[270,65,345,85])

add_block('built-in/Inport',[sys,'/','tmodel1/in_Vref'])
set_param([sys,'/','tmodel1/in_Vref'],...
		'position',[435,65,455,85])


%     Subsystem  'tmodel1/exciter'.

new_system([sys,'/','tmodel1/exciter'])
set_param([sys,'/','tmodel1/exciter'],'Location',[149,293,965,637])

add_block('built-in/Integrator',[sys,'/','tmodel1/exciter/VR'])
set_param([sys,'/','tmodel1/exciter/VR'],...
		'Initial','VR(2)',...
		'position',[325,89,355,121])

add_block('built-in/Sum',[sys,'/','tmodel1/exciter/Sum1'])
set_param([sys,'/','tmodel1/exciter/Sum1'],...
		'inputs','-+',...
		'position',[460,68,475,117])

add_block('built-in/Saturation',[sys,'/','tmodel1/exciter/VRmax//VRmin'])
set_param([sys,'/','tmodel1/exciter/VRmax//VRmin'],...
		'Lower Limit','VRmin(2)',...
		'Upper Limit','VRmax(2)',...
		'position',[385,82,435,128])

add_block('built-in/Gain',[sys,'/','tmodel1/exciter/Gain2'])
set_param([sys,'/','tmodel1/exciter/Gain2'],...
		'Gain','1/TE(2)',...
		'position',[500,77,565,113])

add_block('built-in/Gain',[sys,'/','tmodel1/exciter/Gain3'])
set_param([sys,'/','tmodel1/exciter/Gain3'],...
		'orientation',2,...
		'Gain','KE(2)/TE(2)',...
		'position',[575,157,685,193])

add_block('built-in/Fcn',[sys,'/','tmodel1/exciter/Se'])
set_param([sys,'/','tmodel1/exciter/Se'],...
		'orientation',2,...
		'Expr','AEx(2)*exp(BEx(2)*u[1])',...
		'position',[480,21,660,49])

add_block('built-in/Outport',[sys,'/','tmodel1/exciter/out_Ef'])
set_param([sys,'/','tmodel1/exciter/out_Ef'],...
		'position',[745,95,765,115])

add_block('built-in/Inport',[sys,'/','tmodel1/exciter/Vref'])
set_param([sys,'/','tmodel1/exciter/Vref'],...
		'position',[55,55,75,75])

add_block('built-in/Inport',[sys,'/','tmodel1/exciter/Vt'])
set_param([sys,'/','tmodel1/exciter/Vt'],...
		'Port','2',...
		'position',[55,105,75,125])

add_block('built-in/Sum',[sys,'/','tmodel1/exciter/Sum'])
set_param([sys,'/','tmodel1/exciter/Sum'],...
		'inputs','+--',...
		'position',[135,62,150,128])

add_block('built-in/Gain',[sys,'/','tmodel1/exciter/Gain'])
set_param([sys,'/','tmodel1/exciter/Gain'],...
		'Gain','KA(2)/TA(2)',...
		'position',[170,74,265,116])

add_block('built-in/Gain',[sys,'/','tmodel1/exciter/Gain1'])
set_param([sys,'/','tmodel1/exciter/Gain1'],...
		'orientation',2,...
		'Gain','1/TA(2)',...
		'position',[265,158,350,192])

add_block('built-in/Gain',[sys,'/','tmodel1/exciter/Gain5'])
set_param([sys,'/','tmodel1/exciter/Gain5'],...
		'Gain','1/TF(2)',...
		'position',[230,274,295,316])

add_block('built-in/Gain',[sys,'/','tmodel1/exciter/Gain4'])
set_param([sys,'/','tmodel1/exciter/Gain4'],...
		'orientation',2,...
		'Gain','KF(2)/TF(2)',...
		'position',[405,216,520,254])

add_block('built-in/Integrator',[sys,'/','tmodel1/exciter/Ef'])
set_param([sys,'/','tmodel1/exciter/Ef'],...
		'Initial','Ef(2)',...
		'position',[645,90,675,120])

add_block('built-in/Integrator',[sys,'/','tmodel1/exciter/Vs'])
set_param([sys,'/','tmodel1/exciter/Vs'],...
		'Initial','Vs(2)',...
		'position',[345,277,380,313])

add_block('built-in/Note',[sys,'/','tmodel1/exciter/Vstab'])
set_param([sys,'/','tmodel1/exciter/Vstab'],...
		'position',[150,225,155,230])

add_block('built-in/Sum',[sys,'/','tmodel1/exciter/Sum2'])
set_param([sys,'/','tmodel1/exciter/Sum2'],...
		'inputs','+-',...
		'position',[290,84,305,126])

add_block('built-in/Sum',[sys,'/','tmodel1/exciter/Sum3'])
set_param([sys,'/','tmodel1/exciter/Sum3'],...
		'inputs','+-',...
		'position',[600,84,615,126])

add_block('built-in/Sum',[sys,'/','tmodel1/exciter/Sum4'])
set_param([sys,'/','tmodel1/exciter/Sum4'],...
		'orientation',2,...
		'inputs','+-',...
		'position',[305,226,320,264])
add_line([sys,'/','tmodel1/exciter'],[80,115;95,115;95,95;130,95])
add_line([sys,'/','tmodel1/exciter'],[440,105;455,105])
add_line([sys,'/','tmodel1/exciter'],[80,65;100,65;100,75;130,75])
add_line([sys,'/','tmodel1/exciter'],[475,35;440,35;440,80;455,80])
add_line([sys,'/','tmodel1/exciter'],[310,105;320,105])
add_line([sys,'/','tmodel1/exciter'],[155,95;165,95])
add_line([sys,'/','tmodel1/exciter'],[360,105;380,105])
add_line([sys,'/','tmodel1/exciter'],[360,105;365,105;355,175])
add_line([sys,'/','tmodel1/exciter'],[620,105;640,105])
add_line([sys,'/','tmodel1/exciter'],[680,105;710,105;710,175;690,175])
add_line([sys,'/','tmodel1/exciter'],[480,95;495,95])
add_line([sys,'/','tmodel1/exciter'],[570,95;595,95])
add_line([sys,'/','tmodel1/exciter'],[570,175;565,175;565,115;595,115])
add_line([sys,'/','tmodel1/exciter'],[680,105;710,105;710,35;665,35])
add_line([sys,'/','tmodel1/exciter'],[680,105;740,105])
add_line([sys,'/','tmodel1/exciter'],[270,95;285,95])
add_line([sys,'/','tmodel1/exciter'],[260,175;250,175;250,115;285,115])
add_line([sys,'/','tmodel1/exciter'],[400,235;325,235])
add_line([sys,'/','tmodel1/exciter'],[300,295;340,295])
add_line([sys,'/','tmodel1/exciter'],[385,295;405,295;405,255;325,255])
add_line([sys,'/','tmodel1/exciter'],[680,105;710,105;710,235;525,235])
add_line([sys,'/','tmodel1/exciter'],[300,245;110,245;110,115;130,115])
add_line([sys,'/','tmodel1/exciter'],[300,245;205,245;205,295;225,295])


%     Finished composite block 'tmodel1/exciter'.

set_param([sys,'/','tmodel1/exciter'],...
		'position',[625,64,665,111])
add_line([sys,'/','tmodel1'],[290,170;400,170])
add_line([sys,'/','tmodel1'],[580,275;635,275;635,510;100,510;100,340;130,340])
add_line([sys,'/','tmodel1'],[575,135;605,135;605,100;620,100])
add_line([sys,'/','tmodel1'],[290,170;370,170;370,265;520,265])
add_line([sys,'/','tmodel1'],[290,170;300,170;300,135;110,135;110,150;125,150])
add_line([sys,'/','tmodel1'],[245,170;250,170])
add_line([sys,'/','tmodel1'],[150,170;155,170])
add_line([sys,'/','tmodel1'],[150,230;105,230;105,190;125,190])
add_line([sys,'/','tmodel1'],[670,90;730,90;730,50;210,50])
add_line([sys,'/','tmodel1'],[265,75;210,75])
add_line([sys,'/','tmodel1'],[185,75;100,75;100,170;125,170])
add_line([sys,'/','tmodel1'],[460,75;620,75])
add_line([sys,'/','tmodel1'],[575,160;725,160])
add_line([sys,'/','tmodel1'],[575,185;670,185])
add_line([sys,'/','tmodel1'],[575,210;725,210])
add_line([sys,'/','tmodel1'],[580,275;665,275])
add_line([sys,'/','tmodel1'],[580,315;725,315])
add_line([sys,'/','tmodel1'],[75,280;95,280;95,310;130,310])
add_line([sys,'/','tmodel1'],[580,355;670,355])
add_line([sys,'/','tmodel1'],[450,180;460,180;460,135;520,135])
add_line([sys,'/','tmodel1'],[575,135;670,135])
add_line([sys,'/','tmodel1'],[570,445;720,445])
add_line([sys,'/','tmodel1'],[570,475;665,475])
add_line([sys,'/','tmodel1'],[580,275;635,275;635,510;490,510;490,480;520,480])
add_line([sys,'/','tmodel1'],[290,170;370,170;370,440;520,440])
add_line([sys,'/','tmodel1'],[180,340;280,340;280,230;260,230])
add_line([sys,'/','tmodel1'],[495,365;520,365])
add_line([sys,'/','tmodel1'],[155,385;115,385;115,465;140,465])
add_line([sys,'/','tmodel1'],[325,460;335,460;335,420;125,420;125,450;140,450])
add_line([sys,'/','tmodel1'],[325,460;335,460;335,290;520,290])
add_line([sys,'/','tmodel1'],[325,460;335,460;335,190;400,190])
add_line([sys,'/','tmodel1'],[165,460;175,460])
add_line([sys,'/','tmodel1'],[270,460;285,460])
add_line([sys,'/','tmodel1'],[180,315;310,315;310,385;265,385])
add_line([sys,'/','tmodel1'],[180,315;520,315])
add_line([sys,'/','tmodel1'],[180,340;520,340])
add_line([sys,'/','tmodel1'],[180,315;310,315;310,210;400,210])
add_line([sys,'/','tmodel1'],[180,340;280,340;280,230;400,230])
add_line([sys,'/','tmodel1'],[75,325;130,325])
add_line([sys,'/','tmodel1'],[325,460;520,460])
add_line([sys,'/','tmodel1'],[180,340;500,340;500,210;520,210])
add_line([sys,'/','tmodel1'],[450,220;470,220;470,160;520,160])
add_line([sys,'/','tmodel1'],[180,315;485,315;485,185;520,185])
add_line([sys,'/','tmodel1'],[460,75;505,75;505,100;210,100])


%     Finished composite block 'tmodel1'.

set_param([sys,'/','tmodel1'],...
		'position',[170,473,225,597])

add_block('built-in/Constant',[sys,'/','Vref2'])
set_param([sys,'/','Vref2'],...
		'Value','vref(2)',...
		'position',[85,479,140,501])


%     Subsystem  'ide4'.

new_system([sys,'/','ide4'])
set_param([sys,'/','ide4'],'Location',[5,40,315,196])

add_block('built-in/Clock',[sys,'/','ide4/Clock'])
set_param([sys,'/','ide4/Clock'],...
		'position',[45,60,65,80])

add_block('built-in/Fcn',[sys,'/','ide4/Fcn1'])
set_param([sys,'/','ide4/Fcn1'],...
		'Expr','rem(u[1],period)',...
		'position',[110,60,150,80])

add_block('built-in/Look Up Table',[sys,'/','ide4/Look-Up Table'])
set_param([sys,'/','ide4/Look-Up Table'],...
		'Input_Values','t',...
		'Output_Values','y',...
		'position',[210,58,250,82])

add_block('built-in/Outport',[sys,'/','ide4/out_1'])
set_param([sys,'/','ide4/out_1'],...
		'position',[285,60,305,80])
add_line([sys,'/','ide4'],[155,70;205,70])
add_line([sys,'/','ide4'],[70,70;105,70])
add_line([sys,'/','ide4'],[255,70;280,70])
set_param([sys,'/','ide4'],...
		'Mask Display','plot([t,t+period,t+2*period],[y,y,y])',...
		'Mask Type','Repeating table',...
		'Mask Dialogue','Repeating table.\nEnter values of time and output for first cycle.|Time values:|Output values:')
set_param([sys,'/','ide4'],...
		'Mask Translate','period = max(@1); t = @1; y = @2;',...
		'Mask Help','Repeats cycle given in table. Time values should be monotonically increasing.',...
		'Mask Entries','time_id4e\/id_id4e\/')


%     Finished composite block 'ide4'.

set_param([sys,'/','ide4'],...
		'position',[535,577,575,603])

add_block('built-in/Note',[sys,'/','Edpe1'])
set_param([sys,'/','Edpe1'],...
		'position',[434,248,439,253])

add_block('built-in/Note',[sys,'/','Eqpe1'])
set_param([sys,'/','Eqpe1'],...
		'position',[510,232,515,237])

add_block('built-in/Note',[sys,'/','Eqpe2'])
set_param([sys,'/','Eqpe2'],...
		'position',[510,390,515,395])

add_block('built-in/Note',[sys,'/','Edpe2'])
set_param([sys,'/','Edpe2'],...
		'position',[510,505,515,510])

add_block('built-in/Constant',[sys,'/','Tmech2'])
set_param([sys,'/','Tmech2'],...
		'Value','Tmech(2)',...
		'position',[80,568,140,592])


%     Subsystem  'Tmech1'.

new_system([