大久保弘崇
7章メモ3
最終更新:
hirotakaohkubo
-
view
§7.8
図7.23を再現したら、また白黒が反転してしまった。何がいけないのか判らない。
fig723 = writeppm (b2c.radInvert checker) "fig723.ppm" 200 (-w,-w) (w,w) where w=2.2/2

図7.19は、ybRingsの反転が影響している。
fig719 = writeppm (rippleRad 8 0.3 ybRings) "fig719.ppm" 20 (-w,-w) (w,w) where w=5

図7.24は、どうしてもモアレが出てしまって本のように綺麗にはならない。
fig724 = writeppm (theImg `over` whiteI) "fig724.ppm" 15 (-w,-w) (w,w) where
w = 22/2
theImg = circleLimit 10 (bwIm checker)
