initial commit / add all books

14 files changed, 150 insertions, 0 deletions

diff --git a/2258/CH5/EX5.1/5_1.sce b/2258/CH5/EX5.1/5_1.sce
new file mode 100755
index 000000000..05e99ba4a
--- /dev/null
+++ b/2258/CH5/EX5.1/5_1.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the critical field

+Tc=3.7;        //critical temperature in kelvin

+Hc_0=0.0306;    //critical field in T

+T=2;

+Hc_2k=Hc_0*(1-((T/Tc)^2));

+printf("the critical feild at 2K is %f Tesla",Hc_2k);

diff --git a/2258/CH5/EX5.10/5_10.sce b/2258/CH5/EX5.10/5_10.sce
new file mode 100755
index 000000000..7310349b2
--- /dev/null
+++ b/2258/CH5/EX5.10/5_10.sce
@@ -0,0 +1,14 @@
+clc();

+clear;

+// To calculate the critical current

+d=3;     //diameter in mm

+d=d*10^-3;     //diameter in m

+Tc=8;        //critical temp in K 

+T=5;       //temp in K 

+Ho=5*10^4;    //magnetic field in A/m

+r=d/2;

+Hc=Ho*(1-((T/Tc)^2));

+Ic=2*%pi*r*Hc;

+printf("critical current is %f amp",Ic);

+

+//answer in the book is wrong

diff --git a/2258/CH5/EX5.11/5_11.sce b/2258/CH5/EX5.11/5_11.sce
new file mode 100755
index 000000000..ab3a4f245
--- /dev/null
+++ b/2258/CH5/EX5.11/5_11.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the critical temperature

+M1=199.5;    //isotopic mass

+M2=203.4;

+Tc1=4.185;      //1st critical temp in K

+Tc2=Tc1*sqrt(M1/M2);

+printf("the critical temperature is %f K",Tc2);

diff --git a/2258/CH5/EX5.12/5_12.sce b/2258/CH5/EX5.12/5_12.sce
new file mode 100755
index 000000000..eecab8366
--- /dev/null
+++ b/2258/CH5/EX5.12/5_12.sce
@@ -0,0 +1,12 @@
+clc();

+clear;

+// To calculate the EM wave frequency

+V=8.50;    //voltage in micro Volts

+V=V*10^-6;     //in volts

+e=1.6*10^-19;       //electron charge in coulomb

+h=6.626*10^-24;

+new=2*e*V/h;

+printf("EM wave frequency in Hz is");

+disp(new);

+

+//answer given in the book is wrong

diff --git a/2258/CH5/EX5.13/5_13.sce b/2258/CH5/EX5.13/5_13.sce
new file mode 100755
index 000000000..38ee59194
--- /dev/null
+++ b/2258/CH5/EX5.13/5_13.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the critical temperature

+p1=1;     //1st pressure in mm

+p2=6;     //2nd pressure in mm

+Tc1=5;    //1st critical temp in K

+Tc2=Tc1*(p2/p1);

+printf("the critical temperature is %f K",Tc2);

diff --git a/2258/CH5/EX5.14/5_14.sce b/2258/CH5/EX5.14/5_14.sce
new file mode 100755
index 000000000..4c90fc77f
--- /dev/null
+++ b/2258/CH5/EX5.14/5_14.sce
@@ -0,0 +1,10 @@
+clc();

+clear;

+// To calculate maximum critical temperature

+Tc=8.7;      //1st critical temp in K

+Hc=6*10^5;      //critical magnetic field in Amp/m

+Ho=3*10^6;      //critical magnetic field in Amp/m

+T=Tc*sqrt(1-(Hc/Ho));

+printf("maximum critical temperature is %f K",T);

+

+//answer given in the book is wrong

diff --git a/2258/CH5/EX5.2/5_2.sce b/2258/CH5/EX5.2/5_2.sce
new file mode 100755
index 000000000..b94529d8d
--- /dev/null
+++ b/2258/CH5/EX5.2/5_2.sce
@@ -0,0 +1,14 @@
+clc();

+clear;

+// To calculate the critical current

+T=4.2;         //temp in kelvin

+Tc=7.18;       //critical temp in kelvin

+Hc_0=6.5*10^4;        //in amp/m

+d=1;     //diameter in mm

+d=d*10^-3;    //diameter in m

+r=d/2;

+Hc_T=Hc_0*(1-((T/Tc)^2));

+Ic=2*%pi*r*Hc_T;

+printf("the critical current is %f Amp",Ic);

+

+//answer given in the book is wrong

diff --git a/2258/CH5/EX5.3/5_3.sce b/2258/CH5/EX5.3/5_3.sce
new file mode 100755
index 000000000..704c91bd4
--- /dev/null
+++ b/2258/CH5/EX5.3/5_3.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the penetration depth

