Clear Filters
Clear Filters

ANY MATLAB CODE FOR GAUSSIAN BEAM PROPAGATION IN A OPTICAL FIBER

77 views (last 30 days)
TAKE SUITABLE VALUES FOR ALL THE PARAMETERS INVOLVED IN THE EQUATION...
E(r,z)=Eo((Wo/w(Z))*exp(-r^2/.w(z)^2)-(i*Kz)(-i*(k*r^2)./2r(z))+it(z)):
intensity=absE(r,z)^2;
keeping all the parameters constant except time,vary the time and plot the graph for this equation of gaussian wave propagation in a optical fiber.

Answers (3)

Youssef  Khmou
Youssef Khmou on 24 Sep 2013

Husnain Shabbir
Husnain Shabbir on 26 Jan 2020
r=-0.3:0.0001:0.3;
L=1000; %link distance
lamda=1550e-9; %Wavelength
Wo=1.5e-2; %Beam spot radius at the transmitter
Fo=100; %Beam phase front radius of curvature
k=2*pi/lamda; %wave number
theta0=1+L/Fo; %Curvature parameter
lamda0=2*L/(k*Wo^2); %Fresnel ratio
theta=theta0/(theta0^2+lamda0^2); %Refraction parameter
lamda1=lamda0/(theta0^2+lamda0^2); %Diffraction parameter
W=Wo*(theta0^2+lamda0^2)^0.5; %Beam spot radius
nnn=exp(-1);
Ao=1/(theta0^2+lamda0^2)*exp(-r.^2/Wo^2);
A=(theta^2+lamda1^2)*exp(-2*r.^2/W^2);
plot(r,Ao,'LineWidth',2)
hold on
plot(r,A,'LineWidth',2)
xline(Wo,'b','--')
xline(-Wo,'k','--')
xline(W,'g','--')
xline(-W,'r','--')
xlabel('r-axis');
ylabel('amplitude')
legend('transmitted','received','Wo','-Wo','W','-W')
grid on
  1 Comment
Andicha Zain
Andicha Zain on 16 Sep 2020
hello
do you know hot to writing program matlab gaussian beam
if you know, please contact me on gmail : andichazain@gmail.com

Sign in to comment.


Reena Sharma
Reena Sharma on 14 Dec 2020
Edited: Walter Roberson on 15 Dec 2020
I want matlab code for hollow gausssian beam generated with phase plate for MATLAB R2014b
  2 Comments
Walter Roberson
Walter Roberson on 15 Dec 2020
Edited: Walter Roberson on 15 Dec 2020
This does not appear to be an Answer to the Question asked by ABHISHEK KUMAR .
If you are asking your own question, then create your own question for it ... after reading the link that I posted for you.
I took a brief look around. It is not clear to me that existing MATLAB code for that purpose exists anywhere . And chances are very very small that anyone is going to volunteer to research the topic and write the code for you just because you posted that you "want" the code.

Sign in to comment.

Categories

Find more on Accelerators & Beams in Help Center and File Exchange

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!