MATLAB 光学谐振腔的设计.doc

A1：光学谐振腔的设计设计任务：有一平面镜和曲率半径为的凹面镜，画出光束发散角与腔长的关系曲线。设计要求：（1）具有友好输入输出界面；（2）可输入不同凹面镜曲率半径值，查看结果变化情况。function varargout = A1(varargin)% A1 M-file for A1.fig% A1, by itself, creates a new A1 or raises the existing% singleton*.% H = A1 returns the handle to a new A1 or the handle to% the existing singleton*.% A1(CALLBACK,hObject,eventData,handles,.) calls the local% function named CALLBACK in A1.M with the given input arguments.% A1(Property,Value,.) creates a new A1 or raises the% existing singleton*. Starting from the left, property value pairs are% applied to the GUI before A1_OpeningFunction gets called. An% unrecognized property name or invalid value makes property application% stop. All inputs are passed to A1_OpeningFcn via varargin.% *See GUI Options on GUIDEs Tools menu. Choose GUI allows only one% instance to run (singleton).% See also: GUIDE, GUIDATA, GUIHANDLES% Copyright 2002-2003 The MathWorks, Inc.% Edit the above text to modify the response to help A1% Last Modified by GUIDE v2.5 21-Oct-2010 18:17:18% Begin initialization code - DO NOT EDITgui_Singleton = 1;gui_State = struct(gui_Name, mfilename, . gui_Singleton, gui_Singleton, . gui_OpeningFcn, A1_OpeningFcn, . gui_OutputFcn, A1_OutputFcn, . gui_LayoutFcn, , . gui_Callback, );if nargin & ischar(varargin1) gui_State.gui_Callback = str2func(varargin1);endif nargout varargout1:nargout = gui_mainfcn(gui_State, varargin:);else gui_mainfcn(gui_State, varargin:);end% End initialization code - DO NOT EDIT% - Executes just before A1 is made visible.function A1_OpeningFcn(hObject, eventdata, handles, varargin)% This function has no output args, see OutputFcn.% 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 command line arguments to A1 (see VARARGIN)% Choose default command line output for A1handles.output = hObject;% Update handles structureguidata(hObject, handles);% UIWAIT makes A1 wait for user response (see UIRESUME)% uiwait(handles.figure1);% - Outputs from this function are returned to the command line.function varargout = A1_OutputFcn(hObject, eventdata, handles) % varargout cell array for returning output args (see VARARGOUT);% hObject handle to figure% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% Get default command line output from handles structurevarargout1 = handles.output;% - Executes on button press in pushbutton1.function pushbutton1_Callback(hObject, eventdata, handles)% hObject handle to pushbutton1 (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)handles.R=str2double(get(handles.editR,string);handles.B=str2double(get(handles.editB,string);guidata(hObject,handles);L=0.1*101:0.1:102;f=sqrt(L*handles.R*102-L.2);w=sqrt(handles.B*10(-4)*f/pi);jiao=2*handles.B*10(-4)/pi./w;plot(L,jiao);grid on;xlabel(腔长l(cm);ylabel(散射角(rad); title(光束发散角与腔长的关系曲线);function editR_Callback(hObject, eventdata, handles)% hObject handle to editR (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,String) returns contents of editR as text% str2double(get(hObject,String) returns contents of editR as a double% - Executes during object creation, after setting all properties.function editR_CreateFcn(hObject, eventdata, handles)% hObject handle to editR (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.% See ISPC and COMPUTER.if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);endfunction editB_Callback(hObject, eventdata, handles)% hObject handle to editB (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,String) returns contents of editB as text% str2double(get(hObject,String) returns contents of editB as a double% - Executes during object creation, after setting all properties.function editB_CreateFcn(hObject, eventdata, handles)% hObject handle to editB (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles empty - handles not created until after all CreateFcns called% Hint: edit controls usually have a white background on Windows.% See ISPC and COMPUTER.if ispc set(hObject,BackgroundColor,white);else set(hObject,BackgroundColor,get(0,defaultUicontrolBackgroundColor);end% - Executes on button press in pushbutton2.function pushbutton2_Callback(hObject, eventdata, handles)close(gcf)% hObject handle to pushbutton2 (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% - Executes on key press over pushbutton2 with no controls selected.function pushbutton2_KeyPressFcn(hObject, eventdata, handles)% hObject handle to pushbutton2 (see GCBO)% eventdata reserved - to be defined in a future version of MATLAB% handles structure with handles and user data (see GUIDATA)% - Executes on ke