summaryrefslogtreecommitdiff
path: root/3363/CH4/EX4.10/Ex4_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '3363/CH4/EX4.10/Ex4_10.sce')
-rwxr-xr-x3363/CH4/EX4.10/Ex4_10.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3363/CH4/EX4.10/Ex4_10.sce b/3363/CH4/EX4.10/Ex4_10.sce
new file mode 100755
index 000000000..05b9a13d6
--- /dev/null
+++ b/3363/CH4/EX4.10/Ex4_10.sce
@@ -0,0 +1,14 @@
+//Example 4.10, Page 125
+clc
+//For Hydrogen atom
+R_o=109737//in cm
+m=1
+M=1836
+RH=(R_o)/(1+(m/M))
+printf("\n Spectrum line for Hydrogen occur at %f /cm ",RH)
+//For Deuterium atom
+R_o=109737//in cm
+m=1
+M=2*1836
+RD=(R_o)/(1+(m/M))
+printf("\n Spectrum line for Deuterium occur at %f /cm ",RD) \ No newline at end of file