8 files changed, 73 insertions, 0 deletions
diff --git a/3816/CH1/EX1.1/1_1.jpg b/3816/CH1/EX1.1/1_1.jpg
new file mode 100644
index 000000000..5388f3559
--- /dev/null
+++ b/3816/CH1/EX1.1/1_1.jpg
diff --git a/3816/CH1/EX1.1/1_1.sce b/3816/CH1/EX1.1/1_1.sce
new file mode 100644
index 000000000..6ce13e369
--- /dev/null
+++ b/3816/CH1/EX1.1/1_1.sce
@@ -0,0 +1,27 @@
+clc;
+clear;
+//case1:
+disp('To find no. of primary & secondary turns:')
+Bm1=1.5;//Max flux density of primary in tesla
+Vt1=10.7;//Terminal voltage of primary in volts
+Bm2=1.46;//Max flux density of secondary in tesla
+Vt2=10.46;//Terminal voltage of secondary in volts
+V1=11000;//Primary RMS voltage in volts
+V2=415;//Secondary RMS voltage in volts
+P=300e3;//Input power in volt-amphere
+N2=(V2)/(Vt2);//No.of turns in secondary
+N1=(V1)/(Vt1);//No.of turns in primary
+disp(N1,'No of turns in primary is')
+disp(N2,'No of turns in secondary is')
+//case2:
+disp('To find rated current:')
+I1=P/(V1);
+I2=P/(V2);
+disp(I1,'The primary rated current in amps is')
+disp(I2,'The secondary rated current in amps is')
+//case3:
+disp('To find primary &secondary load impedance:')
+Z1=(V1)/(I1);
+Z2=(V2)/(I2);
+disp(Z1,'The primary load impedance in ohms is')
+disp(Z2,'The secondary load impedance in ohms is')
diff --git a/3816/CH1/EX1.2/1_2.png b/3816/CH1/EX1.2/1_2.png
new file mode 100644
index 000000000..a0cf33f1b
--- /dev/null
+++ b/3816/CH1/EX1.2/1_2.png
diff --git a/3816/CH1/EX1.2/1_2.sce b/3816/CH1/EX1.2/1_2.sce
new file mode 100644
index 000000000..47667d44a
--- /dev/null
+++ b/3816/CH1/EX1.2/1_2.sce
@@ -0,0 +1,22 @@
+clc;
+clear;
+D=0.50;//Diameter of machine in m
+l=0.20;//Lemgth of machine in m
+lg=0.005;//Gap length in m
+A1=12800;//Current density of stator
+A2=9600;//Current density of rotor
+Lamda=%pi/3;//Electrical torque angle
+sin(Lamda)==0.87;
+S=sin(Lamda);
+Mewzero=4*%pi*(1e-7);//Permeability constant
+F1=((A1)*D)/2;//MMF of stator
+F2=((A2)*D)/2;//MMF of rotor
+M=-((%pi*D*l*(F1)*(F2)*S*(Mewzero))/(2*(lg)));//Torque produced
+//case1:
+disp('To find the torque with the machine windings arranged to give a 2-pole field:')
+M1=M/1;//Torque produced with 2-pole field
+disp(M1,'Torque for 2-pole field in N-m is')
+//case2:
+disp('To find the torque with the machine windings arranged to give a 8-pole field:')
+M2=M/4;//Torque produced with 8-pole field
+disp(M2,'Torque for 8-pole field in N-m is')
diff --git a/3816/CH1/EX1.3/1_3.png b/3816/CH1/EX1.3/1_3.png
new file mode 100644
index 000000000..a66b4ceb5
--- /dev/null
+++ b/3816/CH1/EX1.3/1_3.png
diff --git a/3816/CH1/EX1.3/1_3.sce b/3816/CH1/EX1.3/1_3.sce
new file mode 100644
index 000000000..ad2a7706e
--- /dev/null
+++ b/3816/CH1/EX1.3/1_3.sce
@@ -0,0 +1,12 @@
+clc;
+clear;
+f=50;//Frequency of transformer in Hz
+Ai=0.032;//Ferromagnetic area in m^2
+Aw=0.07;//Window area in m^2
+Bm=1.5;//Flux density in T
+J=2.7;//RMS current density
+Kw=0.3;//Space factor
+//case1:
+disp('To find the rating of the transformer:')
+S=2.22*f*(Bm)*J*(Ai)*(Aw)*(Kw)*(1e6);//Rating of transformer in VA
+disp(S,'The rating of the transformer is')
diff --git a/3816/CH1/EX1.4/1_4.png b/3816/CH1/EX1.4/1_4.png
new file mode 100644
index 000000000..55d48ab24
--- /dev/null
+++ b/3816/CH1/EX1.4/1_4.png
diff --git a/3816/CH1/EX1.4/1_4.sce b/3816/CH1/EX1.4/1_4.sce
new file mode 100644
index 000000000..137b790d5
--- /dev/null
+++ b/3816/CH1/EX1.4/1_4.sce
@@ -0,0 +1,12 @@
+clc;
+clear;
+B=0.50;//Mean gap flux density
+Ys=40;//Slot spacing
+Cs=(35*12);//Conductor section
+J=33;//Current density
+//case:1
+disp('To find the tangential force per length of gap periphery and per unit axial length of the machine:')
+A=(Cs*J*1000)/Ys;
+disp(A,'The specific electric loadings is:')
+Fe=B*A;
+disp(Fe,'The specific force is:')