(defn decode [x] (flatten (map #(repeat (first %) (last %)) x)))