【正文】 See ISPC and COMPUTER. if ispc amp。) returns contents of wavelength as text % str2double(get(hObject,39。 function wavelength_Callback(hObject, eventdata, handles) % hObject handle to wavelength (see GCBO) % eventdata reserved to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % Hints: get(hObject,39。 imshow(LOGO) % Outputs from this function are returned to the mand line. function varargout = Laser_GUI_OutputF(hObject, eventdata, handles) % varargout cell array for returning output args (see VARARGOUT)。39。 % UIWAIT makes Laser_GUI wait for user response (see UIRESUME) % uiwait()。 end % End initialization code DO NOT EDIT % Executes just before Laser_GUI is made visible. function Laser_GUI_OpeningF(hObject, eventdata, handles, varargin) % This function has no output args, see OutputF. % hObject handle to figure % eventdata reserved to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % varargin mand line arguments to Laser_GUI (see VARARGIN) % Choose default mand line output for Laser_GUI = hObject。 end if nargout [varargout{1:nargout}] = gui_mainf(gui_State, varargin{:})。amp。, [])。, [] , ... 39。, Laser_GUI_OutputF, ... 39。, Laser_GUI_OpeningF, ... 39。, gui_Singleton, ... 39。, mfilename, ... 39。 gui_State = struct(39。,...) creates a new LASER_GUI or raises the % existing singleton*. Starting from the left, property value pairs are % applied to the GUI before Laser_GUI_OpeningF gets called. An % unrecognized property name or invalid value makes property application % stop. All inputs are passed to Laser_GUI_OpeningF via varargin. % % *See GUI Options on GUIDE39。,39。,hObject,eventData,handles,...) calls the local % function named CALLBACK in with the given input arguments. % % LASER_GUI(39。 六、主要參考文獻 [1] 周炳琨 . 激光原理 (第 六 版 ) [M] . 北京 : 國防工業(yè)出版社 , 2020. [2] Fox,Tingye Li. Resonant Modes in a Maser Interferometer. [J].BellSystem Technology, 1961, 40: 453488. 附錄 GUI 程序： function varargout = Laser_GUI(varargin) % LASER_GUI Mfile for % LASER_GUI, by itself, creates a new LASER_GUI or raises the existing % singleton*. % % H = LASER_GUI returns the handle to a new LASER_GUI or the handle to % the existing singleton*. % % LASER_GUI(39。 相位分布圖像由于 matlab 函數(shù)問題有一段會變得很大（略小于 360，其實應該為 0） 。 四、 本設計改進建議 由于時間有限，只討論了方形鏡平行平面腔 。 GUI 界面的制作 由于制作了多種圖像顯示方式，為了方便使用，設計了如下圖的 GUI 界面： 激光原理課程設計 9 在 GUI中可以動態(tài)地顯示振幅和相位在 x 方向以及在鏡面上相對分布。 step_length=2*a/(steps1)。)。ylabel(39。x39。 angle_u0=angle_u0angle_u0(steps/2)。)。ylabel(39。x39。 u30_flag=u30_flag+1。 if u30_flag==31 u30_flag=1。 end。 else N=N+1。 %判據(jù)矩陣維數(shù)標記為 N=30。 end flag=1。 u_=u0/max(abs(u0))。 for m=1:30 for mm=1:steps u0(mm)=QU(x(mm),u_)。 x=linspace(a,a,steps)。 k=2*pi/lamda。精度 =39。)。 a=input(39。腔長 L=39。)。 實現(xiàn)方法是這樣的：設 一次積分將計算 steps 個點， 先迭代 30