049 Matlab 함수 02
함수 (function)
function[EE]=energy(q)
clear all
hold on
dx=300e-13;
clear all
hold on
dx=300e-13;
me=9.11*10^-31;
haba=1.054*10^-34;
k=0;
C(1)=1;
B(1)=1;
x(1)=-300e-11;
for i=-300e-11:dx:300e-11
k=k+1;
A(k)=((-2*me*(q-(0.5*0.021*i^2)))/haba^2)*C(k);
B(k+1)=B(k)+A(k)*dx;
C(k+1)=C(k)+B(k)*dx;
x(k+1)=x(k)+dx;
end
EE=C(k+1)
haba=1.054*10^-34;
k=0;
C(1)=1;
B(1)=1;
x(1)=-300e-11;
for i=-300e-11:dx:300e-11
k=k+1;
A(k)=((-2*me*(q-(0.5*0.021*i^2)))/haba^2)*C(k);
B(k+1)=B(k)+A(k)*dx;
C(k+1)=C(k)+B(k)*dx;
x(k+1)=x(k)+dx;
end
EE=C(k+1)
댓글
댓글 쓰기