+lamda_T=75;       // penetration depth in nm

+T=3.5;        //temperature in K

+HgTc=4.12;       //in K

+lamda_0=lamda_T*sqrt(1-((T/HgTc)^4));

+printf("the pentration depth at 0k is %f nm",lamda_0);

diff --git a/2258/CH5/EX5.4/5_4.sce b/2258/CH5/EX5.4/5_4.sce
new file mode 100755
index 000000000..476478518
--- /dev/null
+++ b/2258/CH5/EX5.4/5_4.sce
@@ -0,0 +1,24 @@
+clc();

+clear;

+// To calculate the critical temperature

+lamda_T1=396;           //pentration depth in armstrong

+lamda_T2=1730;          //pentration depth in armstrong

+T1=3;                     //temperature in K

+T2=7.1;                   //temperature in K

+//lamda_T2^2=lamda_0^2*(((Tc^4-T2^4)/Tc^4)^-1)

+//lamda_T12^=lamda_0^2*(((Tc^4-T1^4)/Tc^4)^-1)

+//dividing lamda_T2^2 by lamda_T1^2 = (Tc^4-T1^4)/(Tc^4-T2^4)

+//let A=lamda_T2^2 and B=lamda_T1^2

+A=lamda_T2^2;

+B=lamda_T1^2;

+C=A/B;

+X=T1^4;

+Y=T2^4;

+//C*((TC^4)-Y)=(Tc^4)-X

+//C*(Tc^4)-(Tc^4)=C*Y-X

+//(Tc^4)*(C-1)=(C*Y)-X

+//let Tc^4 be D

+//D*(C-1)=(C*Y)-X

+D=((C*Y)-X)/(C-1);

+Tc=D^(1/4);

+printf("the critical temperature is %f K",Tc);

diff --git a/2258/CH5/EX5.5/5_5.sce b/2258/CH5/EX5.5/5_5.sce
new file mode 100755
index 000000000..61c5519aa
--- /dev/null
+++ b/2258/CH5/EX5.5/5_5.sce
@@ -0,0 +1,10 @@
+clc();

+clear;

+// To calculate the critical field

+Tc=7.2;         //critical temp in K

+Ho=6.5*10^3;     //critical magnetic field in amp/m

+T=5;         //temp in K

+Hc=Ho*(1-((T/Tc)^2));

+printf("the critical magnetic field at 5K is %f amp/m",Hc);

+

+//answer given in the book is wrong

diff --git a/2258/CH5/EX5.6/5_6.sce b/2258/CH5/EX5.6/5_6.sce
new file mode 100755
index 000000000..af745ff01
--- /dev/null
+++ b/2258/CH5/EX5.6/5_6.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the critical feild at 2.5K

+Tc=3.5;         //in K

+Ho=3.2*10^3;    //in amp per m

+T=2.5;         //in K

+Hc=Ho*(1-((T/Tc)^2));

+printf("critical field is %f amp/m is",Hc);

diff --git a/2258/CH5/EX5.7/5_7.sce b/2258/CH5/EX5.7/5_7.sce
new file mode 100755
index 000000000..ff2447db1
--- /dev/null
+++ b/2258/CH5/EX5.7/5_7.sce
@@ -0,0 +1,10 @@
+clc();

+clear;

+// To calculate the transition temperature

+Hc=5*10^3       //critical magnetic field in amp/m

+Ho=2*10^4;      //critical field in amp/m

+T=6;         //temp in K

+Tc=T/sqrt(1-(Hc/Ho));

+printf("the transition temperature is %f K",Tc)

+

+//answer in the book is wrong

diff --git a/2258/CH5/EX5.8/5_8.sce b/2258/CH5/EX5.8/5_8.sce
new file mode 100755
index 000000000..02c13c257
--- /dev/null
+++ b/2258/CH5/EX5.8/5_8.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the critical current

+Hc=2*10^3;       //critical magnetic field in amp/m

+R=0.02;       //radius in m

+p=3.14;

+Ic=2*p*R*Hc;

+printf("the critical current is %f amp",Ic);

diff --git a/2258/CH5/EX5.9/5_9.sce b/2258/CH5/EX5.9/5_9.sce
new file mode 100755
index 000000000..f9d129e12
--- /dev/null
+++ b/2258/CH5/EX5.9/5_9.sce
@@ -0,0 +1,8 @@
+clc();

+clear;

+// To calculate the isotopic mass

+M1=199.5;      //isotopic mass in in a.m.u

+T1=5;         //1st critical temp in K

+T2=5.1;       //2nd critical temp in K

+M2=((T1/T2)^2)*M1;

+printf("the isotopic mass of M2 is %f a.m.u",M2);