From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3669/CH9/EX9.1/1.sce | 11 +++++++++++
 3669/CH9/EX9.2/2.sce | 11 +++++++++++
 3669/CH9/EX9.3/3.sce | 11 +++++++++++
 3669/CH9/EX9.4/4.sce | 11 +++++++++++
 3669/CH9/EX9.5/5.sce | 11 +++++++++++
 3669/CH9/EX9.6/6.sce | 11 +++++++++++
 3669/CH9/EX9.7/7.sce | 11 +++++++++++
 7 files changed, 77 insertions(+)
 create mode 100644 3669/CH9/EX9.1/1.sce
 create mode 100644 3669/CH9/EX9.2/2.sce
 create mode 100644 3669/CH9/EX9.3/3.sce
 create mode 100644 3669/CH9/EX9.4/4.sce
 create mode 100644 3669/CH9/EX9.5/5.sce
 create mode 100644 3669/CH9/EX9.6/6.sce
 create mode 100644 3669/CH9/EX9.7/7.sce

(limited to '3669/CH9')

diff --git a/3669/CH9/EX9.1/1.sce b/3669/CH9/EX9.1/1.sce
new file mode 100644
index 000000000..4fc630fb8
--- /dev/null
+++ b/3669/CH9/EX9.1/1.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+T=8;    //temperature(K)
+Hc=1*10**5;   //critical field(amp/m)
+H0=2*10**5;   //critical field(amp/m)
+
+//Calculation
+Tc=T/sqrt(1-(Hc/H0));     //transition temperature(K)
+
+//Result
+printf('transition temperature is %0.3f   K  \n',(Tc))
\ No newline at end of file
diff --git a/3669/CH9/EX9.2/2.sce b/3669/CH9/EX9.2/2.sce
new file mode 100644
index 000000000..1a156853b
--- /dev/null
+++ b/3669/CH9/EX9.2/2.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+h=6.626*10**-34;    //plancks constant
+e=1.6*10**-19;  
+V=8.5*10**-6;    //voltage(V)
+
+//Calculation
+new=2*e*V/h;     //frequency(Hz)
+
+//Result
+printf('frequency is %0.3f   *10**9 Hz  \n',(new/10**9))
\ No newline at end of file
diff --git a/3669/CH9/EX9.3/3.sce b/3669/CH9/EX9.3/3.sce
new file mode 100644
index 000000000..4e364307f
--- /dev/null
+++ b/3669/CH9/EX9.3/3.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+T=2;    //temperature(K)
+H0=0.0306;   //critical field(amp/m)
+Tc=3.7;     //transition temperature(K)
+
+//Calculation
+Hc=H0*(1-(T/Tc)**2);   //critical field(Tesla)
+
+//Result
+printf('critical field is %0.3f    Tesla \n',(Hc))
\ No newline at end of file
diff --git a/3669/CH9/EX9.4/4.sce b/3669/CH9/EX9.4/4.sce
new file mode 100644
index 000000000..33a37b669
--- /dev/null
+++ b/3669/CH9/EX9.4/4.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+H0=250*10**3;   //critical field(amp/m)
+Tc=12;     //transition temperature(K)
+Hc=200*10**3;   //critical field(Tesla)
+
+//Calculation
+T=Tc*sqrt(1-(Hc/H0)**2);    //temperature(K)
+
+//Result
+printf('temperature is %0.3f   K  \n',(T))
\ No newline at end of file
diff --git a/3669/CH9/EX9.5/5.sce b/3669/CH9/EX9.5/5.sce
new file mode 100644
index 000000000..289d5dd26
--- /dev/null
+++ b/3669/CH9/EX9.5/5.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+T=2.5;    //temperature(K)
+H0=0.03;   //critical field(amp/m)
+Tc=3.7;     //transition temperature(K)
+
+//Calculation
+Hc=H0*(1-(T/Tc)**2);   //critical field(Tesla)
+
+//Result
+printf('critical field is %0.3f    Tesla \n',(Hc))
\ No newline at end of file
diff --git a/3669/CH9/EX9.6/6.sce b/3669/CH9/EX9.6/6.sce
new file mode 100644
index 000000000..c83039f4c
--- /dev/null
+++ b/3669/CH9/EX9.6/6.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+h=6.625*10**-34;    //plancks constant
+e=1.6*10**-19;  
+V=650*10**-6;    //voltage(V)
+
+//Calculation
+new=2*e*V/h;     //frequency(Hz)
+
+//Result
+printf('frequency is %0.3f  *10**9 Hz   \n',(new/10**9))
\ No newline at end of file
diff --git a/3669/CH9/EX9.7/7.sce b/3669/CH9/EX9.7/7.sce
new file mode 100644
index 000000000..b2f904e3c
--- /dev/null
+++ b/3669/CH9/EX9.7/7.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+T=5;    //temperature(K)
+H0=6.5*10**3;   //critical field(amp/m)
+Tc=7.2;     //transition temperature(K)
+
+//Calculation
+Hc=H0*(1-(T/Tc)**2);   //critical field(Tesla)
+
+//Result
+printf('critical field is %0.3f  *10**3 A/m   \n',(Hc/10**3))
\ No newline at end of file
-- 
cgit