summaryrefslogtreecommitdiff
path: root/3701/CH8/EX8.7/Ex8_7.sce
blob: 03618c549dd77b650cae5d01c42557d63db09454 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
////Given
E=2                                 //ev
v0=3                                //ev
m=9*10**-31
a=1*10**-10                        //m
h=1.05*10**-34
b=(v0-E)*(1.6*10**-19)

//Calculation
//
Ka=((sqrt(2*m*(b)))*a)/h
x=sin(Ka*3.14/180.0)
T=(v0**2)/(4.0*E*(v0-E))
T1=1/(1.0+(T*x))

//Result
printf("\n Transmission coefficient is  %0.2f ",T1)