-- | Camera matrix, maps from world coords to camera coords
cameraMatrix :: Float -> LC.M44F
cameraMatrix _ = convLC $ lookAt eye (V3 0 0 0) (V3 0 1 0)
  where eye = V3 5 2 5 -- rotate (axisAngle (V3 0 1 0) t) (V3 5 2 5)

-- | Projection matrix, maps from camera coords to device normalized coords
cameraMatrix :: Float -> LC.M44F
cameraMatrix _ = convLC $ lookAt eye (V3 0 0 0) (V3 0 1 0)
  where eye = V3 5 2 5 -- rotate (axisAngle (V3 0 1 0) t) (V3 5 2 5)

-- | Projection matrix, maps from camera coords to device normalized coords
cameraMatrix _ = convLC $ lookAt eye (V3 0 0 0) (V3 0 1 0)
  where eye = V3 5 2 5 -- rotate (axisAngle (V3 0 1 0) t) (V3 5 2 5)

-- | Projection matrix, maps from camera coords to device normalized coords