diff options
author | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2015-11-06 07:40:42 +0100 |
---|---|---|
committer | Jörg Frings-Fürst <debian@jff-webhosting.net> | 2015-11-06 07:40:42 +0100 |
commit | c6739b6427261ac2682a9fca3b23c98df0dc9f60 (patch) | |
tree | a90193f98739ad96e6ae676409022bd15a648aae /spectro/rspec.c | |
parent | c6267b450e6858fdff4360104b362d9da2e1806d (diff) |
New upstream release
Diffstat (limited to 'spectro/rspec.c')
-rw-r--r-- | spectro/rspec.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/spectro/rspec.c b/spectro/rspec.c index 49d725b..e0e0194 100644 --- a/spectro/rspec.c +++ b/spectro/rspec.c @@ -43,6 +43,7 @@ #include "sa_config.h" #include "numsup.h" #endif /* !SALONEINSTLIB */ +#include "plot.h" #include "xspect.h" #include "insttypes.h" #include "conv.h" @@ -152,9 +153,6 @@ double rspec_raw2nm(rspec_inf *inf, double rix) { if (inf->nwlcal == 0) error("rspec_raw2nm: nwlcal == 0"); -// ~~~~9999 test fudge -// rix += 15; - /* Compute polinomial */ for (wl = inf->wlcal[inf->nwlcal-1], k = inf->nwlcal-2; k >= 0; k--) wl = wl * rix + inf->wlcal[k]; |