keys :: ControllerShape
keys = ControllerShape {params = [
                          mCC "modwheel" 1,
                          mCC "balance" 10,
                          mCC "expression" 11,
                          mCC "sustainpedal" 64
                        ],
                        duration = ("dur", 0.05),
                        velocity = ("vel", 0.5),
                        latency = 0.1}
keys :: ControllerShape
keys = ControllerShape {params = [
                          mCC "modwheel" 1,
                          mCC "balance" 10,
                          mCC "expression" 11,
                          mCC "sustainpedal" 64
                        ],
                        duration = ("dur", 0.05),
                        velocity = ("vel", 0.5),
                        latency = 0.1}
keys = ControllerShape {params = [
                          mCC "modwheel" 1,
                          mCC "balance" 10,
                          mCC "expression" 11,
                          mCC "sustainpedal" 64
                        ],
                        duration = ("dur", 0.05),
                        velocity = ("vel", 0.5),
                        latency = 0.1}