Aqui presentamos el siguiente ejercicio que se puede encontrar en este sitio:
https://meep.readthedocs.io/en/latest/Scheme_Tutorials/Basics/
El codigo “a00.ctl” se presenta a continuacion:
(set! geometry-lattice (make lattice (size 16 8 no-size)))
(set! geometry
(list
(make block
(center 0 0)
(size infinity 1 infinity)
(material (make medium (epsilon 12)))
)
)
)
(set! sources
(list
(make source
(src (make continuous-src (frequency 0.15)))
(component Ez)
(center -7 0)
)
)
)
(set! pml-layers (list (make pml (thickness 1.0))))
(set! resolution 10)
(run-until 200
(at-beginning output-epsilon)
(at-end output-efield-z)
)
usamos la instruccion:
$ meep a00.ctl > a00.out
y el programa genera lo que podemos ver con
$ ls a00.ctl a00-eps-000000.00.h5 a00-ez-000200.00.h5 a00.out
podemos ver la funcion dielectrica con la instruccion
$h5topng -S3 a00-eps-000000.00.h5
tambien podemos ver el campo con la instruccion
$h5topng -S3 -Zc dkbluered -a yarg -A a00-eps-000000.00.h5 a00-ez-000200.00.h5
