summaryrefslogtreecommitdiff
path: root/1016/CH8/EX8.6/ex8_6.sce
blob: 1aca3fff727c02ec5dbd74a0ab2afc485a949f04 (plain)
1
2
3
4
5
6
7
8
9
10
11
clc;clear;
//Example 8.6

//given data
W=1.43*10^-10;//wavelength in m
Z=74;//atomic no
R=10.97*10^6;//Rydberg constant in 1/m

//calcualation
b=74-sqrt(36/(5*R*W));//Transition from to M to L
disp(b,'the screening const.')