MATLAB高斯光束傳播軌跡的模擬

1、B1： xx 光束傳播軌跡的模擬設(shè)計(jì)任務(wù)：作圖表示 xx 光束的傳播軌跡( 1)基模高斯光束在自由空間的傳播軌跡；( 2)基模高斯光束經(jīng)單透鏡變換前后的傳播軌跡；( 3)基模高斯光束經(jīng)調(diào)焦望遠(yuǎn)鏡變換前后的傳播軌跡。function vargout = B1(vargin)% B1 M-file forB1.fig%B1, by itself, creates a new B1 or raises the existing%singleton*.%H = B1 returns the handle to a new B1 or the handle to%the existing singlet

2、on*.%B1('CALLBACK',hObject,eventData,handles,.) calls the local%function named CALLBACK inB1.M with the given input arguments.%B1('Property','Value',.) creates a new B1 or raises the%existing singleton*.Starting from the left, property value pairs are%applied to the GUI befor

3、e B1_OpeningFunction gets called.An%unrecognized property name or invalid value makes property applicationGUIDE, GUIDATA, GUIHANDLES% Copyright 2002-2003 The MathWorks, Inc.% Edit the above text to modify the response to help B1% Last Modified by GUIDE v2.5 21-Oct-2010 17:52:32% Begin initialization

4、 code - DO NOT EDITgui_Singleton = 1;gui_State = struct('gui_Name',mfilename, .'gui_Singleton',gui_Singleton, .'gui_Callback',);if nargin && ischar(vargin1)gui_State.gui_Callback = str2func(vargin1);endif nargout);else);end% End initialization code - DO NOT EDIT% - Ex

5、ecutes just before B1 is made visible.% hObjecthandle to figure% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)handles.output = hObject;% Update handles structureguidata(hObject, handles);% UIWAIT makes B1 wait for user resp

6、onse (see UIRESUME)% uiwait(handles.figure1);% vargoutcell array for returning output args (see VARGOUT);% hObjecthandle to figure% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA) vargout1 = handles.output;% - Executes on but

