diff options
Diffstat (limited to '273/CH5')
-rwxr-xr-x | 273/CH5/EX5.1/ex5_1sce.sce | 15 | ||||
-rwxr-xr-x | 273/CH5/EX5.2/ex5_2.sce | 16 | ||||
-rwxr-xr-x | 273/CH5/EX5.4/ex5_4sce.sce | 13 |
3 files changed, 44 insertions, 0 deletions
diff --git a/273/CH5/EX5.1/ex5_1sce.sce b/273/CH5/EX5.1/ex5_1sce.sce new file mode 100755 index 000000000..1ead0a8ae --- /dev/null +++ b/273/CH5/EX5.1/ex5_1sce.sce @@ -0,0 +1,15 @@ +clc;clear;
+//Example 5.1
+//Electron refraction, calculation of potential difference
+
+//given values
+ V1=250;//potential by which electrons are accelerated in Volts
+ alpha1=50*%pi/180;//in degree
+ alpha2=30*%pi/180;//in degree
+b=sin(alpha1)/sin(alpha2);
+ //calculation
+V2=(b^2)*V1;
+a=V2-V1;
+disp(a,'potential difference(in volts) is:');
+
+
diff --git a/273/CH5/EX5.2/ex5_2.sce b/273/CH5/EX5.2/ex5_2.sce new file mode 100755 index 000000000..6dcba7ce6 --- /dev/null +++ b/273/CH5/EX5.2/ex5_2.sce @@ -0,0 +1,16 @@ +clc;clear;
+//Example 5.2&5.3
+//Cyclotron, calculation of magnetic induction,maximum energy
+
+//given values
+ f=12*(10^6);//oscillator frequency in Hertz
+ r=.53;//radius of the dee in metre
+ q=1.6*10^-19;//Deuteron charge in C
+ m=3.34*10^-27;//mass of deuteron in kg
+ //calculation
+B=2*%pi*f*m/q;//
+disp(B,'magnetic induction (in Tesla) is:');
+E=B^2*q^2*r^2/(2*m);
+disp(E,'maximum energy to which deuterons can be accelerated (in J) is')
+E1=E*6.24*10^18/10^6;//conversion of energy into MeV
+disp(E1,'maximum energy to which deuterons can be accelerated (in MeV) is');
\ No newline at end of file diff --git a/273/CH5/EX5.4/ex5_4sce.sce b/273/CH5/EX5.4/ex5_4sce.sce new file mode 100755 index 000000000..fb46ec38b --- /dev/null +++ b/273/CH5/EX5.4/ex5_4sce.sce @@ -0,0 +1,13 @@ +clc;clear;
+//Example 5.4
+//Mass spectrograph, calculation of linear separation of lines formed on photographic plates
+
+//given values
+ E=8*10^4;//electric field in V/m
+ B=.55//magnetic induction in Wb/m*2
+ q=1.6*10^-19;//charge of ions
+ m1=20*1.67*10^-27;//atomic mass of an isotope of neon
+ m2=22*1.67*10^-27;//atomic mass of other isotope of neon
+ //calculation
+x=2*E*(m2-m1)/(q*B^2);//
+disp(x,'separation of lines (in metre) is:')
|