summaryrefslogtreecommitdiff
path: root/3756
diff options
context:
space:
mode:
Diffstat (limited to '3756')
-rw-r--r--3756/CH1/EX1.1/Ex1_1.sce15
-rw-r--r--3756/CH1/EX1.10/Ex1_10.sce16
-rw-r--r--3756/CH1/EX1.11/Ex1_11.sce16
-rw-r--r--3756/CH1/EX1.12/Ex1_12.sce16
-rw-r--r--3756/CH1/EX1.13/Ex1_13.sce17
-rw-r--r--3756/CH1/EX1.14/Ex1_14.sce14
-rw-r--r--3756/CH1/EX1.15/Ex1_15.sce16
-rw-r--r--3756/CH1/EX1.16/Ex1_16.sce22
-rw-r--r--3756/CH1/EX1.17/Ex1_17.sce17
-rw-r--r--3756/CH1/EX1.18/Ex1_18.sce15
-rw-r--r--3756/CH1/EX1.19/Ex1_19.sce18
-rw-r--r--3756/CH1/EX1.2/Ex1_2.sce17
-rw-r--r--3756/CH1/EX1.20/Ex1_20.sce24
-rw-r--r--3756/CH1/EX1.21/Ex1_21.sce17
-rw-r--r--3756/CH1/EX1.22/Ex1_22.sce17
-rw-r--r--3756/CH1/EX1.23/Ex1_23.sce15
-rw-r--r--3756/CH1/EX1.24/Ex1_24.sce14
-rw-r--r--3756/CH1/EX1.25/Ex1_25.sce15
-rw-r--r--3756/CH1/EX1.26/Ex1_26.sce16
-rw-r--r--3756/CH1/EX1.27/Ex1_27.sce14
-rw-r--r--3756/CH1/EX1.29/Ex1_29.sce19
-rw-r--r--3756/CH1/EX1.3/Ex1_3.sce16
-rw-r--r--3756/CH1/EX1.30/Ex1_30.sce14
-rw-r--r--3756/CH1/EX1.31/Ex1_31.sce14
-rw-r--r--3756/CH1/EX1.32/Ex1_32.sce15
-rw-r--r--3756/CH1/EX1.4/Ex1_4.sce17
-rw-r--r--3756/CH1/EX1.5/Ex1_5.sce16
-rw-r--r--3756/CH1/EX1.6/Ex1_6.sce16
-rw-r--r--3756/CH1/EX1.7/Ex1_7.sce20
-rw-r--r--3756/CH1/EX1.8/Ex1_8.sce18
-rw-r--r--3756/CH1/EX1.9/Ex1_9.sce15
-rw-r--r--3756/CH2/EX2.1/Ex2_1.sce15
-rw-r--r--3756/CH2/EX2.10/Ex2_10.sce14
-rw-r--r--3756/CH2/EX2.12/Ex2_12.sce15
-rw-r--r--3756/CH2/EX2.13/Ex2_13.sce16
-rw-r--r--3756/CH2/EX2.14/Ex2_14.sce14
-rw-r--r--3756/CH2/EX2.15/Ex2_15.sce16
-rw-r--r--3756/CH2/EX2.16/Ex2_16.sce16
-rw-r--r--3756/CH2/EX2.17/Ex2_17.sce15
-rw-r--r--3756/CH2/EX2.18/Ex2_18.sce16
-rw-r--r--3756/CH2/EX2.2/Ex2_2.sce15
-rw-r--r--3756/CH2/EX2.3/Ex2_3.sce16
-rw-r--r--3756/CH2/EX2.4/Ex2_4.sce16
-rw-r--r--3756/CH2/EX2.6/Ex2_6.sce15
-rw-r--r--3756/CH2/EX2.7/Ex2_7.sce18
-rw-r--r--3756/CH2/EX2.8/Ex2_8.sce17
-rw-r--r--3756/CH2/EX2.9/Ex2_9.sce18
-rw-r--r--3756/CH3/EX3.1/Ex3_1.sce18
-rw-r--r--3756/CH3/EX3.10/Ex3_10.sce15
-rw-r--r--3756/CH3/EX3.11/Ex3_11.sce15
-rw-r--r--3756/CH3/EX3.12/Ex3_12.sce20
-rw-r--r--3756/CH3/EX3.13/Ex3_13.sce14
-rw-r--r--3756/CH3/EX3.14/Ex3_14.sce16
-rw-r--r--3756/CH3/EX3.15/Ex3_15.sce15
-rw-r--r--3756/CH3/EX3.2/Ex3_2.sce14
-rw-r--r--3756/CH3/EX3.3/Ex3_3.sce13
-rw-r--r--3756/CH3/EX3.4/Ex3_4.sce14
-rw-r--r--3756/CH3/EX3.5/Ex3_5.sce15
-rw-r--r--3756/CH3/EX3.6/Ex3_6.sce15
-rw-r--r--3756/CH3/EX3.7/Ex3_7.sce15
-rw-r--r--3756/CH3/EX3.8/Ex3_8.sce16
-rw-r--r--3756/CH3/EX3.9/Ex3_9.sce16
-rw-r--r--3756/CH4/EX4.1/Ex4_1.sce19
-rw-r--r--3756/CH4/EX4.2/Ex4_2.sce21
-rw-r--r--3756/CH4/EX4.3/Ex4_3.sce19
-rw-r--r--3756/CH4/EX4.4/Ex4_4.sce14
-rw-r--r--3756/CH4/EX4.5/Ex4_5.sce14
-rw-r--r--3756/CH6/EX6.1/Ex6_1.sce15
-rw-r--r--3756/CH6/EX6.2/Ex6_2.sce15
-rw-r--r--3756/CH6/EX6.3/Ex6_3.sce16
-rw-r--r--3756/CH6/EX6.5/Ex6_5.sce18
-rw-r--r--3756/CH6/EX6.7/Ex6_7.sce16
-rw-r--r--3756/CH7/EX7.1/Ex7_1.sce16
-rw-r--r--3756/CH7/EX7.2/Ex7_2.sce16
-rw-r--r--3756/CH7/EX7.3/Ex7_3.sce23
-rw-r--r--3756/CH7/EX7.4/Ex7_4.sce17
-rw-r--r--3756/CH7/EX7.5/Ex7_5.sce15
-rw-r--r--3756/CH7/EX7.6/Ex7_6.sce19
-rw-r--r--3756/CH7/EX7.7/Ex7_7.sce16
-rw-r--r--3756/CH7/EX7.9/Ex7_9.sce14
-rw-r--r--3756/CH8/EX8.1/Ex8_1.sce14
-rw-r--r--3756/CH8/EX8.2/Ex8_2.sce17
-rw-r--r--3756/CH8/EX8.3/Ex8_3.sce13
-rw-r--r--3756/CH8/EX8.4/Ex8_4.sce19
-rw-r--r--3756/CH9/EX9.1/Ex9_1.sce19
-rw-r--r--3756/CH9/EX9.2/Ex9_2.sce15
-rw-r--r--3756/CH9/EX9.3/Ex9_3.sce14
-rw-r--r--3756/CH9/EX9.4/Ex9_4.sce19
88 files changed, 1427 insertions, 0 deletions
diff --git a/3756/CH1/EX1.1/Ex1_1.sce b/3756/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..d67269714
--- /dev/null
+++ b/3756/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=0.5 //Distance from Screen in cm
+d=0.5 //Distance between parallel slits in cm
+lambdaa=5890 //Wavelength
+
+//Calculations
+Beta=(D*lambdaa)/(d)/10**4 // in degrees
+
+//Result
+printf("\n The Fringe width in Youngs Double Slit Experiment is Beta= %1.4f*10**-3 m", Beta)
diff --git a/3756/CH1/EX1.10/Ex1_10.sce b/3756/CH1/EX1.10/Ex1_10.sce
new file mode 100644
index 000000000..456e187e7
--- /dev/null
+++ b/3756/CH1/EX1.10/Ex1_10.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+d=7.5*10**-4 //slit separation
+Beta=0.094*10**-2 //Fringe width
+D=1.2 //Distance from Screen
+
+
+//Calculations
+lambdaa=(Beta*d*10**10)/D
+
+//Result
+printf("\n The wavelength is %i Angstrom",lambdaa)
diff --git a/3756/CH1/EX1.11/Ex1_11.sce b/3756/CH1/EX1.11/Ex1_11.sce
new file mode 100644
index 000000000..3299913fa
--- /dev/null
+++ b/3756/CH1/EX1.11/Ex1_11.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+d=3.6125*10**-3 //slit separation
+D=1 //Distance from Screen
+lambdaa=5870*10**-10 //Wavelength
+
+
+//Calculations
+Beta=(D*lambdaa*10**4)/d
+
+//Result
+printf("\n The Fringe width is %0.3f *10**-4 m",Beta)
diff --git a/3756/CH1/EX1.12/Ex1_12.sce b/3756/CH1/EX1.12/Ex1_12.sce
new file mode 100644
index 000000000..bb623d57d
--- /dev/null
+++ b/3756/CH1/EX1.12/Ex1_12.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+d=0.3*10**-2 //slit separation
+D=1 //Distance from Screen
+Beta=0.0195*10**-2 //Wavelength
+
+
+//Calculations
+lambdaa=(Beta*d*10**10)/D
+
+//Result
+printf("\n The wavelength is %i *10**-10 m",lambdaa)
diff --git a/3756/CH1/EX1.13/Ex1_13.sce b/3756/CH1/EX1.13/Ex1_13.sce
new file mode 100644
index 000000000..7e1bf52ca
--- /dev/null
+++ b/3756/CH1/EX1.13/Ex1_13.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n1=62 //fringes
+lambdaa1=5893*10**-10 //Wavelength 1
+lambdaa2=5461*10**-10 //Wavelength 2
+
+
+//Calculations
+n2=(n1*lambdaa1)/lambdaa2
+
+//Result
+printf("\n The number of fringes would be %i ",round(n2))
+
diff --git a/3756/CH1/EX1.14/Ex1_14.sce b/3756/CH1/EX1.14/Ex1_14.sce
new file mode 100644
index 000000000..81a9265d7
--- /dev/null
+++ b/3756/CH1/EX1.14/Ex1_14.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5.46*10**-7 //Wavelength
+t=6.3*10**-6 //thickness
+
+//Calculations
+mu=((6*lambdaa)/t)+1
+
+//Result
+printf("\n The refractive index is %0.3f ",mu)
diff --git a/3756/CH1/EX1.15/Ex1_15.sce b/3756/CH1/EX1.15/Ex1_15.sce
new file mode 100644
index 000000000..f37c98452
--- /dev/null
+++ b/3756/CH1/EX1.15/Ex1_15.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+s=2.143*10**-3
+mu=1.542 //refractive index
+lambdaa=5893*10**-10 //Wavelength
+Beta=0.347*10**-3
+
+//Calculations
+t=(s*lambdaa*10**6)/(Beta*(mu-1))
+
+//Result
+printf("\n The refractive index is %0.2f mu m",t)
diff --git a/3756/CH1/EX1.16/Ex1_16.sce b/3756/CH1/EX1.16/Ex1_16.sce
new file mode 100644
index 000000000..09bc5e695
--- /dev/null
+++ b/3756/CH1/EX1.16/Ex1_16.sce
@@ -0,0 +1,22 @@
+clc
+//
+//
+//
+
+//Variable declaration
+mu=1.4 //Refractive index
+cosr=0.8631
+t=0.01*10**-3 //thickness
+lambda1=4000*10**-10 //Wavelength 1
+lambda2=5000*10**-10 //Wavelength 2
+
+
+//Calculations
+n1=(2*mu*t*cosr)/lambda1
+n2=(2*mu*t*cosr)/lambda2
+deln=(n1)-(n2)
+
+
+//Result
+printf("\n The number of dark bands seen betwween 4000 A and 5000A is %i ",deln)
+
diff --git a/3756/CH1/EX1.17/Ex1_17.sce b/3756/CH1/EX1.17/Ex1_17.sce
new file mode 100644
index 000000000..a9c466279
--- /dev/null
+++ b/3756/CH1/EX1.17/Ex1_17.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+mu=1.33 //Refractive index
+cosr=0.7989
+lambda1=6.1*10**-5 //Wavelength 1
+lambda2=6*10**-5 //Wavelength 2
+
+
+//Calculations
+t=(lambda1*lambda2*10**-5)/(2*mu*cosr*(lambda1-lambda2)*10**-5)
+
+//Result
+printf("\n The Thickness is %0.4f cm",t)
diff --git a/3756/CH1/EX1.18/Ex1_18.sce b/3756/CH1/EX1.18/Ex1_18.sce
new file mode 100644
index 000000000..8572369c2
--- /dev/null
+++ b/3756/CH1/EX1.18/Ex1_18.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n=8 //number of fringes
+lambdaa=5893*10**-10 //Wavelength
+mu=1.5 //Refractive index
+cosr=(2*sqrt(2))/3
+//Calculations
+t=(n*lambdaa*10**6)/(2*mu*cosr)
+
+//Result
+printf("\n The Thickness is %0.3f mu m",t)
diff --git a/3756/CH1/EX1.19/Ex1_19.sce b/3756/CH1/EX1.19/Ex1_19.sce
new file mode 100644
index 000000000..2c02b4f63
--- /dev/null
+++ b/3756/CH1/EX1.19/Ex1_19.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//
+
+//Variable declaration
+mu=4/3 //refractive index
+t=1.5 //thickness
+cosr=0.7603
+lambdaa=5*10**-7 //Wavelength
+
+
+//Calculations
+n=(2*mu*t*cosr*10**-6)/lambdaa
+
+//Result
+printf("\n The order of interference of dark band is %i ",n)
+
diff --git a/3756/CH1/EX1.2/Ex1_2.sce b/3756/CH1/EX1.2/Ex1_2.sce
new file mode 100644
index 000000000..29ddb8295
--- /dev/null
+++ b/3756/CH1/EX1.2/Ex1_2.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=2 //Distance from screen
+lambdaa=5100 //Wavelength
+Beta=0.02 //Fringe Width
+x=10 //No. of fringes
+
+
+//Calculations
+d=(x*D*lambdaa)/Beta/10**6
+
+//Result
+printf("\n The Double slit separation 2d= %0.3f mu m",d)
diff --git a/3756/CH1/EX1.20/Ex1_20.sce b/3756/CH1/EX1.20/Ex1_20.sce
new file mode 100644
index 000000000..ac1652b77
--- /dev/null
+++ b/3756/CH1/EX1.20/Ex1_20.sce
@@ -0,0 +1,24 @@
+clc
+//
+//
+//
+
+//Variable declaration
+mu=1.33 //refractive index
+n1=0
+n2=1
+n3=2
+t=5*10**-7 //thickness
+
+
+//Calculations
+lambda1=(4*mu*t*10**10)/(2*n1+1)
+lambda2=(4*mu*t*10**10)/(2*n2+1)
+lambda3=(4*mu*t*10**10)/(2*n3+1)
+
+//Result
+printf("\n For n=0 Lambda is %0.3f ",lambda1)
+printf("\n For n=1 Lambda is %i ",lambda2)
+
+printf("\n For n=2 Lambda is %0.3f ",lambda3)
+printf("\n Out of these only %0.3f lies in the visible range for n=2",lambda3)
diff --git a/3756/CH1/EX1.21/Ex1_21.sce b/3756/CH1/EX1.21/Ex1_21.sce
new file mode 100644
index 000000000..992581a50
--- /dev/null
+++ b/3756/CH1/EX1.21/Ex1_21.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+R=100 //radius
+D25=0.8 //Diameter of the 25th ring
+D5=0.3 //Diameter of the 5th ring
+p=20
+
+
+//Calculations
+lambdaa=((D25**2)-(D5**2))*10**8/(4*20*100)
+
+//Result
+printf("\n The Wavelength is %i Angstrom",lambdaa)
diff --git a/3756/CH1/EX1.22/Ex1_22.sce b/3756/CH1/EX1.22/Ex1_22.sce
new file mode 100644
index 000000000..e295200a4
--- /dev/null
+++ b/3756/CH1/EX1.22/Ex1_22.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n=10 //no. of ring
+D10=0.5 //Diameter of the 10th ring
+lambdaa=5893*10**-8 //Wavelength
+
+//Calculations
+R=(D10**2)/(4*10*5893*10**-8)
+t=(D10**2)*10**4/(8*R)
+
+//Result
+printf("\n The Thickness is %0.3f cm",t)
+printf("\n The Radius is %0.1f cm",R)
diff --git a/3756/CH1/EX1.23/Ex1_23.sce b/3756/CH1/EX1.23/Ex1_23.sce
new file mode 100644
index 000000000..b3104e941
--- /dev/null
+++ b/3756/CH1/EX1.23/Ex1_23.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n=59 //no. of ring
+lambdaa=6*10**-7 //Wavelength
+R=0.9 //Radius
+
+//Calculations
+D59=sqrt(4*R*n*lambdaa)*10**2
+
+//Result
+printf("\n The Diameter of the nth dark ring is %0.3f cm",D59)
diff --git a/3756/CH1/EX1.24/Ex1_24.sce b/3756/CH1/EX1.24/Ex1_24.sce
new file mode 100644
index 000000000..1898d0f41
--- /dev/null
+++ b/3756/CH1/EX1.24/Ex1_24.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n=20 //no. of ring
+lambdaaR=0.0103 //Wavelength*R
+
+//Calculations
+D20=sqrt(4*n*lambdaaR)
+
+//Result
+printf("\n The Diameter of the 20th dark ring is %0.3f cm",D20)
diff --git a/3756/CH1/EX1.25/Ex1_25.sce b/3756/CH1/EX1.25/Ex1_25.sce
new file mode 100644
index 000000000..1e0a8e090
--- /dev/null
+++ b/3756/CH1/EX1.25/Ex1_25.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D3=10**-2
+lambdaa=5890*10**-10
+
+
+//Calculations
+R=(D3*sqrt(3))*10**-2/(24*lambdaa)
+
+//Result
+printf("\n The Radius is %0.2f m",R)
diff --git a/3756/CH1/EX1.26/Ex1_26.sce b/3756/CH1/EX1.26/Ex1_26.sce
new file mode 100644
index 000000000..ca2a953bc
--- /dev/null
+++ b/3756/CH1/EX1.26/Ex1_26.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n=8 //no. of ring
+D8=0.72*10**-2 //Diameter of the 8th ring
+R=3 //Radius
+
+
+//Calculations
+lambdaa=(D8**2)*10**10/((2*(2*n-1))*R)
+
+//Result
+printf("\n The Wavelength is %i Angstrom",lambdaa)
diff --git a/3756/CH1/EX1.27/Ex1_27.sce b/3756/CH1/EX1.27/Ex1_27.sce
new file mode 100644
index 000000000..e52450dfb
--- /dev/null
+++ b/3756/CH1/EX1.27/Ex1_27.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+c=3*10**10 //Speed of Light in Vacuum
+mu=1.44 //Refractive Index
+
+//Calculations
+u=c*10**-10/mu
+
+//Result
+printf("\n The Velocity in the liquid is %0.2f *10**10 m/s",u)
diff --git a/3756/CH1/EX1.29/Ex1_29.sce b/3756/CH1/EX1.29/Ex1_29.sce
new file mode 100644
index 000000000..c5b3792b6
--- /dev/null
+++ b/3756/CH1/EX1.29/Ex1_29.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5400*10**-10 //Wavelength
+n1=5
+n2=15
+R=100 //Radius of both rings
+
+//Calculations
+r5=sqrt((R*n1*lambdaa)/2)
+r15=sqrt((R*n2*lambdaa)/2)
+d=(r15)-(r5)
+
+
+//Result
+printf("\n The Distance between 5th and 15th Dark ring is %0.3f m",d)
diff --git a/3756/CH1/EX1.3/Ex1_3.sce b/3756/CH1/EX1.3/Ex1_3.sce
new file mode 100644
index 000000000..abaa730f9
--- /dev/null
+++ b/3756/CH1/EX1.3/Ex1_3.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=1 //Distance from screen
+Beta=0.31*10**-3 //Fringe Width
+d=1.9*10**-3 //Slit separation
+
+
+//Calculations
+lambdaa=(Beta*d*10**6)/D
+
+//Result
+printf("\n The Wavelength lamda=%0.4f *10**-6 m",lambdaa)
diff --git a/3756/CH1/EX1.30/Ex1_30.sce b/3756/CH1/EX1.30/Ex1_30.sce
new file mode 100644
index 000000000..94b5c1b65
--- /dev/null
+++ b/3756/CH1/EX1.30/Ex1_30.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+l=0.0025 //Distance moved
+t=0.005 //thickness of mica sheet
+
+//Calculations
+mu=((l/t)+1)
+
+//Result
+printf("\n The Refractive Index is %0.3f ",mu)
diff --git a/3756/CH1/EX1.31/Ex1_31.sce b/3756/CH1/EX1.31/Ex1_31.sce
new file mode 100644
index 000000000..102f536b1
--- /dev/null
+++ b/3756/CH1/EX1.31/Ex1_31.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+l=0.02948*10**-3 //Distance moved
+n=100 //number of fringes
+
+//Calculations
+lambdaa=(2*l)*10**10/n
+
+//Result
+printf("\n The Wavelength is %i Angstrom",lambdaa)
diff --git a/3756/CH1/EX1.32/Ex1_32.sce b/3756/CH1/EX1.32/Ex1_32.sce
new file mode 100644
index 000000000..860de93f0
--- /dev/null
+++ b/3756/CH1/EX1.32/Ex1_32.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa1=5896 //Wavelength1
+lambdaa2=5890 //Wavelength2
+
+
+//Calculations
+l=(lambdaa1*lambdaa2)/(2*(lambdaa1-lambdaa2))
+
+//Result
+printf("\n The Distance by which the mirror moved is %i *10**-10 m",l)
diff --git a/3756/CH1/EX1.4/Ex1_4.sce b/3756/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..6fab49b8e
--- /dev/null
+++ b/3756/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=0.04 //Distance from screen
+lambdaa=5890*10**-10 //Wavelength
+d=2*10**-3 //Slit separation
+n=10 //No. of fringes
+
+
+//Calculations
+x10=(n*D*lambdaa*10**-2)/d
+
+//Result
+printf("\n The position of the 10th fringe is %0.3f *10**-4 m",x10)
diff --git a/3756/CH1/EX1.5/Ex1_5.sce b/3756/CH1/EX1.5/Ex1_5.sce
new file mode 100644
index 000000000..e5fa6f310
--- /dev/null
+++ b/3756/CH1/EX1.5/Ex1_5.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=0.8 //Distance from screen
+lambdaa=5890*10**-10 //Wavelength
+Beta=9.424*10**-4 //Fringe Width
+
+
+//Calculations
+d=(D*lambdaa*10**-2)/Beta
+
+//Result
+printf("\n The position of the 10th fringe is %e *10**-4 m",d)
diff --git a/3756/CH1/EX1.6/Ex1_6.sce b/3756/CH1/EX1.6/Ex1_6.sce
new file mode 100644
index 000000000..9ec6266b8
--- /dev/null
+++ b/3756/CH1/EX1.6/Ex1_6.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=1.1 //Distance from screen
+lambdaa=5900*10**-10 //Wavelength
+d=0.00174 //Fringe separation
+
+
+//Calculations
+Beta=(D*lambdaa*10**-1)/d
+
+//Result
+printf("\n The Fringe width observed at a distance of 1m from BP is %1.1f *10**-5 m",Beta)
diff --git a/3756/CH1/EX1.7/Ex1_7.sce b/3756/CH1/EX1.7/Ex1_7.sce
new file mode 100644
index 000000000..311694357
--- /dev/null
+++ b/3756/CH1/EX1.7/Ex1_7.sce
@@ -0,0 +1,20 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=2 //Distance from screen
+lambdaa=5890*10**-10 //Wavelength
+mu=1.5 //refractive index of glass
+a=0.25 //distance from slit
+Beta=0.2*10**-3 //Fringe width
+
+
+//Calculations
+alpha=(D*lambdaa*180*10**-6)/(2*a*(mu-1)*Beta*3.14)
+A=(180-2*((alpha)))
+
+
+//Result
+printf("\n The Angle of prism at the vertex is is %i deg 17.8 min",A)
diff --git a/3756/CH1/EX1.8/Ex1_8.sce b/3756/CH1/EX1.8/Ex1_8.sce
new file mode 100644
index 000000000..aaf2d0de7
--- /dev/null
+++ b/3756/CH1/EX1.8/Ex1_8.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//
+
+//Variable declaration
+D=1 //Distance from screen
+mu=1.5 //refractive index of glass
+a=0.5 //distance from slit
+Beta=0.0135*10**-2 //Fringe width
+alpha=0.0087 //angleof prism
+
+
+//Calculations
+lambdaa=(Beta*2*a*(mu-1)*alpha*10**10)/D
+
+//Result
+printf("\n The Wavelength is %0.3f Angstrom",lambdaa)
diff --git a/3756/CH1/EX1.9/Ex1_9.sce b/3756/CH1/EX1.9/Ex1_9.sce
new file mode 100644
index 000000000..7e0eb52f0
--- /dev/null
+++ b/3756/CH1/EX1.9/Ex1_9.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+d=0.75 //slit separation
+Beta=0.087*10**-3 //Fringe width
+
+
+//Calculations
+Beta2=Beta*10**3/d
+
+//Result
+printf("\n The fringe width would become %0.3f mm",Beta2)
diff --git a/3756/CH2/EX2.1/Ex2_1.sce b/3756/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..c27031e27
--- /dev/null
+++ b/3756/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5893*10**-10 //Wavelength
+l=0.2945*10**-3 //Distance by which mirror is displaced
+
+
+//Calculations
+dellambdaa=(lambdaa**2)*10**10/(2*l)
+
+//Result
+printf("\n The Difference between two wavelengths is %0.1f Angstrom",dellambdaa)
diff --git a/3756/CH2/EX2.10/Ex2_10.sce b/3756/CH2/EX2.10/Ex2_10.sce
new file mode 100644
index 000000000..963f841ec
--- /dev/null
+++ b/3756/CH2/EX2.10/Ex2_10.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-8 //Wavelength
+invde=(2620/2.54) //Diffraction element inverse
+
+//Calculations
+n=(1/(lambdaa*invde))
+//Result
+printf("\n The orders visible would be %i ",n)
+
diff --git a/3756/CH2/EX2.12/Ex2_12.sce b/3756/CH2/EX2.12/Ex2_12.sce
new file mode 100644
index 000000000..90ef631a9
--- /dev/null
+++ b/3756/CH2/EX2.12/Ex2_12.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa1=4000*10**-8 //Wavelength1
+lambdaa2=7000*10**-8 //Wavelength2
+invde=4000 //Diffraction element inverse
+
+//Calculations
+n1=(1/(lambdaa1*invde))
+n2=(1/(lambdaa2*invde))
+//Result
+printf("\n The orders visible will be from %i to %i order Spectrum",n2,n1)
diff --git a/3756/CH2/EX2.13/Ex2_13.sce b/3756/CH2/EX2.13/Ex2_13.sce
new file mode 100644
index 000000000..1bb8b3cc4
--- /dev/null
+++ b/3756/CH2/EX2.13/Ex2_13.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-8 //Wavelength
+theta=30 //Angular Width
+
+
+//Calculations
+thetarad=((%pi/180)*(theta))
+invde=((2*lambdaa)/(sin(thetarad)))**-1
+
+//Result
+printf("\n The number of line cm in grating is %0.3f ",invde)
diff --git a/3756/CH2/EX2.14/Ex2_14.sce b/3756/CH2/EX2.14/Ex2_14.sce
new file mode 100644
index 000000000..a656e70d9
--- /dev/null
+++ b/3756/CH2/EX2.14/Ex2_14.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=6000*10**-8 //Wavelength
+sinetheta=(3/4) //Angular Width
+n=4
+
+//Calculations
+gratingele=((n*lambdaa)/sinetheta)
+//Result
+printf("\n The grating element is %0.5f cm",gratingele)
diff --git a/3756/CH2/EX2.15/Ex2_15.sce b/3756/CH2/EX2.15/Ex2_15.sce
new file mode 100644
index 000000000..e915432a4
--- /dev/null
+++ b/3756/CH2/EX2.15/Ex2_15.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=6000*10**-8 //Wavelength
+n=3
+invde=200 //inverse of diffraction element
+
+//Calculations
+sinetheta=(n*lambdaa*invde)
+thetarad=asin(sinetheta)
+theta=(180/%pi)*(thetarad)
+//Result
+printf("\n The Angle of Diffraction is %0.5f degrees",theta)
diff --git a/3756/CH2/EX2.16/Ex2_16.sce b/3756/CH2/EX2.16/Ex2_16.sce
new file mode 100644
index 000000000..8796e3db4
--- /dev/null
+++ b/3756/CH2/EX2.16/Ex2_16.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-10 //Wavelength
+theta=30 //Angular Width
+dtheta=0.01
+
+//Calculations
+thetarad=((%pi/180)*(theta))
+dlambda=((lambdaa*cos(thetarad))/(sin(thetarad)))*10**8
+
+//Result
+printf("\n The difference between the two wavelengths is %2.1f Angstrom",dlambda)
diff --git a/3756/CH2/EX2.17/Ex2_17.sce b/3756/CH2/EX2.17/Ex2_17.sce
new file mode 100644
index 000000000..b40500fa9
--- /dev/null
+++ b/3756/CH2/EX2.17/Ex2_17.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-8 //Wavelength
+N=40000 //Grating lines
+de=12.5*10**-5 //Diffraction element
+
+//Calculations
+RPmax=((de*N)/lambdaa)
+
+//Result
+printf("\n The Maximum resolving power is %i or 10**5",RPmax)
diff --git a/3756/CH2/EX2.18/Ex2_18.sce b/3756/CH2/EX2.18/Ex2_18.sce
new file mode 100644
index 000000000..ec33f00ca
--- /dev/null
+++ b/3756/CH2/EX2.18/Ex2_18.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5890 //Wavelength
+dlambdaa=6 //Difference in wavelengths
+n=2 //order
+
+//Calculations
+N=((lambdaa)/(n*dlambdaa))
+
+//Result
+printf("\n The Minimum number of lines in the grating are %3.0f ",N)
+
diff --git a/3756/CH2/EX2.2/Ex2_2.sce b/3756/CH2/EX2.2/Ex2_2.sce
new file mode 100644
index 000000000..e487b9020
--- /dev/null
+++ b/3756/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta=6*10**-3 //Angular Width
+D=1 //Distance of Screen
+
+//Calculations
+Totalangularwidth=2*theta
+tlw=Totalangularwidth*D*10**2
+
+//Result
+printf("\n The Total Linear Width of central maxima is %0.3f cm",tlw)
diff --git a/3756/CH2/EX2.3/Ex2_3.sce b/3756/CH2/EX2.3/Ex2_3.sce
new file mode 100644
index 000000000..9cb7255be
--- /dev/null
+++ b/3756/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+e=0.14 //width of the slit
+y=1.6 //Distance of center of dark band from middle of central bright band
+n=2 //no. of dark band
+D=2 //Distance from the slit
+
+//Calculations
+lambdaa=((e*y)/(D*n))*10**5
+
+//Result
+printf("\n The Wavelength is %i Angstrom",lambdaa)
diff --git a/3756/CH2/EX2.4/Ex2_4.sce b/3756/CH2/EX2.4/Ex2_4.sce
new file mode 100644
index 000000000..d8d57c616
--- /dev/null
+++ b/3756/CH2/EX2.4/Ex2_4.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-8 //Wavelength
+theta=30 //Angular Width
+
+//Calculations
+thetarad=(%pi/180)*(theta)
+sinetheta=sin(thetarad)
+e=(lambdaa)/(sinetheta)
+
+//Result
+printf("\n The Width of the slit is %0.4f cm",e)
diff --git a/3756/CH2/EX2.6/Ex2_6.sce b/3756/CH2/EX2.6/Ex2_6.sce
new file mode 100644
index 000000000..e2a556d48
--- /dev/null
+++ b/3756/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+y=5*10**-3 //First Minima
+D=2 //Distance of screen
+e=0.2*10**-3 //Slit width
+
+//Calculations
+lambdaa=((e*y)/D)*10**10
+
+//Result
+printf("\n The Wavelength is %d Angstrom",lambdaa)
diff --git a/3756/CH2/EX2.7/Ex2_7.sce b/3756/CH2/EX2.7/Ex2_7.sce
new file mode 100644
index 000000000..c3f6d29a7
--- /dev/null
+++ b/3756/CH2/EX2.7/Ex2_7.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//
+
+//Variable declaration
+y=0.005 //First Minima
+D=1 //Distance of screen
+e=0.5*10**-2 //Slit width
+
+//Calculations
+yd=(y/D)
+sinyd=(sin(yd))
+lambdaa1=((e*sinyd)/4)*10**9
+lambdaa2=((e*sinyd)/5)*10**9
+
+//Result
+printf("\n The Wavelengths are %4.0f Angstrom & %4.0f Angstrom",lambdaa1,lambdaa2)
diff --git a/3756/CH2/EX2.8/Ex2_8.sce b/3756/CH2/EX2.8/Ex2_8.sce
new file mode 100644
index 000000000..5dbb133ca
--- /dev/null
+++ b/3756/CH2/EX2.8/Ex2_8.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+n=2 //order of spectral line
+theta=30 //Angular Width
+invde=5000 //Inverse of diffraction element
+
+//Calculations
+thetarad=(%pi/180)*(theta)
+sinetheta=sin(thetarad)
+lambdaa=((sinetheta)/(n*invde))*10**8
+
+//Result
+printf("\n The Wavelength is %i Angstrom",lambdaa)
diff --git a/3756/CH2/EX2.9/Ex2_9.sce b/3756/CH2/EX2.9/Ex2_9.sce
new file mode 100644
index 000000000..337b3fd00
--- /dev/null
+++ b/3756/CH2/EX2.9/Ex2_9.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-8 //Wavelength
+invde=6000 //Diffraction element inverse
+
+//Calculations
+sinetheta1=lambdaa*invde
+sinetheta3=lambdaa*invde*3
+theta1=(180/%pi)*(asin(sinetheta1))
+theta3=(180/%pi)*(asin(sinetheta3))
+deltheta=theta3-theta1
+
+//Result
+printf("\n The Angular Difference is %2.1f Degrees",deltheta)
diff --git a/3756/CH3/EX3.1/Ex3_1.sce b/3756/CH3/EX3.1/Ex3_1.sce
new file mode 100644
index 000000000..7cb8f5622
--- /dev/null
+++ b/3756/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5896 //Wavelength
+N=60000 //Total Number of lines in 10 cm
+n1=2 //order
+n2=3 //order
+
+//Calculations
+RP=n1*N
+dlambda=((lambdaa)/(n2*N))
+
+//Result
+printf("\n (a)The resolving power in second order is %0.3f ",RP)
+printf("\n (b) The smallest wavelength that can be resolved in the 3rd order in 5896 Angstrom wavelength region is %0.4f Angstrom",dlambda)
diff --git a/3756/CH3/EX3.10/Ex3_10.sce b/3756/CH3/EX3.10/Ex3_10.sce
new file mode 100644
index 000000000..625e1c81e
--- /dev/null
+++ b/3756/CH3/EX3.10/Ex3_10.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta=6.5 //rotation of plane
+l=2 //length
+c=0.05 //concentration
+
+//Calculations
+s=(theta/(l*c))
+
+//Result
+printf("\n The Specific rotation of sugar solution is %i degree/(dm/(gm/cc)",s)
diff --git a/3756/CH3/EX3.11/Ex3_11.sce b/3756/CH3/EX3.11/Ex3_11.sce
new file mode 100644
index 000000000..18b0b3bf3
--- /dev/null
+++ b/3756/CH3/EX3.11/Ex3_11.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta=12 //rotation of plane
+l=2 //length
+s=60 //Specific rotation
+
+//Calculations
+c=(theta/(l*s))
+
+//Result
+printf("\n The Concentration of sugar solution is %0.3f gm/cc",c)
diff --git a/3756/CH3/EX3.12/Ex3_12.sce b/3756/CH3/EX3.12/Ex3_12.sce
new file mode 100644
index 000000000..34f704c34
--- /dev/null
+++ b/3756/CH3/EX3.12/Ex3_12.sce
@@ -0,0 +1,20 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta1=12 //rotation of plane
+l1=2 //length
+theta2=24 //rotation of plane
+l2=3 //length
+c1=0.08 //Concentration
+
+//Calculations
+s=((theta1)/(l1*c1))
+c2=((theta2)/(s*l2))
+Ms=10*10*10*c2
+Ms2=Ms*2
+
+//Result
+printf("\n The Mass of sugar dissolved in 2 liter of water for optical rotation 24 deg is %3.1f gm",Ms2)
diff --git a/3756/CH3/EX3.13/Ex3_13.sce b/3756/CH3/EX3.13/Ex3_13.sce
new file mode 100644
index 000000000..12d9e6153
--- /dev/null
+++ b/3756/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5086*10**-7 //Wavelength
+s=29.73 //Specific rotation
+
+//Calculations
+delmu=((s*lambdaa)/180)*10**5
+
+//Result
+printf("\n The Difference in RI is %1.1f *10**-5",delmu)
diff --git a/3756/CH3/EX3.14/Ex3_14.sce b/3756/CH3/EX3.14/Ex3_14.sce
new file mode 100644
index 000000000..ddb9cd224
--- /dev/null
+++ b/3756/CH3/EX3.14/Ex3_14.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta1=13 //rotation of plane
+l1=2 //length
+l2=3 //Length
+s=6.5 //Specific rotation
+
+//Calculations
+theta=s*l2*(1/3)
+
+//Result
+printf("\n The Concentration of sugar solution is %0.3f degree",theta)
diff --git a/3756/CH3/EX3.15/Ex3_15.sce b/3756/CH3/EX3.15/Ex3_15.sce
new file mode 100644
index 000000000..d4e3c7ea0
--- /dev/null
+++ b/3756/CH3/EX3.15/Ex3_15.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta1=35 //rotation of plane
+s=100 //Specific rotation
+c=0.1 //Concentration
+
+//Calculations
+l=((theta1)/(s*c))*10
+
+//Result
+printf("\n The Length will be %i cm",l)
diff --git a/3756/CH3/EX3.2/Ex3_2.sce b/3756/CH3/EX3.2/Ex3_2.sce
new file mode 100644
index 000000000..4d631591b
--- /dev/null
+++ b/3756/CH3/EX3.2/Ex3_2.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+mu=1.54 //refractive index of glass
+
+//Calculations
+ip=(180/%pi)*(atan(1.54))
+r=90-ip
+
+//Result
+printf("\n The Angle of polarization is %2.0f Degrees",r)
diff --git a/3756/CH3/EX3.3/Ex3_3.sce b/3756/CH3/EX3.3/Ex3_3.sce
new file mode 100644
index 000000000..f87cd4e5d
--- /dev/null
+++ b/3756/CH3/EX3.3/Ex3_3.sce
@@ -0,0 +1,13 @@
+clc
+//
+//
+//
+
+//Variable declaration
+ip=60 //Angle of incidence
+
+//Calculations
+mu=tan((%pi/180)*(ip))
+
+//Result
+printf("\n The Angle of polarization is %1.4f Degrees",mu)
diff --git a/3756/CH3/EX3.4/Ex3_4.sce b/3756/CH3/EX3.4/Ex3_4.sce
new file mode 100644
index 000000000..480d09cf5
--- /dev/null
+++ b/3756/CH3/EX3.4/Ex3_4.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+muwater=0.8660 //Refractive index of water
+
+//Calculations
+ip=(180/%pi)*(atan(muwater))
+r=90-ip
+
+//Result
+printf("\n The Angle of Refraction is %2.2f Degrees",r)
diff --git a/3756/CH3/EX3.5/Ex3_5.sce b/3756/CH3/EX3.5/Ex3_5.sce
new file mode 100644
index 000000000..f554d3183
--- /dev/null
+++ b/3756/CH3/EX3.5/Ex3_5.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=6000*10**-10 //Wavelength
+muo=1.55 //Refractive index of ordinary rays
+mue=1.54 //Refractive index of extra ordinary rays
+
+//Calculations
+t=((lambdaa)/(2*(muo-mue)))*10**2
+
+//Result
+printf("\n The thickness of the crystal is %0.3f cm",t)
diff --git a/3756/CH3/EX3.6/Ex3_6.sce b/3756/CH3/EX3.6/Ex3_6.sce
new file mode 100644
index 000000000..7a68239e3
--- /dev/null
+++ b/3756/CH3/EX3.6/Ex3_6.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5893*10**-10 //Wavelength
+muo=1.54 //Refractive index of ordinary rays
+mue=1.53 //Refractive index of extra ordinary rays
+
+//Calculations
+t=((lambdaa)/(4*(muo-mue)))*10**2
+
+//Result
+printf("\n The thickness of the crystal is %0.3f cm",t)
diff --git a/3756/CH3/EX3.7/Ex3_7.sce b/3756/CH3/EX3.7/Ex3_7.sce
new file mode 100644
index 000000000..e2392bf59
--- /dev/null
+++ b/3756/CH3/EX3.7/Ex3_7.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5893*10**-10 //Wavelength
+muo=1.551 //Refractive index of ordinary rays
+mue=1.54 //Refractive index of extra ordinary rays
+
+//Calculations
+t=((lambdaa)/(2*(muo-mue)))*10**2
+
+//Result
+printf("\n The thickness of the crystal is %0.5f cm",t)
diff --git a/3756/CH3/EX3.8/Ex3_8.sce b/3756/CH3/EX3.8/Ex3_8.sce
new file mode 100644
index 000000000..fe0d0b010
--- /dev/null
+++ b/3756/CH3/EX3.8/Ex3_8.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=4000*10**-10 //Wavelength
+mul=1.55821 //Refractive index of left landed
+mur=1.55810 //Refractive index of right landed
+t=2*10**-3 //thickness
+
+//Calculations
+orot=(180/%pi)*((2*3.14*(t*(mul-mur)))/lambdaa)
+
+//Result
+printf("\n The Amount of optical rotation produced is %3.0f degrees",orot)
diff --git a/3756/CH3/EX3.9/Ex3_9.sce b/3756/CH3/EX3.9/Ex3_9.sce
new file mode 100644
index 000000000..f897e0837
--- /dev/null
+++ b/3756/CH3/EX3.9/Ex3_9.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5000*10**-10 //Wavelength
+muo=1.5418 //Refractive index of ordinary rays
+mue=1.5508 //Refractive index of extra ordinary rays
+t=0.032*10**-3 //thickness
+
+//Calculations
+orot=((2*(t*(mue-muo)))/lambdaa)
+
+//Result
+printf("\n The Amount of optical rotation produced is %i radians",orot)
diff --git a/3756/CH4/EX4.1/Ex4_1.sce b/3756/CH4/EX4.1/Ex4_1.sce
new file mode 100644
index 000000000..88beff375
--- /dev/null
+++ b/3756/CH4/EX4.1/Ex4_1.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+theta1=9.9 //rotation of plane
+l=2 //Length
+c=0.08 //Concentration
+s2=66 //specific rotation
+
+//Calculations
+s1=((theta1)/(l*c))
+pis=((s2-s1)/s2)*100
+pps=100-pis
+
+
+//Result
+printf("\n percentage of purity of sample %0.3f percentage",pps)
diff --git a/3756/CH4/EX4.2/Ex4_2.sce b/3756/CH4/EX4.2/Ex4_2.sce
new file mode 100644
index 000000000..54e9568f4
--- /dev/null
+++ b/3756/CH4/EX4.2/Ex4_2.sce
@@ -0,0 +1,21 @@
+clc
+//
+//
+//
+
+//Variable declaration
+muclad=1.48 //Refractive index of claddings
+mucore=1.5 //Refractive index of core
+
+//Calculations
+thetac=(180/%pi)*(asin(muclad/mucore))
+fri=(mucore-muclad)/mucore
+aa=(sqrt((mucore**2)-(muclad**2)))
+NA=sin(aa)
+//Result
+printf("\n (a) The critical angle is :%2.2f degrees",thetac)
+printf("\n (b) The Fractional refractive index is :%1.3f ",fri)
+
+printf("\n (c) The Acceptance angle is :%1.3f Radians",aa)
+printf("\n (d) The Numerical Apperture is :%1.3f ",NA)
+
diff --git a/3756/CH4/EX4.3/Ex4_3.sce b/3756/CH4/EX4.3/Ex4_3.sce
new file mode 100644
index 000000000..16ee16778
--- /dev/null
+++ b/3756/CH4/EX4.3/Ex4_3.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+a=25*10**-6 //core radius
+lambdaa=0.85*10**-6 //Wavelength
+NA=0.22 //Numerical Aperture
+
+//Calculations
+V=((2*3.14*a*0.22)/lambdaa)
+N=((V**2)/4)
+
+//Result
+printf("\n (a) The V number is %2.2f ",V)
+
+printf("\n (b) The number of modes are %3.2f ",N)
+
diff --git a/3756/CH4/EX4.4/Ex4_4.sce b/3756/CH4/EX4.4/Ex4_4.sce
new file mode 100644
index 000000000..2cd6c39c0
--- /dev/null
+++ b/3756/CH4/EX4.4/Ex4_4.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+c=3*10**8
+delf=3000 //Bandwidth
+
+//Calculations
+lc=(c/delf)
+
+//Result
+printf("\n The coherence length of the laser beam is %0.3f m or 10**5 m",lc)
diff --git a/3756/CH4/EX4.5/Ex4_5.sce b/3756/CH4/EX4.5/Ex4_5.sce
new file mode 100644
index 000000000..172a701eb
--- /dev/null
+++ b/3756/CH4/EX4.5/Ex4_5.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5*10**-5 //Wavelength
+theta=32 //Angle subtended by the sun at the slit
+
+//Calculations
+l=((lambdaa*60*180)/(theta*3.14))
+
+//Result
+printf("\n The transverse coherence length is %1.3f cm",l)
diff --git a/3756/CH6/EX6.1/Ex6_1.sce b/3756/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..56b1cba1c
--- /dev/null
+++ b/3756/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+lambdaa=5400*10**-10 //Wavelength
+tc=10**-10 //coherence time
+c=3*10**-8
+
+//Calculations
+dom=((lambdaa)/(tc*c))*10**-10
+
+//Result
+printf("\n The Degree of Monochromaticity is %2.0f *10**-6",dom)
diff --git a/3756/CH6/EX6.2/Ex6_2.sce b/3756/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..d47c323e8
--- /dev/null
+++ b/3756/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+W=(3.14/3) //Angular frequency in radian
+
+
+
+//Calculations
+t=((3.14)/(3*W))
+
+//Result
+printf("\n The time taken to move from one end of its path to 0.025m from mean position is %i sec",t)
diff --git a/3756/CH6/EX6.3/Ex6_3.sce b/3756/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..a86913613
--- /dev/null
+++ b/3756/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+T=31.4 //Time Period
+A=0.06 //Amplitude
+
+
+//Calculations
+W=((2*3.14)/T)
+Vmax=W*A
+
+//Result
+printf("\n The Maximum Velocity is %0.3f m/sec",Vmax)
diff --git a/3756/CH6/EX6.5/Ex6_5.sce b/3756/CH6/EX6.5/Ex6_5.sce
new file mode 100644
index 000000000..6ff0a6212
--- /dev/null
+++ b/3756/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,18 @@
+clc
+//
+//
+//
+
+//Variable declaration
+m=8 //mass
+g=9.8 //acceleration due to gravity
+x=0.32 //Stretched spring deviation
+m2=0.5 //mass of the other body
+
+
+//Calculations
+k=((m*g)/x)
+T=((2*3.14)*sqrt(m2/k))
+
+//Result
+printf("\n The Time Period of Oscillation for the other body is %0.2f sec",T)
diff --git a/3756/CH6/EX6.7/Ex6_7.sce b/3756/CH6/EX6.7/Ex6_7.sce
new file mode 100644
index 000000000..efc1bb918
--- /dev/null
+++ b/3756/CH6/EX6.7/Ex6_7.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+Q=2000 //Quality Factor
+f=240 //Frequency
+
+
+//Calculations
+Tau=((Q)/(2*3.14*f))
+t=4*Tau
+
+//Result
+printf("\n The Time in which the amplitude decreases is %1.1f sec",t)
diff --git a/3756/CH7/EX7.1/Ex7_1.sce b/3756/CH7/EX7.1/Ex7_1.sce
new file mode 100644
index 000000000..682461a1e
--- /dev/null
+++ b/3756/CH7/EX7.1/Ex7_1.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+A=50/1.4 //Amplitude which is A=(50f/1.4*W**2)
+Amax=50 //Max Amplitude which is Amax=(50f/W**2)
+
+
+//Calculations
+Rat=A/Amax
+
+//Result
+printf("\n The Value of A/Amax is %0.2f ",Rat)
+
diff --git a/3756/CH7/EX7.2/Ex7_2.sce b/3756/CH7/EX7.2/Ex7_2.sce
new file mode 100644
index 000000000..6c25c9c09
--- /dev/null
+++ b/3756/CH7/EX7.2/Ex7_2.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+E0=8.86*10**-12
+mu0=4*3.14*10**-7
+H=1
+
+//Calculations
+E=H*(sqrt(mu0/E0))
+
+//Result
+printf("\n The Magnitude of E for a plane wave in free space is %3.1f ",E)
+
diff --git a/3756/CH7/EX7.3/Ex7_3.sce b/3756/CH7/EX7.3/Ex7_3.sce
new file mode 100644
index 000000000..0152d4498
--- /dev/null
+++ b/3756/CH7/EX7.3/Ex7_3.sce
@@ -0,0 +1,23 @@
+clc
+//
+//
+//
+
+//Variable declaration
+mu0=4*3.14*10**-7
+mur=1
+Er=2
+E0=8.86*10**-12
+E01=5
+c=3*10**8
+
+//Calculations
+Z=sqrt((mu0*mur)/(E0*Er))
+H0=(E01/Z)*10
+v=((c)/sqrt(mur*Er))*10**-8
+
+//Result
+printf("\n The Impedence of the Medium is %3.1f ",Z)
+
+printf("\n The Peak Magnetic Field Intensity is %1.3f A/m",H0)
+printf("\n The Velocity of the wave is %1.2f *10**8 m/s",v)
diff --git a/3756/CH7/EX7.4/Ex7_4.sce b/3756/CH7/EX7.4/Ex7_4.sce
new file mode 100644
index 000000000..e734fe8e9
--- /dev/null
+++ b/3756/CH7/EX7.4/Ex7_4.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+c=3*10**8
+f=3*10**11
+E0=50
+
+//Calculations
+lambdaa=(c/f)
+B0=(E0/c)*10**7
+
+//Result
+printf("\n The Wavelength is %0.3f m or 10**-3 m",lambdaa)
+printf("\n The Amplitude of the oscillating magnetic field is %1.2f *10**-7 T",B0)
diff --git a/3756/CH7/EX7.5/Ex7_5.sce b/3756/CH7/EX7.5/Ex7_5.sce
new file mode 100644
index 000000000..00477719f
--- /dev/null
+++ b/3756/CH7/EX7.5/Ex7_5.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+R=1.5*10**11 //Average distance between sun & Earth
+P=3.8*10**26 //Power Radiated by sun
+
+
+//Calculations
+S=((P*60)/(4*3.14*(R**2)*4.2*100))*10**-2
+
+//Result
+printf("\n The Average solar energy incident on earth is %1.2f cal/cm**2/min",S)
diff --git a/3756/CH7/EX7.6/Ex7_6.sce b/3756/CH7/EX7.6/Ex7_6.sce
new file mode 100644
index 000000000..2d82ff7ad
--- /dev/null
+++ b/3756/CH7/EX7.6/Ex7_6.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+S=2 //solar energy
+EH=1400
+Z=376.6
+
+//Calculations
+E=sqrt(EH*Z)
+H=sqrt(EH/Z)
+E0=E*sqrt(2)
+H0=H*sqrt(2)
+
+//Result
+printf("\n The Amplitude of Electric field is %i V/m",E0)
+printf("\n The Amplitude of Magnetic field per turn is %1.2f A-turn/m",H0)
diff --git a/3756/CH7/EX7.7/Ex7_7.sce b/3756/CH7/EX7.7/Ex7_7.sce
new file mode 100644
index 000000000..da1168eea
--- /dev/null
+++ b/3756/CH7/EX7.7/Ex7_7.sce
@@ -0,0 +1,16 @@
+clc
+//
+//
+//
+
+//Variable declaration
+EH=(1000/(16*3.14))
+Z=376.6
+
+//Calculations
+E=sqrt(EH*Z)
+H=sqrt(EH/Z)
+
+//Result
+printf("\n The Intensity of Electric field is %2.2f V/m",E)
+printf("\n The Intensity of Magnetic Field is %0.3f A-turn/m",H)
diff --git a/3756/CH7/EX7.9/Ex7_9.sce b/3756/CH7/EX7.9/Ex7_9.sce
new file mode 100644
index 000000000..42d4b7e9f
--- /dev/null
+++ b/3756/CH7/EX7.9/Ex7_9.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+C=70*10**-12 //Cable Capacitance
+L=0.39*10**-6 //Cable Inductance
+
+//Calculations
+Z0=(sqrt(L/C))
+
+//Result
+printf("\n The Characteristic Impedence is %2.2f Ohm",Z0)
diff --git a/3756/CH8/EX8.1/Ex8_1.sce b/3756/CH8/EX8.1/Ex8_1.sce
new file mode 100644
index 000000000..25244800a
--- /dev/null
+++ b/3756/CH8/EX8.1/Ex8_1.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+VF=0.62 //Velocity Factor of coaxial Cable
+
+//Calculations
+Er=(1/(VF**2))
+
+//Result
+printf("\n The Dielectric Constant of the insulation used is %1.1f ",Er)
+
diff --git a/3756/CH8/EX8.2/Ex8_2.sce b/3756/CH8/EX8.2/Ex8_2.sce
new file mode 100644
index 000000000..92778c31e
--- /dev/null
+++ b/3756/CH8/EX8.2/Ex8_2.sce
@@ -0,0 +1,17 @@
+clc
+//
+//
+//
+
+//Variable declaration
+k=1.000074
+E=100
+E0=8.854*10**-12
+n=0.268*10**26
+
+//Calculations
+p=(k-1)*E0*E
+P=(p/n)*10**38
+
+//Result
+printf("\n The Dipole Moment induced in each Helium atom is %1.3f *10**-38 Coul-m",P)
diff --git a/3756/CH8/EX8.3/Ex8_3.sce b/3756/CH8/EX8.3/Ex8_3.sce
new file mode 100644
index 000000000..db082fb38
--- /dev/null
+++ b/3756/CH8/EX8.3/Ex8_3.sce
@@ -0,0 +1,13 @@
+clc
+//
+//
+//
+
+//Variable declaration
+k=1.000074
+//Calculations
+X=(k-1)
+
+//Result
+printf("\n The Electrical Susceptibility is %0.6f ",X)
+
diff --git a/3756/CH8/EX8.4/Ex8_4.sce b/3756/CH8/EX8.4/Ex8_4.sce
new file mode 100644
index 000000000..ac9d530e3
--- /dev/null
+++ b/3756/CH8/EX8.4/Ex8_4.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+E=1*10**-4
+D=5*10**-4
+V=0.5
+P=4*10**-4
+
+//Calculations
+Er=(D/E)
+NDM=P*V
+
+//Result
+printf("\n (a) The Value of Er is %i ",Er)
+
+printf("\n (b) The Net Dipole Moment is %0.4f coul-m or 2*10**-4 coul-m",NDM)
diff --git a/3756/CH9/EX9.1/Ex9_1.sce b/3756/CH9/EX9.1/Ex9_1.sce
new file mode 100644
index 000000000..fb6f83c63
--- /dev/null
+++ b/3756/CH9/EX9.1/Ex9_1.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+k=3
+E0=8.854*10**-12
+E=10**6
+
+//Calculations
+P=(E0*(k-1)*E)*10**6
+D=(E0*k*E)*10**6
+Ed=0.5*E0*k*(E**2)
+
+//Result
+printf("\n (a) The Polarization in the Dielectric is %2.2f *10**-6 coul/m**2",P)
+printf("\n (b) The Displacement Current Density is %2.2f *10**-6 coul/m**2",D)
+printf("\n (c) The Energy Density is %0.3f J/m**3",Ed)
diff --git a/3756/CH9/EX9.2/Ex9_2.sce b/3756/CH9/EX9.2/Ex9_2.sce
new file mode 100644
index 000000000..2dd3d9c7a
--- /dev/null
+++ b/3756/CH9/EX9.2/Ex9_2.sce
@@ -0,0 +1,15 @@
+clc
+//
+//
+//
+
+//Variable declaration
+l=2*6371 //Diameter of earth
+v=30 //velocity
+c=3*10**5 //velocity of light
+
+//Calculations
+dell=(l*v**2)/(2*c**2)/10**-5
+
+//Result
+printf("\n Change in length in diameter= %0.2f *10**-2 m",dell)
diff --git a/3756/CH9/EX9.3/Ex9_3.sce b/3756/CH9/EX9.3/Ex9_3.sce
new file mode 100644
index 000000000..9add0dade
--- /dev/null
+++ b/3756/CH9/EX9.3/Ex9_3.sce
@@ -0,0 +1,14 @@
+clc
+//
+//
+//
+
+//Variable declaration
+delt=10 //time duration at earth
+delt1=1/365
+
+//Calculations
+v=sqrt(1-(delt1/delt)**2)
+
+//Result
+printf("\n The minimum speed v= %0.3f c",v)
diff --git a/3756/CH9/EX9.4/Ex9_4.sce b/3756/CH9/EX9.4/Ex9_4.sce
new file mode 100644
index 000000000..9294a9dca
--- /dev/null
+++ b/3756/CH9/EX9.4/Ex9_4.sce
@@ -0,0 +1,19 @@
+clc
+//
+//
+//
+
+//Variable declaration
+L0=20 //The distance of the star
+v=0.95 //velocity
+
+//Calculations
+t=L0/v
+L=L0*sqrt(1-v**2)
+L=(L)
+
+t1=(L*3*10**8)/(v*3*10**8)
+
+//Result
+printf("\n (1) The time taken on earth (t) = %0.2f year",t)
+printf("\n (2) The time taken on spaceship (t1) = %0.2f year",t1)