diff options
Diffstat (limited to '446/CH6/EX6.6/6_6.sce')
-rwxr-xr-x | 446/CH6/EX6.6/6_6.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/446/CH6/EX6.6/6_6.sce b/446/CH6/EX6.6/6_6.sce new file mode 100755 index 000000000..0764366c9 --- /dev/null +++ b/446/CH6/EX6.6/6_6.sce @@ -0,0 +1,8 @@ +clear
+clc
+disp('Exa-6.6');
+Rinfi=1.097*10^7; //known value
+n1=3;n2=2; //first 2 given states
+w=(n1^2*n2^2)/((n1^2-n2^2)*Rinfi);printf('Wavelength of trnasition from n1=3 to n2=2 is %.3f nm\n',w*10^9);
+n1=4;n2=2; //second 2 given states
+w=(n1^2*n2^2)/((n1^2-n2^2)*Rinfi);printf('Wavelength of trnasition from n1=3 to n2=2 is %.3f nm',w*10^9);
\ No newline at end of file |