Rank: 1320 based on 112 downloads (last 30 days) and 1 file submitted
photo

Thomas Murphy

E-mail
Company/University
University of Maryland

Personal Profile:
Professional Interests:

 

Watch this Author's files

 

Files Posted by Thomas
Updated   File Tags Downloads
(last 30 days)
Comments Rating
22 Apr 2011 Screenshot Waveguide Mode Solver Calculate the electromagnetic modes of optical waveguides. Author: Thomas Murphy chemistry, physics, waveguide, fiber, modesolver, finite differrence 112 22
  • 4.45
4.5 | 20 ratings
Comments and Ratings on Thomas' Files View all
Updated File Comment by Comments Rating
20 Jul 2014 Waveguide Mode Solver Calculate the electromagnetic modes of optical waveguides. Author: Thomas Murphy Hossen, Raqibul

its really great

03 Jul 2014 Waveguide Mode Solver Calculate the electromagnetic modes of optical waveguides. Author: Thomas Murphy Wang, Long

Hi, thanks for posting this package online. I wonder that if you can tell me what references used for the formulation in 'svmode'. I am using the book 'Introduction to Optical Waveguide Analysis:Solving Maxwell's Equations and the Schrodinger Equation' by Kenji Kawano. It seems the equations used here for aw, ae, an and as are partially different from that in the book.

05 Sep 2013 Waveguide Mode Solver Calculate the electromagnetic modes of optical waveguides. Author: Thomas Murphy Jiali

I want to calculate two supermodes of silicon coupler. I can do it by semivector. But I fail for fullvector methods. Can someone help me?

05 Sep 2013 Waveguide Mode Solver Calculate the electromagnetic modes of optical waveguides. Author: Thomas Murphy Jiali

17 Jul 2013 Waveguide Mode Solver Calculate the electromagnetic modes of optical waveguides. Author: Thomas Murphy Rizwan

Hi,

I am new to waveguide and I want to plot the mode profiles of slab waveguide as shown in this figure http://wwwhome.math.utwente.nl/~hammer/Metric/Fig/tefEy00L.gif.
Can some one please help me in this manner. I have made a code but it was not working. Code is given below. Thanks in advance
n1c=1.77;
n2s=1.45;
n3cd=1.0;
d=2.0*10^-6;
lambda=1.00*10^-6;
c=3*10^8;
f=c/lambda;
omega=2*pi*f;
k0=omega/c;
neff=n2s:0.00001:n1c;
beta=k0.*neff;
r=sqrt((beta.^2)-(k0^2*n3cd^2));
q=sqrt(((k0^2)*n1c^2)-(beta.^2));
p=sqrt((beta.^2)-(k0^2*n2s^2));

x=-5*10^-6:2.0*10^-6:4*d;

Ey=zeros(length(x),length(r));

for i=1:length(x)
if (x(i)<0)
Ey(i,:)=exp(r*x(i));
% Ef1=Ey;

elseif (0<=x(i) )&& (x(i)<=2*d)
Ey(i,:)=cos(q*x(i))+sin(q*x(i));
% Ef2=Ey;

else
Ey(i,:)=(cos(2*d*q)+sin(2*d*q)).*exp(-p*(x(i)-(2*d)));
% Ef3=Ey;
end
end
% Ef=[Ef1 Ef2 Ef3];
mesh (abs(Ey));

Contact us