// Cold Blue Steel and Sweet Fire — Joni Mitchell
// 118 bpm, 4/4, key C major. Source: midi.
// Generated by strudelify. One cycle = one bar.
// note: Tempo changes preserved in elapsed time; displayed bars use the dominant tempo.
// note: ch 2 "Adlib Violin" named as a string part, played on violin (its choir aahs patch is not one); ch 4 "Adlib Clarinet" named as a reed, played on clarinet (its lead 4 chiff patch is not one)
// note: Full arrangement: all 111 bars on a 16-step grid, each part at one level. Source detail keeps the original performance.
setcpm(118/4)

// Notation: c3@3 lasts 3 steps · ~ is a rest · [c3,e3] is a chord · "a, b" plays two voices at once · [...]/2 spreads a riff over 2 bars.
// A part's distinct bars are riffs (A, B, C...) played in order: edit a riff to change every repeat.

// chords · piano · "Adlib Piano"
const piano = note(`<
  A B C@2 D E F G H I J K L M N O P Q R S T U V W X@2 Y Z@2 AA AB AC AD AE AF AG G AH AI AJ AK AL AM AN AO AP AQ AR AS
  AT AU V AV AW@2 AX AY@2 AZ BA BB BC BD BE BF BG BH BI BJ BF BK BL BC BB BM BN BE BD T BO BP W BQ BR BS BT G BU BV BW K
  BX BY BZ CA P CB CC S CD U V W CE CF CG@6
>`.pickRestart({
  A: "g2@5 ~@3 f2@2 [g2,d3,g3]@2 ~@2 [a#2,f3,a#3]@2", B: "~@2 [g2,d3,g3]@2 ~@2 [f2,c3,f3]@2 ~@2 [g2,d3,g3]@5 ~",
  C: "[[g2,d3] ~ [g2,d3]@2 ~@2 [f2,c3,g3,d4]@2 [a#3,f4]@2 [g2,d3,g3,d4]@2 ~@2 [a#2,f3]@2 ~@2 [g2,d3,d4]@2 ~@2 [f2,c3,d4]@2 ~@2 [c4,g4]@4 [f2,c4]@2, ~@7 g4@5 ~@4, ~@14 d4 ~@17]/2", // G5 Fsus2 A#5 G5 A#5 G5 Dm7 C5 …
  D: "b3 ~ c4@3 ~ [c2,c4,g4]@2 c4 ~ d4@2 d4@2 [g3,d4] ~, [c2,g4]@5 ~@3 c2@7 ~, ~@8 g3@5 ~@3", // C5 G5 C5
  E: "e4@2 e4@3 ~ c2 ~ c2@5 ~ c2@2, [c2,g3]@5 ~@11", // C5
  F: "e4 e4@2 ~ e4 ~ [c2,g3,e4]@2 [g3,e4]@2 [g2,a3,f#4]@4 [g1,g3,b3,g4] ~, [c2,g3]@5 ~@11", // C D G C5
  G: "[g3,c4]@6 c2@2 [c2,g3,c4,e4]@7 ~, g4@15 ~, c2@5 ~@11", // C5 C
  H: "[g2,d3,g4] ~ [g2,d3,b3,g4]@3 ~ [f2,c3,a3,f4]@2 [a3,f4]@2 [g2,d3,g4] ~@3 [a#2,f3] ~, ~@3 [d4,a#4]", // G5 G F Dm G5 A#5 Gm
  I: "[d4,a#4]@2 [g2,d3,b3,g4] ~ [a3,f4]@2 [f2,c3]@2 [a3,f4] [b3,g4] ~@4 f2@2, ~@8 [f2,c3]@3 [b3,g4]@5", // Gm G Dm F5 Dm Em F5 Em
  J: "[g2,d3] ~ [g2,d3]@2 [a#3,g4]@2 [a3,f4]@2 [a3,f4]@2 [g2,d3,d4,a#4] ~ [d4,g4]@2 [a#2,f3,c4,f4] ~, ~@6 [f2,c3] ~@9", // G5 D# Dm Gm G5 A#sus2 F5
  K: "f4@2 [g2,d3]@2 ~@2 [f2,c3]@2 g4@2 [a2,b3,d4]@3 ~ [f2,b3,d4]@2, b3@8 b3 ~@7, ~ g4@3 ~@4", // G5 F5 Bm7 Bdim
  L: "[b3,d4] ~ [c4,e4]@3 ~ [c2,c4] ~ c4@2 d4 ~ d4@2 [g3,d4] ~, c2@5 ~@3 c2@7 ~, ~@8 g3@5 ~@3", // Bm C G5
  M: "e4@2 e4@2 ~@2 c2@2 [g3,e4]@3 ~@3 c2@2, g3@8 c2@5 ~@3, c2 e4 ~@2", // C
  N: "d4@2 e4 ~ e4@2 c2 ~ [g3,e4]@2 [a3,f#4]@3 ~ [g1,g3,b3,g4]@2, g3@7 ~@9, c2@5 ~@5 g2 ~@5", // C D G
  O: "[g3,b3,g4]@2 ~@4 c2@2 [c4,g4]@3 ~@5, c2@5 ~@3 c2@7 ~, ~ [c4,g4]@3 ~@4", // G C5
  P: "[g2,d3,b3,g4]@2 [f2,c3,a3,f4] ~ [g2,d3,b3,g4]@2 [a#2,f3,d4,a#4]@2 [a#2,f3,d4,a#4]@2 [g2,d3,b3,g4]@2 ~@2 c2@2, ~@3 [a3,f#4]", // G F G A# G D
  Q: "[a3,f#4]@3 ~@3 d2@2 ~@2 f#4@2 e4@2 [d2,d4] ~, d2@5 ~@3 d2@5 ~@3, ~@10 a3@5 ~", // D
  R: "c4@2 b3@2 g3@2 [c2,g3] ~ g3@2 ~@4 c2@2, c2@5 ~@3 c2@6 ~@2, ~@5 g3@3", S: "c2@5 ~ c2@2 c2@6 c2 ~, g3@15 ~",
  T: "c2@3 ~ [c2,g3,e4]@2 [a#1,f3,d4]@2 [a#1,f3,d4]@2 [c2,g3,e4]@4 [a#1,f3,d4]@2", // C A# C A#
  U: "[c2,g3,e4] ~ [a#1,f3,d4]@2 [c2,c3,g3,e4,g4]@4 [g3,e4,g4]@2 d4 ~ e4@2 d4 ~, ~@8 [c2,c3]@7 ~", // C A# C
  V: "f#4@2 e4@5 ~ e4@2 d4@5 ~, [g2,d3,a3,d4]@7 ~ [a#2,f3,g3,c4]@7 ~", // Gsus2 A#sus2
  W: "c4@2 b3@4 b3 g3 g3@2 g3 ~ g3@2 f3 ~, [f2,c3]@5 ~ f3@2 f3@5 ~@3", // F5
  X: "[[c4,e4]@6 f3@2 [f3,c4,e4] ~ [e2,b3,d4]@3 ~ e2@2 c2@4 [g3,c4]@2 [c2,c4] ~ c4@2 d4@3 ~ [g3,d4]@2, f3@5 ~@9 [g3,c4,e4]@5 ~@5 [c2,g3]@5 ~ g1 ~]/2", // C Fmaj7 E7 C5 C G5 C C5
  Y: "[g3,d4]@2 e4@4 [c2,g3,c4]@2 e4 ~ e4@2 e4@2 g1@2, c2@5 ~@3 g3@7 ~, ~@8 c2@5 ~@3", // G5 C5
  Z: "[c2@5 ~ c2 ~ [g3,c4]@3 ~ d4 c4 [g1,c4] e4 d4@2 d4@2 ~@2 c2@2 d4 ~ d4@2 d4 ~ [d2,g4]@2, ~@8 c2@4 ~@3 g3@4 ~@13, ~@16 c2@5 ~@3 c2@5 ~@3]/2", // C5 G5
  AA: "[g2,d3,g4]@2 [b3,g4]@3 ~ [a3,f4]@2 [a3,f4]@2 [d4,a#4]@4 [a#2,f3]@2, ~@6 [f2,c3] ~@3 [g2,d3] ~@5", // G5 Em Dm Gm A#5 F5 G5
  AB: "[b3,g4]@2 [g2,d3,a3,f4]@3 ~ [f2,c3,a3,f4]@2 [f2,c3,a3,f4] ~ [g2,d3,a3,f4]@2 [g2,d3,b3,g4]@3 ~", // Em Dm F Dm G
  AC: "[g2,d3]@2 [g2,d3] ~@3 [f2,c3] ~@3 [g2,d3] ~@3 [a#2,f3,d5]@2, ~@10 g5@3 ~@3", // G5 F5 G5 A#
  AD: "c5 ~ [g2,d3,a#4]@2 g4 ~ [f2,c3,d4]@2 f4 g4 a#4@2 a#4@2 [f2,g4] ~", // Gm Dm7 Fsus2
  AE: "b3@2 c4@3 ~ [c2,c4,g4] ~ c4@2 d4@2 d4@2 [g3,d4]@2, [c2,g4]@5 ~@3 c2@7 ~, ~@8 g3@5 ~@3", // C5 G5 C5
  AF: "e4 ~ e4@3 ~ c2@2 c2@5 ~ c2 ~, [c2,g3]@5 ~@11", // C5
  AG: "e4 e4@2 ~ e4@2 [g3,e4]@2 [g3,e4]@2 [g2,a3,f#4]@4 [g1,g3,b3,g4]@2, [c2,g3]@5 ~ c2 ~@9", // C D G C5
  AH: "[g2,d3,g4]@2 [b3,g4]@3 ~ [f2,c3,a3,f4]@2 [a3,f4]@2 [g2,d3,g4]@2 ~@2 [a#2,f3]@2, ~@2 [g2,d3] ~@9 [d4,a#4]@4", // G5 Em F Dm G5 A#5 G5 Gm
  AI: "[d4,a#4] ~ [g2,d3,b3,g4]@2 [a3,f4]@2 [f2,c3]@2 [a3,f4] [b3,g4] ~@4 f2 ~, ~@8 [f2,c3]@3 [b3,g4]@5", // Gm G Dm F5 Dm Em F5 Em
  AJ: "[g2,d3]@2 [g2,d3] ~ [a#3,g4]@2 [f2,c3,a3,f4]@2 [a3,f4] ~ [g2,d3,d4,a#4]@2 [d4,g4] ~ [a#2,f3,c4,f4]@2", // G5 D# F Dm Gm G5 A#sus2
  AK: "f4@2 [g2,d3]@2 ~@2 [f2,c3] ~ [b3,g4]@2 [a2,b3,d4]@3 ~ [f2,b3,d4] ~, b3 ~, ~ g4@3 ~@4", // G5 F5 Em Bm7 Bdim
  AL: "[b3,d4]@2 [c4,e4]@4 [c2,c4]@2 c4 ~ d4@2 d4 ~ [g3,d4]@2, c2@5 ~@3 c2@7 ~, ~@8 g3@5 ~@3", // Bm C G5
  AM: "e4 ~ e4@2 ~@2 c2 ~ [g3,e4]@3 ~@3 c2 ~, g3@8 c2@5 ~@3, c2 e4 ~@2", // C
  AN: "d4@2 e4@2 e4@2 c2@2 [g3,e4] ~ [g2,a3,f#4]@3 ~ [g1,g3,b3,g4]@2, g3@7 ~@9, c2@5 ~@11", // C D G
  AO: "[g3,b3,g4]@2 ~@4 c2 ~ [c4,g4]@3 ~@5, c2@5 ~@3 c2@7 ~, ~ [c4,g4]@3 ~@4", // G C5
  AP: "[g2,d3,b3,g4]@2 [f2,c3,a3,f4]@2 [g2,d3,b3,g4] ~ [a#2,f3,d4,a#4]@2 [a#2,f3,d4,a#4] ~ [g2,d3,b3,g4]@2 ~@2 c2@2, ~@3 [a3,f#4]", // G F G A# G D
  AQ: "[a3,f#4]@3 ~@3 d2 ~@3 f#4 ~ e4@2 [d2,d4]@2, d2@5 ~@3 d2@5 ~@3, ~@10 a3@5 ~", // D
  AR: "c4@2 b3@2 g3@2 [c2,g3]@2 g3 ~@5 c2 ~, c2@5 ~@3 c2@6 ~@2, ~@5 g3@3", AS: "c2@5 ~ c2 ~ c2@6 c2@2, g3@15 ~",
  AT: "c2@3 ~ [c2,g3,e4] ~ [a#1,f3,d4]@2 [a#1,f3,d4] ~ [c2,g3,e4]@4 [a#1,f3,d4] ~", // C A# C A#
  AU: "[c2,g3,e4]@2 [a#1,f3,d4] ~ [c2,c3,g3,e4,g4]@4 [g3,e4,g4]@2 d4@2 e4 ~ d4@2, ~@8 [c2,c3]@7 ~", // C A# C
  AV: "c4@2 b3@4 b3 g3 g3@2 g3@2 g3@2 f3@2, [f2,c3]@5 ~ f3@2 f3@5 ~@3", // F5
  AW: "[[c4,e4]@6 f3@2 [f3,c4,e4]@2 [e2,b3,d4]@3 ~ e2 ~ c2@4 [g3,c4]@2 [c2,c4]@2 c4 ~ d4@3 ~ [g1,g3,d4]@2, f3@5 ~@9 [g3,c4,e4]@5 ~@5 [c2,g3]@5 ~@3]/2", // C Fmaj7 E7 C5 C G5 C C5
  AX: "[g3,d4] ~ e4@3 ~ [c2,g3,c4] ~ e4@2 e4 ~ e4@2 g1 ~, c2@5 ~@3 g3@7 ~, ~@8 c2@5 ~@3", // G5 C5
  AY: "[c2@5 ~ c2@2 [g3,c4]@3 ~ d4 c4!2 e4 d4 ~ d4@2 ~@2 c2 ~ d4@2 d4 ~ d4@2 g4@2, ~@8 c2@4 ~@2 g1@2 c2@5 ~@3 c2@5 ~ d2 ~, ~@15 g3@4 ~@13]/2", // C5
  AZ: "[g2,d3,g4]@2 [b3,g4]@3 ~ [f2,c3,a3,f4]@2 [a3,f4] ~ [d4,a#4]@4 [a#2,f3]@2, ~@5 [g2,d3] ~@2", // G5 Em F Dm Gm A#5 G5
  BA: "[b3,g4]@2 [a3,f4]@3 ~ [a3,f4]@2 [f2,c3,a3,f4]@2 [a3,f4]@2 [g2,d3,b3,g4]@3 ~, ~@2 [g2,d3] ~@3 [f2,c3] ~@3 [g2,d3] ~@5", // Em Dm F Dm G G5 F5 G5
  BB: "[g2,d3]!2 ~ [f2,c3] ~ [g2,d3] ~ [a#2,f3]", BC: "c2@5 ~ c2 ~ c2@7 ~", BD: "c2@5 ~ c2@2 c2@5 ~ c2 ~",
  BE: "c2@5 ~ c2 ~ c2@5 ~ c2@2", BF: "c2@5 ~ c2@2 c2@7 ~",
  BG: "[g2,d3]@2 [g2,d3] ~@3 [f2,c3] ~@3 [g2,d3]@2 ~@2 [a#2,f3]@2", // G5 F5 G5 A#5
  BH: "~@2 [g2,d3]@2 ~@2 [f2,c3]@2 [f2,c3]@2 ~@4 f2 ~", // G5 F5
  BI: "[g2,d3]@2 [g2,d3] ~@3 [f2,c3]@2 ~@2 [g2,d3]@2 ~@2 [a#2,f3]@2", BJ: "~@2 [g2,d3]@2 ~@2 [f2,c3]@2 ~@2 a2@3 ~ f2 ~",
  BK: "c2@5 ~ c2 ~ c2@5 ~ c2 ~", BL: "c2@5 ~ c2@2 ~@2 g2@2 ~@2 g1@2",
  BM: "~@2 [g2,d3] ~@3 [f2,c3]@2 [f2,c3]@2 ~@4 f2@2", BN: "d2@5 ~ d2@2 d2@5 ~ d2@2",
  BO: "[c2,g3,e4] ~ [a#1,f3,d4]@2 [c2,c3,g3,e4,g4]@4 [g3,e4,g4] ~ d4@2 e4@2 d4 ~, ~@8 [c2,c3]@7 ~", // C A# C
  BP: "[g2,d3,a3,d4,f#4]@7 ~ [a#2,f3,g3,c4,e4]@7 ~", // D C7
  BQ: "[c4,e4]@6 f3@2 [f3,c4,e4]@2 [e2,b3,d4]@3 ~ [e2,g3,c4,e4]@2, f3@5 ~@11", // C Fmaj7 E7 C
  BR: "b3 ~ c4@3 ~ [c2,c4,e4]@2 c4@2 d4 ~ d4@2 [g3,d4] ~, [c2,e4]@5 ~@3 c2@7 ~, ~@8 g3@5 ~@3", // C G5 C
  BS: "e4@2 e4@3 ~ c2@2 c2@5 ~ c2@2, [c2,g3]@5 ~@11", // C5
  BT: "e4 e4@2 ~ e4@2 [g3,e4]@2 [g3,e4]@2 [g2,a3,f#4]@4 [g1,g3,b3,g4] ~, [c2,g3]@5 ~ c2 ~@9", // C D G C5
  BU: "[g2,d3,g4] ~ [g2,d3,b3,g4]@3 ~ [a3,f4]@2 [a3,f4]@2 [g2,d3,g4] ~@3 [a#2,f3] ~, ~@6 [f2,c3] ~@5 [d4,a#4]@4", // G5 G Dm G5 A#5 F5 Gm
  BV: "[d4,a#4]@2 [g2,d3,b3,g4]@2 [a3,f4]@2 [f2,c3]@2 [a3,f4] [b3,g4] ~@4 f2@2, ~@8 [f2,c3]@3 [b3,g4]@5", // Gm G Dm F5 Dm Em F5 Em
  BW: "[g2,d3]@2 [g2,d3] ~ [a#3,g4]@2 [a3,f4]@2 [a3,f4]@2 [g2,d3,d4,a#4] ~ [d4,g4]@2 [a#2,f3,c4,f4]@2, ~@6 [f2,c3] ~@9", // G5 D# Dm Gm G5 A#sus2 F5
  BX: "[b3,d4]@2 [c4,e4]@3 ~ [c2,c4] ~ c4@2 d4 ~ d4@2 [g3,d4]@2, c2@5 ~@3 c2@7 ~, ~@8 g3@5 ~@3", // Bm C G5
  BY: "e4 ~ e4@2 ~@2 c2@2 [g3,e4]@3 ~@3 c2 ~, g3@8 c2@5 ~@3, c2 e4 ~@2", // C
  BZ: "d4@2 e4 ~ e4@2 c2 ~ [g3,e4]@2 [a3,f#4]@4 [g1,g3,b3,g4]@2, g3@7 ~@9, c2@5 ~@5 g2@2 ~@4", // C D G
  CA: "[g3,b3,g4] ~@5 c2@2 [c4,g4]@3 ~@5, c2@5 ~@3 c2@7 ~, ~ [c4,g4]@3 ~@4", // G C5
  CB: "[a3,f#4]@3 ~@3 d2@2 ~@2 f#4 ~ e4@2 [d2,d4] ~, d2@5 ~@3 d2@5 ~@3, ~@10 a3@5 ~", // D
  CC: "c4 b3 g3 [c2,g3] g3 ~@2 c2, c2@5 ~@3 c2@6 ~@2, ~@5 g3@3", // C5
  CD: "c2@3 ~ [c2,g3,e4]@2 [a#1,f3,d4]@2 [a#1,f3,d4] ~ [c2,g3,e4]@4 [a#1,f3,d4]@2", // C A# C A#
  CE: "[c4,e4]@6 f3@2 [f3,c4,e4] ~ [e2,b3,d4]@3 ~ [e2,g3,c4,e4]@2, f3@5 ~@11", // C Fmaj7 E7 C
  CF: "c2@4 ~ [c2,g3,e4]@2 ~ [a#1,f3,d4]@2 [a#1,f3,d4]@2 ~ [c2,g3]@3, ~@3 e4", // C A# C5
  CG: "[~@2 [a#1,f3,d4]@2 [c2,g3,e4]@2 ~ [a#1,f3,d4]@2 [c2,c3,g3,e4,g4]@5 [g3,e4,g4]@2 ~ d4@2 e4@2 ~ d4@2 f#4@2 ~ e4@7 e4@2 d4@7 ~ c4@2 b3@5 ~ b3 g3 g3@2 g3@2 ~@3 f3@22 ~@13, ~@14 [c2,c3]@9 ~ [g2,d3,a3,d4]@9 ~ [a#2,f3,g3,c4]@9 ~ [f2,c3]@7 f3@2 ~ f3@7 ~@35, ~@59 g3@25 ~@12]/6", // A# C A# C Gsus2 A#sus2 F5
})).s("gm_piano").gain(0.26)

stack(piano)