Tilaisuuden tarkoitus
- Käydään läpi käytännön asioita
- Koodikatselmoidaan ryhmien tuotoksia:
- Pohditaan ratkaisujen mielekkyyttä
- Kartoitetaan vaihtoehtoja
- Ideoidaan
translate x y . color red . circle $ 2 /= translate x y . color red . circle (2)
foo lista@(Bullet bp vel age) = <..>
updateUfo (Ufo (px,py) (ux,uy) age) = Ufo (restoreToScreen $ (px,py) .+ timeStep .* (ux,uy)) (ux,uy) age updateUfo (Ufo (px,py) (ux,uy) age) = Ufo (restoreToScreen $ (10*sin(p x + timeStep * ux),py)) (ux,uy) age