關(guān)于這個(gè)小程序，不明白錯(cuò)在哪里，大家討論一下 4Kx;F 9!%~  
(define z 3) Ga~IOlS  
(define y 6) ` NcWy  
(define r 100) 3VKArv-  
(define (refl y z) [['un\~r~  
  (define sphere1 (solid:sphere 0 y z r)) CB6<Vng}C  
  (if (< y 12) qf+I2kyS  
    (refl (+ y 1) z) 1'Kn:I  
    (define sphere0 (solid:sphere 0 0 0 r)) N0/DPZX7  
    ) DmPp&  
  ) \J:/l|h  
運(yùn)行后，只有一些輸出命令，沒(méi)有實(shí)體 Lymy/9  
rr2|xL?+u  

圖片:scheme.JPG

H}X3nl\]  
j@Z4(XL  

圖片:結(jié)果.JPG

沙發(fā)自已坐 k)dLJ<EM  

頂一頂帖子

對(duì)marco語(yǔ)言熟嗎？我想導(dǎo)入一個(gè)表面材料數(shù)據(jù)（如BRDF數(shù)據(jù)），能用這個(gè)實(shí)現(xiàn)嗎

(define (refl y z)；這里有問(wèn)題，refl y z是參量，你這樣定義就錯(cuò)了，仔細(xì)看看lisp語(yǔ)言的基本語(yǔ)法就明白了 odD^xg"L  
) T;IaVMFG|d  

←_←好好看看

內(nèi)容來(lái)自Android手機(jī)客戶端

272049844:(define (refl y z)；這里有問(wèn)題，refl y z是參量，你這樣定義就錯(cuò)了，仔細(xì)看看lisp語(yǔ)言的基本語(yǔ)法就明白了 VrLU07"0n  
) ]wFKXZeK  
 (2013-06-17 15:47)  itClCEOA  

q_S`@2Dzz,  
(define (refl y z) 5mxHOtvtWM  
這是定義一個(gè)函數(shù),函數(shù)名為refl ，因變量 y和z {C3AxK0  
不知道哪錯(cuò)了

不好意思，好久沒(méi)上來(lái)看看，是我先前看錯(cuò)了，refl是函數(shù)，那你運(yùn)行出來(lái)只有refl是正常的，因?yàn)槟愕淖雍瘮?shù)refl里面沒(méi)有給點(diǎn)yz值，你在全局里面定義沒(méi)用的，必須在refl里面給定

不過(guò)參數(shù)定義在里面就無(wú)法實(shí)現(xiàn)迭代了，所以還是用do來(lái)循環(huán)吧