Greetings! I've got the following lines in my code:
(let* ((method (option-ref options 'method "fundmatrix"))
;; Command line options override ones in statement file
(right-bound
(string->number
(option-ref options 'right-bound (number->string right-bound))))
(wave-number
(string->number
(option-ref options 'wave-number (number->string wave-number))))
(subintervals
(string->number
(option-ref options 'subintervals (number->string
subintervals))))
(test-epsilon
(string->number
(option-ref options 'test-epsilon (number->string
test-epsilon)))))
<body follows .. >)
Looks like total mess, doesn't it?
Is there any way to rewrite this somehow, say using a loop over a list
'(right-bound wave-number subintervals test-epsilon)
?
Desperately I tried to perform local binding using `(let (map ..`, but
obviously that couldn't work.
--
Happy Hacking.
Dmitry "Sphinx" Dzhus
http://sphinx.net.ru
_______________________________________________
Guile-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/guile-user
