ANY MATLAB CODE FOR GAUSSIAN BEAM PROPAGATION IN A OPTICAL FIBER

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)

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

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.

I want matlab code for hollow gausssian beam generated with phase plate for MATLAB R2014b

2 Comments

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.

Asked:

on 24 Sep 2013

Edited:

on 15 Dec 2020

Community Treasure Hunt

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

Start Hunting!