data Drone = Drone {x :: Float, y :: Float, z :: Float} deriving(Show) convert :: Float -> Char -> Float convert x 'd' = x/2 convert x 'b' = x*2 main = do print([[cos(t),sin(t)]| t <- [0..2*pi]]) print(cos(0)) print(cos(2*pi)) print(cos(359)) print(cos(-1))