那个随机数序列即是实现势垒隧穿动态随机进程的依据。
势垒隧穿动态随机进程的实现
利用上述生成的只有0和1两种取值的随机数序列，借助运算机程序设计语言或图形软件，就可实现势垒隧穿动态随机进程的模拟。
那个地址采纳编写Matlab程序的方式来实现。
在编写Matlab程序时，用Matlab的rand函数产生0至1之间均匀散布的随机数，利用EraseMode属性的Xor值，可实现对图形对象本身的擦除，从而实现动画模式，程序设计流程图如下
图2方势垒隧穿效应动态随机进程程序流程图
图3GUI界面的图
图4入射粒子能量大于势垒高度时的GUI界面显示图
图5入射粒子能量小于势垒高度时的GUI界面显示图
4模型组成模块功能描述
势垒隧穿的动态随机进程Matlab程序的功能描述如下：
functionvarargout=untitledhan（varargin）
%UNTITLEDHANM-filefor
%UNTITLEDHAN,byitself,createsanewUNTITLEDHANorraisestheexisting
%singleton*.
%H=UNTITLEDHANreturnsthehandletoanewUNTITLEDHANorthehandleto
%theexistingsingleton*.
%UNTITLEDHAN（'CALLBACK',hObject,eventData,handles,...）callsthelocal
%functionnamedCALLBACKinwiththegiveninputarguments.
%UNTITLEDHAN（'Property','Value',...）createsanewUNTITLEDHANorraisesthe
%existingsingleton*.Startingfromtheleft,propertyvaluepairsare
%appliedtotheGUIbeforeuntitledhan_OpeningFunctiongetscalled.An
%unrecognizedpropertynameorinvalidvaluemakespropertyapplication
%stop.Allinputsarepassedtountitledhan_OpeningFcnviavarargin.
%*SeeGUIOptionsonGUIDE'sToolsmenu.Choose"GUIallowsonlyone
%instancetorun（singleton）".
%Seealso:
GUIDE,GUIDATA,GUIHANDLES
%Copyright2002-2003TheMathWorks,Inc.
%Edittheabovetexttomodifytheresponsetohelpuntitledhan
%LastModifiedbyGUIDE21-Jan-202022:
42:
31
%Begininitializationcode-DONOTEDIT
gui_Singleton=1;
gui_State=struct（'gui_Name',mfilename,...
gui_Singleton',gui_Singleton,...
gui_OpeningFcn',@untitledhan_OpeningFcn,...
gui_OutputFcn',@untitledhan_OutputFcn,...
gui_LayoutFcn',[],...
gui_Callback',[]）;
ifnargin&&ischar（varargin{1}）
=str2func（varargin{1}）;
end
ifnargout
[varargout{1:
nargout}]=gui_mainfcn（gui_State,varargin{:
}）;
else
gui_mainfcn（gui_State,varargin{:
}）;
end
%Endinitializationcode-DONOTEDIT
%---Executesjustbeforeuntitledhanismadevisible.
functionuntitledhan_OpeningFcn（hObject,eventdata,handles,varargin）
%Thisfunctionhasnooutputargs,seeOutputFcn.
%hObjecthandletofigure
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesstructurewithhandlesanduserdata（seeGUIDATA）
%varargincommandlineargumentstountitledhan（seeVARARGIN）
%Choosedefaultcommandlineoutputforuntitledhan
=hObject;
%Updatehandlesstructure
guidata（hObject,handles）;
%UIWAITmakesuntitledhanwaitforuserresponse（seeUIRESUME）
%uiwait;
%Outputsfromthisfunctionarereturnedtothecommandline.
functionvarargout=untitledhan_OutputFcn（hObject,eventdata,handles）
%varargoutcellarrayforreturningoutputargs（seeVARARGOUT）;
%hObjecthandletofigure
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesstructurewithhandlesanduserdata（seeGUIDATA）
%Getdefaultcommandlineoutputfromhandlesstructure
varargout{1}=;
functionedit1_Callback（hObject,eventdata,handles）
%hObjecthandletoedit1（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesstructurewithhandlesanduserdata（seeGUIDATA）
%Hints:
get（hObject,'String'）returnscontentsofedit1astext
%str2double（get（hObject,'String'））returnscontentsofedit1asadouble
edit1=str2double（get（hObject,'String'））;
ifisnan（edit1）
set（hObject,'String',0）;
errordlg（'Inputmustbeanumber','Error'）;
end
data=getappdata（gcbf,'metricdata'）;
=edit1;
setappdata（gcbf,'metricdata',data）;%用以实现输入势垒高度的回调函数
%Executesduringobjectcreation,aftersettingallproperties.
functionedit1_CreateFcn（hObject,eventdata,handles）
%hObjecthandletoedit1（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesempty-handlesnotcreateduntilafterallCreateFcnscalled
%Hint:
editcontrolsusuallyhaveawhitebackgroundonWindows.
%SeeISPCandCOMPUTER.
Ifispc&&isequal（get（hObject,'BackgroundColor'）,get（0,'defaultUicontrolBackgroundColor'））
set（hObject,'BackgroundColor','white'）;
end
functionedit2_Callback（hObject,eventdata,handles）
%hObjecthandletoedit2（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesstructurewithhandlesanduserdata（seeGUIDATA）
%Hints:
get（hObject,'String'）returnscontentsofedit2astext
%str2double（get（hObject,'String'））returnscontentsofedit2asadouble
edit2=str2double（get（hObject,'String'））;
ifisnan（edit2）
set（hObject,'String',0）;
errordlg（'Inputmustbeanumber','Error'）;
end
data=getappdata（gcbf,'metricdata'）;
=edit2;
setappdata（gcbf,'metricdata',data）;%用以实现输入势垒宽度的回调函数
%---Executesduringobjectcreation,aftersettingallproperties.
functionedit2_CreateFcn（hObject,eventdata,handles）
%hObjecthandletoedit2（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesempty-handlesnotcreateduntilafterallCreateFcnscalled
%Hint:
editcontrolsusuallyhaveawhitebackgroundonWindows.
%SeeISPCandCOMPUTER.
ifispc&&isequal（get（hObject,'BackgroundColor'）,get（0,'defaultUicontrolBackgroundColor'））
set（hObject,'BackgroundColor','white'）;
end
functionedit3_Callback（hObject,eventdata,handles）
%hObjecthandletoedit3（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesstructurewithhandlesanduserdata（seeGUIDATA）
%Hints:
get（hObject,'String'）returnscontentsofedit3astext
%str2double（get（hObject,'String'））returnscontentsofedit3asadouble
edit3=str2double（get（hObject,'String'））;
ifisnan（edit3）
set（hObject,'String',0）;
errordlg（'Inputmustbeanumber','Error'）;
end
data=getappdata（gcbf,'metricdata'）;
=edit3;
setappdata（gcbf,'metricdata',data）;%用以实现输入粒子质量的回调函数
%Executesduringobjectcreation,aftersettingallproperties.
functionedit3_CreateFcn（hObject,eventdata,handles）
%hObjecthandletoedit3（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesempty-handlesnotcreateduntilafterallCreateFcnscalled
%Hint:
editcontrolsusuallyhaveawhitebackgroundonWindows.
%SeeISPCandCOMPUTER.
Ifispc&&isequal（get（hObject,'BackgroundColor'）,get（0,'defaultUicontrolBackgroundColor'））
set（hObject,'BackgroundColor','white'）;
end
functionedit4_Callback（hObject,eventdata,handles）
%hObjecthandletoedit4（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesstructurewithhandlesanduserdata（seeGUIDATA）
%Hints:
get（hObject,'String'）returnscontentsofedit4astext
%str2double（get（hObject,'String'））returnscontentsofedit4asadouble
edit4=str2double（get（hObject,'String'））;
ifisnan（edit4）
set（hObject,'String',0）;
errordlg（'Inputmustbeanumber','Error'）;
end
data=getappdata（gcbf,'metricdata'）;
=edit4;
setappdata（gcbf,'metricdata',data）;%用以实现输入粒子能量的回调函数
%Executesduringobjectcreation,aftersettingallproperties.
functionedit4_CreateFcn（hObject,eventdata,handles）
%hObjecthandletoedit4（seeGCBO）
%eventdatareserved-tobedefinedinafutureversionofMATLAB
%handlesempty-handlesnotcreateduntilafterallCreateFcnscalled
%Hint:
editcon
升级会员 