Hello Sir,
Thank you for your response. I am currently attempting to reproduce the results of the attached paper. However, I am encountering two issues: first, an extra mode appears in the dispersion, and second, I am unable to generate the transmission spectra. Could you please advise on how to properly obtain the transmission spectra plot and provide guidance on what might be causing the unexpected mode in the dispersion?
OutputFormat = OVF2_TEXT
Nx := 600
Ny := 10
Nz := 1
setgridsize(Nx, Ny, Nz)
setcellsize(1e-9, 1e-9, 1e-9)
Msat = 1.6e6
alpha = 0.001
Aex = 6e-12
Ku1 = 2e6
anisU = vector(0, 0, 1)
Dind = 3.0e-3
m = uniform(0, 0, 1)
relax()
save(m)
B0 := 10e-3
fcut := 100e9
excite := rect(30e-9, 10e-9)
defRegion(15, excite)
B_ext.SetRegion(15, vector(B0*sinc(2*pi*fcut*t), 0, 0))
tableautosave(5e-12)
autosave(m, 5e-12)
run(30e-9)