I actually like this code

notsonasty.fs

        let leftLaser = Entity.updateXPos
                        <| laser
                        <| (float Constraints.Bounds.Left)
                        |> Laser.updateProperties
                        <| laserProperties