h_clad 40[um] "Cladding width"
h_core 4[um] "Core width"
l_fiber 100[um] "Fiber length"
f_lens 50[um] "Focal length"
t_lens 15[um] "Lens thickness"
df -4[um] "Focus adjustment"
t_PML 1[um] "Perfectly matched layer thickness"
n_lens 1.5 "Refractive index, lens"
n_clad 1.5 "Refractive index, cladding"
n_core 1.51 "Refractive index, core"
lda0 1[um] "Vacuum wavelength"
f0 c_const/lda0 "Frequency"
l_dom f_lens*2 "Half of the coupling length"
lamc 2*pi*h_core/2/2.405*sqrt(n_core^2-n_clad^2) "Single mode critical wavelength"
V 2*pi/lda0*h_core/2*sqrt(n_core^2-n_clad^2) "Fiber parameter"
r_lens (n_lens-1)*f_lens "Lens radius of curvature"