A New Teaching Approach
To Quantum Mechanical Tunneling
G.P.Gilfoyle
Physics Department
University of Richmond, Virginia
ggilfoyl@richmond.edu
Outline
Background and Motivation
Solving the Schrödinger Equation
The one-dimensional, nonrelativistic Schrödinger equation is
The general solution is
Express this solution as a matrix.
Match the wave function and its derivative at the boundaries.
Write the result in matrix form.
Use the definition of the matrix inverse and get
Shift coordinates.
Match the wave function and its derivative
at the right-hand-side boundary in the new coordinates.
Relate the two
coordinate systems.
And obtain the following result.
Build the transfer matrix
The final result.
Get the transmission coefficient.
Gather the pieces.
Build the transfer matrix.
The final result.
Get the transmission coefficient.
Consider a series of rectangular barriers.
Build up the transfer matrix.
And get the transmission coefficient as before.
Define a function to calculate the transmission coefficient.
RadDecay[Znuc_,Anuc_,Eout_,Ndiv_] := ( (* constants *) Mout = Aout*AtoMeV; R0 = r0*(Anuc - Aout)^(1/3); Rmax = Zout*(Znuc - Zout)*e2/Eout; step = (Rmax - R0)/Ndiv; (* table of barrier heights *) Ve = Table[{r, Zout*Znuc*e2/r},{r, R0, Rmax-step,step}]; (* put zeros at each end of the array. *) PrependTo[Ve, {R0-step, 0}]; AppendTo[Ve, {Rmax, 0}]; (* initialize the transfer matrix. *) trans = { {1,0}, {0,1} }; (* loop over the barriers *) Do[ V1 = Ve[[i,2]]; V2 = Ve[[i+1,2]]; k1 = Sqrt[2*Mout*(Eout - V1)/(hbarc^2) ]; k2 = Sqrt[2*Mout(Eout - V2)/(hbarc^2) ]; d = 0.5*{ {1 + (k2/k1), 1 - (k2/k1)}, {1 - (k2/k1), 1 + (k2/k1)} }; p = { {E^(I*k2*step), 0}, {0 ,E^(-I*k2*step)} }; trans = trans.d.p;, {i,1,Ndiv+1} ]; (* get the transmission coefficient. *) tr = Abs[1/(Conjugate[ trans[[1,1]] ]*trans[[1,1]])]; Print["Transmission Coefficient: ",tr] )
Support provided by the United States National Science Foundation and the University of Richmond.