// Is That All There Is — Peggy Lee
// 108 bpm, 4/4, key C minor. Source: mcgill.
// Generated by strudelify. One cycle = one bar.
// note: metre changes (3/4 at bar 1, 4/4 at bar 18) keep their bar lengths on a constant 4/4 grid of one bar per cycle
setcpm(108/4)

const chords = arrange(
  // verse (13 bars)
  [13, "<G13 [G13@2 C@2] C G13 [G13@2 C@2] C [F@3 C] [C@2 G@2] [G C@3] [F@3 C] [C@2 G@2] [G Bb@3] [~@3 ~]>"],
  // chorus (16 bars)
  [16, "<G13!4 [G13@2 Go@2] [G7sus@2 G13 G9] Cm9 [Cm7@2 F9@2] Cm9 Ebm9 [Bb^7@2 Bb6@2] [Bbaug Bb@3] A7!2 D7!2>"],
  // verse (16 bars)
  [16, "<Cm7 Ebm9 Cm7 Eb Cm7 Ebm9 Bb!2 Cm7 Ebm9 Cm7 Eb Cm7 Ebm9 Bb!2>"],
  // chorus (16 bars)
  [16, "<G13!4 [G13@2 Go@2] [G7sus@2 G13 G9] Cm9 [Cm7@2 F9@2] Cm9 Ebm9 [Bb^7@2 Bb6@2] [Bbaug Bb@3] A7!2 D7!2>"],
  // verse (16 bars)
  [16, "<Cm7 Ebm9 Cm7 Ebm9 Cm7 Ebm9 Bb!2 Cm7 Ebm9 Cm7 Ebm9 Cm7 Ebm9 Bb^7!2>"],
  // chorus (6 bars)
  [6, "<G13!4 [G13@2 Go@2] [G7sus@2 G13 G9]>"],
  // verse (16 bars)
  [16, "<Cm7 Ebm9 Cm7 Ebm9 Cm7 Ebm9 Bb!2 Cm7 Ebm9 Cm7 Ebm9 Cm7 Ebm9 Bb^7!2>"],
  // chorus (18 bars)
  [18, "<G13!4 [G13@2 Go@2] [G7sus@2 G13 G9] Cm9 [Cm7@2 F9@2] Cm9 Ebm9 [Bb^7@2 Bb6@2] [Bbaug Bb@3] A7 [A7@2 D7@2] Gm!4>"],
)
const bassline = arrange(
  [13, "<g2 [g2@2 c2@2] c2 g2 [g2@2 c2@2] c2 [f2@3 c2] [c2@2 g2@2] [g2 c2@3] [f2@3 c2] [c2@2 a#2@2] [a#2 bb2@3] [~@3 ~]>"],
  [16, "<g2!6 c2 [c2@2 f2@2] c2 eb2 bb2!2 a2 d#2 d2!2>"],
  [16, "<c2 eb2 c2 eb2 c2 eb2 bb2!2 c2 eb2 c2 eb2 c2 eb2 bb2!2>"],
  [16, "<g2!6 c2 [c2@2 f2@2] c2 eb2 bb2!2 a2 d#2 d2!2>"],
  [16, "<c2 eb2 c2 eb2 c2 eb2 bb2!2 c2 eb2 c2 eb2 c2 eb2 bb2!2>"],
  [6, "<g2!6>"],
  [16, "<c2 eb2 c2 eb2 c2 eb2 bb2!2 c2 eb2 c2 eb2 c2 eb2 bb2!2>"],
  [18, "<g2!6 c2 [c2@2 f2@2] c2 eb2 bb2!2 a2 [d#2@2 d2@2] g2!4>"],
)

// chords · gm_piano
const keys = chord(chords).voicing().s("gm_piano").gain(0.8)
// bass · gm_electric_bass_finger
const bass = note(bassline).s("gm_electric_bass_finger").gain(0.9)
// drums
const drums = s("[bd hh] [sd hh] [bd hh] [sd hh]").gain(0.8)

stack(keys, bass, drums)