|
From: | gengj |
Subject: | [FreeSnell-discuss] Simulation of SPR by Freesnell |
Date: | Sat, 19 Feb 2011 02:48:55 +0800 |
Hi,
I simulated SPR (Surface Plasmon Resonance) by Freesnell, but the result is
a little strange. There are a lot of "noises" on the curve not as smooth as
experimental result.
My code:
(require 'FreeSnell)
(require 'databases)
(require 'database-interpolate)
(define nk (open-database (or (getenv "NK_DATABASE_PATH") "nk.rwb") 'rwb-isam))
(define AIR 1.33)
;(define BK7 (interpolate-from-table (open-table nk 'bk7) 2))
(define AU (interpolate-from-table (open-table nk 'au) 2))
(define BK7 1.51)
(define (KCfg)
(plot-response
(title "Reflective Index")
(output-format 'png)
(font 13)
(range 0 1)
(angles 50 80)
(wavelength 0.660e-6 'R_p)
(optical-stack ;;optical layers of the configuration
(substrate BK7)
(layer AU 50e-9)
(substrate AIR)
)
)
)
(KCfg) Does anyone have ideas?
Thanks a lot
Junqing Geng
|
[Prev in Thread] | Current Thread | [Next in Thread] |