Dear Scheme users:
When I run the following piece of code, I encountered an error:
*ERROR: Wrong number of arguments to #cartesian (x)>
*
function definition
> (define (eps-func p)
>(let* ((p (lattice->cartesian))
> (x (vector3-x p))
> (y (vector3-y p))
>
The error you are writing about is right here:
>> function definition
>> (define (eps-func p)
>>(let* ((p (lattice->cartesian)) <--
>> (x (vector3-x p))
>> (y (vector3-y p))
>> (z (vector3-z p)))
>> (if (> sin(* 2 pi x y z) 0)
>>
Thanks Noah. Thank you all of you!
Jay Sulzberger suggest the following change, and it makes sense to me.
*
*
> function definition
>
>> (define (eps-func p)
>>(let* ((p (lattice->cartesian))
>>
>
Perhaps above should be
* (let* ((p (lattice->cartesian p)) *
Regards,
Simon
On Thu, Ju