7、ton press in pushbutton1.function pushbutton1_Callback(hObject, eventdata, handles)% hObjecthandle to pushbutton1 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)handles.W0=str2double(get(handles.editW0,'string

8、');handles.B=str2double(get(handles.editB,'string');guidata(hObject,handles);Z=-100:100;W=(handles.W0*10八4)*(sqrt(1+handles.BA2*(Z*10八6)八2./(p22*(handles.W0*10八4)八4);plot(Z,W,'b',Z,-W,'b');% - Executes on button press in pushbutton2.function pushbutton2_Callback(hObject,

9、eventdata, handles)% hObjecthandle to pushbutton2 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)handles.W0=str2double(get(handles.editW0,'string');handles.B=str2double(get(handles.editB,'string')/

10、1000;handles.Z=str2double(get(handles.editZ,'string')*1000;handles.f=str2double(get(handles.editf,'string')*10;L=(handles.Z-handles.f)*handles.fA2/(handles.Z- handles.f)A2+piA2*handles.W0A4/handles.BA2)+handles.f;T1=-handles.Z:1:handles.Z;Y1=handles.W0*sqrt(1+T1.A2*handles.BA2/(piA2*

11、handles.W0A4);T2=handles.Z:1:(handles.Z+2*L);W1=(handles.W0*handles.f/sqrt(handles.f-handles.Z)八2+p/2*handles.W0A4/handles.BA2);Y2=W1*sqrt(1+(T2-handles.Z- L).A2/(piA2*W1A4/handles.BA2);plot(T1,Y1,'b',T1,-Y1,'b',T2,Y2,'r',T2,-Y2,'r');% - Executes on button press in pu

12、shbutton3.function pushbutton3_Callback(hObject, eventdata, handles)4. hObjecthandle to pushbutton3 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)handles.W0=str2double(get(handles.editW0,'string');handles

13、.B=str2double(get(handles.editB,'string')/1000;handles.f1=str2double(get(handles.editf1,'string')*10;handles.Z=str2double(get(handles.editZ,'string')*1000;handles.f2=str2double(get(handles.editf2,'string')*10;L=(handles.Z-handles.f1)*handles.f1A2/(handles.Z-handles.f1

14、)A2+piA2*handles.W0A4/handles.BA2)+handles.f1;T1=-handles.Z:1:handles.Z;Y1=handles.W0*sqrt(1+T1.A2*handles.BA2/(piA2*handles.W0A4);T2=handles.Z:1:(handles.Z+L+handles.f2);W1=(handles.W0*handles.f1./sqrt(handles.f1-handles.Z)A2+piA2*handles.W0A4./handles.BA2);Y2=W1*sqrt(1+(T2-handles.Z-L)八2./(piA2*W1

15、A4/handles.BA2);W2=W1*sqrt(1+handles.f2A2/(piA2*W1A4/handles.BA2);T3=(handles.Z+L+handles.f2):1:3*(handles.Z+L+handles.f2);Y3=W2;plot(T1,Y1,'b',T1,-Y1,'b',T2,Y2,'r',T2,-Y2,'r',T3,Y3,'g',T3,-Y3,'g');grid on;function editW0_Callback(hObject, eventdata, h

16、andles)% hObjecthandle to editW0 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)% Hints:get(hObject,'String') returns contents of editW0 as text%str2double(get(hObject,'String') returns contents of

17、 editW0 as a double% - Executes during object creation, after setting all properties.% hObjecthandle to editW0 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% Hint:edit controls usually have a white background on Windows.%See ISPC and COMPUTER.if ispcset(hObject,'Bac

18、kgroundColor','white');elseset(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'); endfunction editB_Callback(hObject, eventdata, handles)% hObjecthandle to editB (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure

19、 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.% hObjecthandle to editB (see GCBO)% eventd

20、atareserved - to be defined in a future version of MATLAB% Hint:edit controls usually have a white background on Windows.%See ISPC and COMPUTER.if ispcset(hObject,'BackgroundColor','white');elseset(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor');end

21、function editZ_Callback(hObject, eventdata, handles)% hObjecthandle to editZ (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)% Hints:get(hObject,'String') returns contents of editZ as text%str2double(get(hO

22、bject,'String') returns contents of editZ as a double% - Executes during object creation, after setting all properties.% hObjecthandle to editZ (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% Hint:edit controls usually have a white background on Windows.%See ISPC

23、 and COMPUTER.if ispcset(hObject,'BackgroundColor','white');elseset(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'); endfunction editf_Callback(hObject, eventdata, handles)% hObjecthandle to editf (see GCBO)% eventdatareserved - to be defined in a f

24、uture version of MATLAB% handlesstructure with handles and user data (see GUIDATA)% Hints:get(hObject,'String') returns contents of editf as text%str2double(get(hObject,'String') returns contents of editf as a double% - Executes during object creation, after setting all properties.%

25、hObjecthandle to editf (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% Hint:edit controls usually have a white background on Windows.%See ISPC and COMPUTER.if ispcset(hObject,'BackgroundColor','white');elseset(hObject,'BackgroundColor',get(0,'

26、defaultUicontrolBackgroundColor'); endfunction editf1_Callback(hObject, eventdata, handles)% hObjecthandle to editf1 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)% Hints:get(hObject,'String') returns

27、 contents of editf1 as text%str2double(get(hObject,'String') returns contents of editf1 as a double% - Executes during object creation, after setting all properties.% hObjecthandle to editf1 (see GCBO)% eventdatareserved - to be defined in a future version of MATLAB% Hint:edit controls usual

28、ly have a white background on Windows.%See ISPC and COMPUTER.if ispcset(hObject,'BackgroundColor','white');elseset(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'); endfunction editf2_Callback(hObject, eventdata, handles)% hObjecthandle to editf2 (se

29、e GCBO)% eventdatareserved - to be defined in a future version of MATLAB% handlesstructure with handles and user data (see GUIDATA)% Hints:get(hObject,'String') returns contents of editf2 as text%str2double(get(hObject,'String') returns contents of editf2 as a double % - Executes during object creation, after setting all properties.10 / 12% hObjecthandle to editf2 (see GCBO)% eventdatareserved - to be defined in a future versi