方案-错误：要应用的类型错误：-0.5

Question

我正在使用方案为软件包MEEP编写控制文件。我正在创建几何图形，但继续遇到错误“应用的类型错误”。我知道这通常是带括号的问题，但是我看不到任何开放函数。

(set! geometry (list
            (make block                                   ; lower lamina
                (center (- (+ ild llt)) 0 0)
                (size llt sy sz)
                (material (make medium (epsilon refr))))  
            (make prism
             (vertices
              (list 
                    (vector3 (* ng ult) (* ng sy) (* ng sz))
                    (vector3 (* ng ult) (* 0.5 sy) (* ng sz))
                    (vector3 (* 0.5 ult) (* 0.5 sy) (ng sz))
                    (vector3 (+ rh (* 0.5 ult)) (- (* 0.5 sy) 0.13) (* ng sz))
                    (vector3 (+ rh (* 0.5 ult)) (- (* 0.5 sy) 0.23) (* ng sz))
                    (vector3 (* 0.5 ult) (* 0.5 ywid) (* ng sz))
                    (vector3 (* 0.5 ult) (* ng ywid) (* ng sz))
                    (vector3 (+ rh (* 0.5 ult)) (- (* ng ywid ) 0.13) (* ng sz))
                    (vector3 (+ rh (* 0.5 ult)) (- (* ng ywid) 0.23) (* ng sz))
                    (vector3 (* 0.5 ult) (* ng sy) (ng sz))))
               (height sz)
               (center (vector3 0 0))
               (material (make medium (epsilon refr))))))