ly/predefined-ukulele-fretboards.ly

   1 %%%% This file is part of LilyPond, the GNU music typesetter.
   2 %%%%
   3 %%%% Copyright (C) 2009--2010 Matt Corks <mvcorks@alumni.uwaterloo.ca>
   4 %%%%
   5 %%%% LilyPond is free software: you can redistribute it and/or modify
   6 %%%% it under the terms of the GNU General Public License as published by
   7 %%%% the Free Software Foundation, either version 3 of the License, or
   8 %%%% (at your option) any later version.
   9 %%%%
  10 %%%% LilyPond is distributed in the hope that it will be useful,
  11 %%%% but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 %%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 %%%% GNU General Public License for more details.
  14 %%%%
  15 %%%% You should have received a copy of the GNU General Public License
  16 %%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
  17
  18 \version "2.13.36"
  19
  20 %%%% sources:
  21 %%%%   ukulele hall of fame museum website (http://www.ukulele.org/),
  22 %%%%   kiwi ukulele website (http://www.kiwiukulele.co.nz/)
  23
  24 % chord definitions require default pitchnames
  25 #(define prev-pitchnames pitchnames)
  26 #(set! pitchnames default-language)
  27
  28 %%% a chords
  29
  30 \storePredefinedDiagram #default-fret-table \chordmode {a}
  31                         #ukulele-tuning
  32                         #"2-2;1-1;o;o;"
  33
  34 \storePredefinedDiagram #default-fret-table \chordmode {a:m}
  35                         #ukulele-tuning
  36                         #"2-1;o;o;o;"
  37
  38 \storePredefinedDiagram #default-fret-table \chordmode {a:7}
  39                         #ukulele-tuning
  40                         #"o;1-1;o;o;"
  41
  42 \storePredefinedDiagram #default-fret-table \chordmode {a:m7}
  43                         #ukulele-tuning
  44                         #"o;o;o;o;"
  45
  46 \storePredefinedDiagram #default-fret-table \chordmode {a:dim}
  47                         #ukulele-tuning
  48                         #"2-1;3-3;2-2;3-4;"
  49
  50 \storePredefinedDiagram #default-fret-table \chordmode {a:maj7}
  51                         #ukulele-tuning
  52                         #"1-1;1-2;o;o;"
  53
  54 \storePredefinedDiagram #default-fret-table \chordmode {a:6}
  55                         #ukulele-tuning
  56                         #"2-1;4-3;2-2;4-4;"
  57
  58 \storePredefinedDiagram #default-fret-table \chordmode {a:sus2}
  59                         #ukulele-tuning
  60                         #"2-2;4-3;5-4;2-1;"
  61
  62 \storePredefinedDiagram #default-fret-table \chordmode {a:sus4}
  63                         #ukulele-tuning
  64                         #"2-1;2-2;o;o;"
  65
  66 \storePredefinedDiagram #default-fret-table \chordmode {a:aug}
  67                         #ukulele-tuning
  68                         #"2-2;1-1-(;1-1-);4-4;"
  69
  70 \storePredefinedDiagram #default-fret-table \chordmode {a:9}
  71                         #ukulele-tuning
  72                         #"o;1-1;o;2-2;"
  73
  74 %%% ais chords
  75
  76 \storePredefinedDiagram #default-fret-table \chordmode {ais}
  77                         #ukulele-tuning
  78                         #"3-3;2-2;1-1-(;1-1-);"
  79
  80 \storePredefinedDiagram #default-fret-table \chordmode {ais:m}
  81                         #ukulele-tuning
  82                         #"3-3;1-1-(;1-1;1-1-);"
  83
  84 \storePredefinedDiagram #default-fret-table \chordmode {ais:7}
  85                         #ukulele-tuning
  86                         #"1-1-(;2-2;1-1;1-1-);"
  87
  88 \storePredefinedDiagram #default-fret-table \chordmode {ais:m7}
  89                         #ukulele-tuning
  90                         #"1-1-(;1-1;1-1;1-1-);"
  91
  92 \storePredefinedDiagram #default-fret-table \chordmode {ais:dim}
  93                         #ukulele-tuning
  94                         #"o;1-1;o;1-2;"
  95
  96 \storePredefinedDiagram #default-fret-table \chordmode {ais:maj7}
  97                         #ukulele-tuning
  98                         #"2-2-(;2-2-);1-1-(;1-1-);"
  99
 100 \storePredefinedDiagram #default-fret-table \chordmode {ais:6}
 101                         #ukulele-tuning
 102                         #"o;2-2;1-1-(;1-1-);"
 103
 104 \storePredefinedDiagram #default-fret-table \chordmode {ais:sus2}
 105                         #ukulele-tuning
 106                         #"3-3;o;1-1-(;1-1-);"
 107
 108 \storePredefinedDiagram #default-fret-table \chordmode {ais:sus4}
 109                         #ukulele-tuning
 110                         #"3-3-(;3-3-);1-1-(;1-1-);"
 111
 112 \storePredefinedDiagram #default-fret-table \chordmode {ais:aug}
 113                         #ukulele-tuning
 114                         #"3-2;1-1-(;1-1-);5-4;"
 115
 116 \storePredefinedDiagram #default-fret-table \chordmode {ais:9}
 117                         #ukulele-tuning
 118                         #"1-1-(;2-2;1-1-);3-3;"
 119
 120 %%% bes chords
 121
 122 \storePredefinedDiagram #default-fret-table \chordmode {bes}
 123                         #ukulele-tuning
 124                         #"3-3;2-2;1-1-(;1-1-);"
 125
 126 \storePredefinedDiagram #default-fret-table \chordmode {bes:m}
 127                         #ukulele-tuning
 128                         #"3-3;1-1-(;1-1;1-1-);"
 129
 130 \storePredefinedDiagram #default-fret-table \chordmode {bes:7}
 131                         #ukulele-tuning
 132                         #"1-1-(;2-2;1-1;1-1-);"
 133
 134 \storePredefinedDiagram #default-fret-table \chordmode {bes:m7}
 135                         #ukulele-tuning
 136                         #"1-1-(;1-1;1-1;1-1-);"
 137
 138 \storePredefinedDiagram #default-fret-table \chordmode {bes:dim}
 139                         #ukulele-tuning
 140                         #"o;1-1;o;1-2;"
 141
 142 \storePredefinedDiagram #default-fret-table \chordmode {bes:maj7}
 143                         #ukulele-tuning
 144                         #"2-2-(;2-2-);1-1-(;1-1-);"
 145
 146 \storePredefinedDiagram #default-fret-table \chordmode {bes:6}
 147                         #ukulele-tuning
 148                         #"o;2-2;1-1-(;1-1-);"
 149
 150 \storePredefinedDiagram #default-fret-table \chordmode {bes:sus2}
 151                         #ukulele-tuning
 152                         #"3-3;o;1-1-(;1-1-);"
 153
 154 \storePredefinedDiagram #default-fret-table \chordmode {bes:sus4}
 155                         #ukulele-tuning
 156                         #"3-3-(;3-3-);1-1-(;1-1-);"
 157
 158 \storePredefinedDiagram #default-fret-table \chordmode {bes:aug}
 159                         #ukulele-tuning
 160                         #"3-2;1-1-(;1-1-);5-4;"
 161
 162 \storePredefinedDiagram #default-fret-table \chordmode {bes:9}
 163                         #ukulele-tuning
 164                         #"1-1-(;2-2;1-1-);3-3;"
 165
 166 %%% b chords
 167
 168 \storePredefinedDiagram #default-fret-table \chordmode {b}
 169                         #ukulele-tuning
 170                         #"4-3;3-2;2-1-(;2-1-);"
 171
 172 \storePredefinedDiagram #default-fret-table \chordmode {b:m}
 173                         #ukulele-tuning
 174                         #"4-3;2-1-(;2-1;2-1-);"
 175
 176 \storePredefinedDiagram #default-fret-table \chordmode {b:7}
 177                         #ukulele-tuning
 178                         #"2-1-(;3-2;2-1;2-1-);"
 179
 180 \storePredefinedDiagram #default-fret-table \chordmode {b:m7}
 181                         #ukulele-tuning
 182                         #"2-1-(;2-1;2-1;2-1-);"
 183
 184 \storePredefinedDiagram #default-fret-table \chordmode {b:dim}
 185                         #ukulele-tuning
 186                         #"1-1;2-3;1-2;2-4;"
 187
 188 \storePredefinedDiagram #default-fret-table \chordmode {b:maj7}
 189                         #ukulele-tuning
 190                         #"3-2-(;3-2-);2-1-(;2-1-);"
 191
 192 \storePredefinedDiagram #default-fret-table \chordmode {b:6}
 193                         #ukulele-tuning
 194                         #"1-1;3-4;2-2;2-3;"
 195
 196 \storePredefinedDiagram #default-fret-table \chordmode {b:sus2}
 197                         #ukulele-tuning
 198                         #"5-4;1-1;2-3;2-2;"
 199
 200 \storePredefinedDiagram #default-fret-table \chordmode {b:sus4}
 201                         #ukulele-tuning
 202                         #"4-2-(;4-2-);2-1-(;2-1-);"
 203
 204 \storePredefinedDiagram #default-fret-table \chordmode {b:aug}
 205                         #ukulele-tuning
 206                         #"o;3-2-(;3-2-);2-1;"
 207
 208 \storePredefinedDiagram #default-fret-table \chordmode {b:9}
 209                         #ukulele-tuning
 210                         #"2-2-(;3-3;2-2-);4-4;"
 211
 212 %%% c chords
 213
 214 \storePredefinedDiagram #default-fret-table \chordmode {c}
 215                         #ukulele-tuning
 216                         #"o;o;o;3-3;"
 217
 218 \storePredefinedDiagram #default-fret-table \chordmode {c:m}
 219                         #ukulele-tuning
 220                         #"o;3-1;3-2;3-3;"
 221
 222 \storePredefinedDiagram #default-fret-table \chordmode {c:7}
 223                         #ukulele-tuning
 224                         #"o;o;o;1-1;"
 225
 226 \storePredefinedDiagram #default-fret-table \chordmode {c:m7}
 227                         #ukulele-tuning
 228                         #"3-1-(;3-1;3-1;3-1-);"
 229
 230 \storePredefinedDiagram #default-fret-table \chordmode {c:dim}
 231                         #ukulele-tuning
 232                         #"2-1;3-3;2-2;3-4;"
 233
 234 \storePredefinedDiagram #default-fret-table \chordmode {c:maj7}
 235                         #ukulele-tuning
 236                         #"o;o;o;2-1;"
 237
 238 \storePredefinedDiagram #default-fret-table \chordmode {c:6}
 239                         #ukulele-tuning
 240                         #"o;o;o;o;"
 241
 242 \storePredefinedDiagram #default-fret-table \chordmode {c:sus2}
 243                         #ukulele-tuning
 244                         #"o;2-1;3-2-(;3-2-);"
 245
 246 \storePredefinedDiagram #default-fret-table \chordmode {c:sus4}
 247                         #ukulele-tuning
 248                         #"o;o;1-1;3-3;"
 249
 250 \storePredefinedDiagram #default-fret-table \chordmode {c:aug}
 251                         #ukulele-tuning
 252                         #"1-1;o;o;3-4;"
 253
 254 \storePredefinedDiagram #default-fret-table \chordmode {c:9}
 255                         #ukulele-tuning
 256                         #"o;2-2;o;1-1;"
 257
 258 %%% cis chords
 259
 260 \storePredefinedDiagram #default-fret-table \chordmode {cis}
 261                         #ukulele-tuning
 262                         #"1-1-(;1-1;1-1-);4-4;"
 263
 264 \storePredefinedDiagram #default-fret-table \chordmode {cis:m}
 265                         #ukulele-tuning
 266                         #"1-1;4-2;4-3-(;4-3-);"
 267
 268 \storePredefinedDiagram #default-fret-table \chordmode {cis:7}
 269                         #ukulele-tuning
 270                         #"1-1-(;1-1;1-1-);2-2;"
 271
 272 \storePredefinedDiagram #default-fret-table \chordmode {cis:m7}
 273                         #ukulele-tuning
 274                         #"2-2-(;2-2-);1-1;3-3;"
 275
 276 \storePredefinedDiagram #default-fret-table \chordmode {cis:dim}
 277                         #ukulele-tuning
 278                         #"o;1-1;o;1-2;"
 279
 280 \storePredefinedDiagram #default-fret-table \chordmode {cis:maj7}
 281                         #ukulele-tuning
 282                         #"1-1-(;1-1;1-1-);3-3;"
 283
 284 \storePredefinedDiagram #default-fret-table \chordmode {cis:6}
 285                         #ukulele-tuning
 286                         #"1-1-(;1-1;1-1;1-1-);"
 287
 288 \storePredefinedDiagram #default-fret-table \chordmode {cis:sus2}
 289                         #ukulele-tuning
 290                         #"1-1;3-2;4-3-(;4-3-);"
 291
 292 \storePredefinedDiagram #default-fret-table \chordmode {cis:sus4}
 293                         #ukulele-tuning
 294                         #"1-1-(;1-1-);2-2;4-4;"
 295
 296 \storePredefinedDiagram #default-fret-table \chordmode {cis:aug}
 297                         #ukulele-tuning
 298                         #"2-2;1-1-(;1-1-);4-4;"
 299
 300 \storePredefinedDiagram #default-fret-table \chordmode {cis:9}
 301                         #ukulele-tuning
 302                         #"1-1-(;3-3;1-1-);2-2;"
 303
 304 %%% des chords
 305
 306 \storePredefinedDiagram #default-fret-table \chordmode {des}
 307                         #ukulele-tuning
 308                         #"1-1-(;1-1;1-1-);4-4;"
 309
 310 \storePredefinedDiagram #default-fret-table \chordmode {des:m}
 311                         #ukulele-tuning
 312                         #"1-1;4-2;4-3-(;4-3-);"
 313
 314 \storePredefinedDiagram #default-fret-table \chordmode {des:7}
 315                         #ukulele-tuning
 316                         #"1-1-(;1-1;1-1-);2-2;"
 317
 318 \storePredefinedDiagram #default-fret-table \chordmode {des:m7}
 319                         #ukulele-tuning
 320                         #"2-2-(;2-2-);1-1;3-3;"
 321
 322 \storePredefinedDiagram #default-fret-table \chordmode {des:dim}
 323                         #ukulele-tuning
 324                         #"o;1-1;o;1-2;"
 325
 326 \storePredefinedDiagram #default-fret-table \chordmode {des:maj7}
 327                         #ukulele-tuning
 328                         #"1-1-(;1-1;1-1-);3-3;"
 329
 330 \storePredefinedDiagram #default-fret-table \chordmode {des:6}
 331                         #ukulele-tuning
 332                         #"1-1-(;1-1;1-1;1-1-);"
 333
 334 \storePredefinedDiagram #default-fret-table \chordmode {des:sus2}
 335                         #ukulele-tuning
 336                         #"1-1;3-2;4-3-(;4-3-);"
 337
 338 \storePredefinedDiagram #default-fret-table \chordmode {des:sus4}
 339                         #ukulele-tuning
 340                         #"1-1-(;1-1-);2-2;4-4;"
 341
 342 \storePredefinedDiagram #default-fret-table \chordmode {des:aug}
 343                         #ukulele-tuning
 344                         #"2-2;1-1-(;1-1-);4-4;"
 345
 346 \storePredefinedDiagram #default-fret-table \chordmode {des:9}
 347                         #ukulele-tuning
 348                         #"1-1-(;3-3;1-1-);2-2;"
 349
 350 %%% d chords
 351
 352 \storePredefinedDiagram #default-fret-table \chordmode {d}
 353                         #ukulele-tuning
 354                         #"2-1;2-2;2-3;o;"
 355
 356 \storePredefinedDiagram #default-fret-table \chordmode {d:m}
 357                         #ukulele-tuning
 358                         #"2-2-(;2-2-);1-1;o;"
 359
 360 \storePredefinedDiagram #default-fret-table \chordmode {d:7}
 361                         #ukulele-tuning
 362                         #"2-1-(;2-1;2-1-);3-2;"
 363
 364 \storePredefinedDiagram #default-fret-table \chordmode {d:m7}
 365                         #ukulele-tuning
 366                         #"2-2-(;2-2-);1-1;3-3;"
 367
 368 \storePredefinedDiagram #default-fret-table \chordmode {d:dim}
 369                         #ukulele-tuning
 370                         #"1-1;2-3;1-2;2-4;"
 371
 372 \storePredefinedDiagram #default-fret-table \chordmode {d:maj7}
 373                         #ukulele-tuning
 374                         #"2-1-(;2-1;2-1-);4-3;"
 375
 376 \storePredefinedDiagram #default-fret-table \chordmode {d:6}
 377                         #ukulele-tuning
 378                         #"2-1-(;2-1;2-1;2-1-);"
 379
 380 \storePredefinedDiagram #default-fret-table \chordmode {d:sus2}
 381                         #ukulele-tuning
 382                         #"2-1;2-2;o;o;"
 383
 384 \storePredefinedDiagram #default-fret-table \chordmode {d:sus4}
 385                         #ukulele-tuning
 386                         #"o;2-1;3-2;o;"
 387
 388 \storePredefinedDiagram #default-fret-table \chordmode {d:aug}
 389                         #ukulele-tuning
 390                         #"3-2;2-1-(;2-1-);5-4;"
 391
 392 \storePredefinedDiagram #default-fret-table \chordmode {d:9}
 393                         #ukulele-tuning
 394                         #"2-1-(;4-3;2-1-);3-2;"
 395
 396 %%%% dis chords
 397
 398 \storePredefinedDiagram #default-fret-table \chordmode {dis}
 399                         #ukulele-tuning
 400                         #"o;3-2-(;3-2-);1-1;"
 401
 402 \storePredefinedDiagram #default-fret-table \chordmode {dis:m}
 403                         #ukulele-tuning
 404                         #"3-3-(;3-3-);2-2;1-1;"
 405
 406 \storePredefinedDiagram #default-fret-table \chordmode {dis:7}
 407                         #ukulele-tuning
 408                         #"3-1-(;3-1;3-1-);4-2;"
 409
 410 \storePredefinedDiagram #default-fret-table \chordmode {dis:m7}
 411                         #ukulele-tuning
 412                         #"3-2-(;3-2-);2-1;4-4;"
 413
 414 \storePredefinedDiagram #default-fret-table \chordmode {dis:dim}
 415                         #ukulele-tuning
 416                         #"2-1;3-3;2-1;3-4;"
 417
 418 \storePredefinedDiagram #default-fret-table \chordmode {dis:maj7}
 419                         #ukulele-tuning
 420                         #"3-1-(;3-2;3-1-);5-2;"
 421
 422 \storePredefinedDiagram #default-fret-table \chordmode {dis:6}
 423                         #ukulele-tuning
 424                         #"3-1-(;3-1;3-1;3-1-);"
 425
 426 \storePredefinedDiagram #default-fret-table \chordmode {dis:sus2}
 427                         #ukulele-tuning
 428                         #"3-2-(;3-2-);1-1-(;1-1-);"
 429
 430 \storePredefinedDiagram #default-fret-table \chordmode {dis:sus4}
 431                         #ukulele-tuning
 432                         #"1-2;3-3;4-4;1-1;"
 433
 434 \storePredefinedDiagram #default-fret-table \chordmode {dis:aug}
 435                         #ukulele-tuning
 436                         #"o;3-2-(;3-2-);2-1;"
 437
 438 \storePredefinedDiagram #default-fret-table \chordmode {dis:9}
 439                         #ukulele-tuning
 440                         #"o;1-1-(;1-1;1-1-);"
 441
 442 %%%% ees chords
 443
 444 \storePredefinedDiagram #default-fret-table \chordmode {ees}
 445                         #ukulele-tuning
 446                         #"o;3-2-(;3-2-);1-1;"
 447
 448 \storePredefinedDiagram #default-fret-table \chordmode {ees:m}
 449                         #ukulele-tuning
 450                         #"3-3-(;3-3-);2-2;1-1;"
 451
 452 \storePredefinedDiagram #default-fret-table \chordmode {ees:7}
 453                         #ukulele-tuning
 454                         #"3-1-(;3-1;3-1-);4-2;"
 455
 456 \storePredefinedDiagram #default-fret-table \chordmode {ees:m7}
 457                         #ukulele-tuning
 458                         #"3-2-(;3-2-);2-1;4-4;"
 459
 460 \storePredefinedDiagram #default-fret-table \chordmode {ees:dim}
 461                         #ukulele-tuning
 462                         #"2-1;3-3;2-1;3-4;"
 463
 464 \storePredefinedDiagram #default-fret-table \chordmode {ees:maj7}
 465                         #ukulele-tuning
 466                         #"3-1-(;3-2;3-1-);5-2;"
 467
 468 \storePredefinedDiagram #default-fret-table \chordmode {ees:6}
 469                         #ukulele-tuning
 470                         #"3-1-(;3-1;3-1;3-1-);"
 471
 472 \storePredefinedDiagram #default-fret-table \chordmode {ees:sus2}
 473                         #ukulele-tuning
 474                         #"3-2-(;3-2-);1-1-(;1-1-);"
 475
 476 \storePredefinedDiagram #default-fret-table \chordmode {ees:sus4}
 477                         #ukulele-tuning
 478                         #"1-2;3-3;4-4;1-1;"
 479
 480 \storePredefinedDiagram #default-fret-table \chordmode {ees:aug}
 481                         #ukulele-tuning
 482                         #"o;3-2-(;3-2-);2-1;"
 483
 484 \storePredefinedDiagram #default-fret-table \chordmode {ees:9}
 485                         #ukulele-tuning
 486                         #"o;1-1-(;1-1;1-1-);"
 487
 488 %%%% e chords
 489
 490 \storePredefinedDiagram #default-fret-table \chordmode {e}
 491                         #ukulele-tuning
 492                         #"4-2;4-3;4-4;2-1;"
 493
 494 \storePredefinedDiagram #default-fret-table \chordmode {e:m}
 495                         #ukulele-tuning
 496                         #"4-3;4-3;3-2;2-1;"
 497
 498 \storePredefinedDiagram #default-fret-table \chordmode {e:7}
 499                         #ukulele-tuning
 500                         #"1-1;2-2;o;2-3;"
 501
 502 \storePredefinedDiagram #default-fret-table \chordmode {e:m7}
 503                         #ukulele-tuning
 504                         #"o;2-1;o;2-2;"
 505
 506 \storePredefinedDiagram #default-fret-table \chordmode {e:dim}
 507                         #ukulele-tuning
 508                         #"o;1-1;o;1-2;"
 509
 510 \storePredefinedDiagram #default-fret-table \chordmode {e:maj7}
 511                         #ukulele-tuning
 512                         #"1-1;3-3;o;2-2;"
 513
 514 \storePredefinedDiagram #default-fret-table \chordmode {e:6}
 515                         #ukulele-tuning
 516                         #"4-1-(;4-1;4-1;4-1-);"
 517
 518 \storePredefinedDiagram #default-fret-table \chordmode {e:sus2}
 519                         #ukulele-tuning
 520                         #"4-3-(;4-3-);2-1-(;2-1-);"
 521
 522 \storePredefinedDiagram #default-fret-table \chordmode {e:sus4}
 523                         #ukulele-tuning
 524                         #"2-2;4-4;o;2-1;"
 525
 526 \storePredefinedDiagram #default-fret-table \chordmode {e:aug}
 527                         #ukulele-tuning
 528                         #"1-1;o;o;3-4;"
 529
 530 \storePredefinedDiagram #default-fret-table \chordmode {e:9}
 531                         #ukulele-tuning
 532                         #"1-1;2-2-(;2-2;2-2-);"
 533
 534 %%%% f chords
 535
 536 \storePredefinedDiagram #default-fret-table \chordmode {f}
 537                         #ukulele-tuning
 538                         #"2-2;o;1-1;o;"
 539
 540 \storePredefinedDiagram #default-fret-table \chordmode {f:m}
 541                         #ukulele-tuning
 542                         #"1-1;o;1-2;3-4;"
 543
 544 \storePredefinedDiagram #default-fret-table \chordmode {f:7}
 545                         #ukulele-tuning
 546                         #"2-2;3-3;1-1;3-4;"
 547
 548 \storePredefinedDiagram #default-fret-table \chordmode {f:m7}
 549                         #ukulele-tuning
 550                         #"1-1;3-3;1-2;3-4;"
 551
 552 \storePredefinedDiagram #default-fret-table \chordmode {f:dim}
 553                         #ukulele-tuning
 554                         #"1-1;2-3;1-2;2-4;"
 555
 556 \storePredefinedDiagram #default-fret-table \chordmode {f:maj7}
 557                         #ukulele-tuning
 558                         #"2-2;4-4;1-1;3-3;"
 559
 560 \storePredefinedDiagram #default-fret-table \chordmode {f:6}
 561                         #ukulele-tuning
 562                         #"2-2-(;2-2-);1-1;3-4;"
 563
 564 \storePredefinedDiagram #default-fret-table \chordmode {f:sus2}
 565                         #ukulele-tuning
 566                         #"o;o;1-1;3-3;"
 567
 568 \storePredefinedDiagram #default-fret-table \chordmode {f:sus4}
 569                         #ukulele-tuning
 570                         #"3-3;o;1-1-(;1-1-);"
 571
 572 \storePredefinedDiagram #default-fret-table \chordmode {f:aug}
 573                         #ukulele-tuning
 574                         #"2-2;1-1-(;1-1-);4-4;"
 575
 576 \storePredefinedDiagram #default-fret-table \chordmode {f:9}
 577                         #ukulele-tuning
 578                         #"2-1;3-2-(;3-2;3-2-);"
 579
 580 %%%% fis chords
 581
 582 \storePredefinedDiagram #default-fret-table \chordmode {fis}
 583                         #ukulele-tuning
 584                         #"3-3;1-1;2-2;1-1;"
 585
 586 \storePredefinedDiagram #default-fret-table \chordmode {fis:m}
 587                         #ukulele-tuning
 588                         #"2-2;1-1;2-3;o;"
 589
 590 \storePredefinedDiagram #default-fret-table \chordmode {fis:7}
 591                         #ukulele-tuning
 592                         #"3-3;4-4;2-2;1-1;"
 593
 594 \storePredefinedDiagram #default-fret-table \chordmode {fis:m7}
 595                         #ukulele-tuning
 596                         #"2-1;4-3;2-2;4-4;"
 597
 598 \storePredefinedDiagram #default-fret-table \chordmode {fis:dim}
 599                         #ukulele-tuning
 600                         #"2-1;3-3;2-2;3-4;"
 601
 602 \storePredefinedDiagram #default-fret-table \chordmode {fis:maj7}
 603                         #ukulele-tuning
 604                         #"3-2;5-4;2-1;4-3;"
 605
 606 \storePredefinedDiagram #default-fret-table \chordmode {fis:6}
 607                         #ukulele-tuning
 608                         #"3-2-(;3-2-);2-1;4-4;"
 609
 610 \storePredefinedDiagram #default-fret-table \chordmode {fis:sus2}
 611                         #ukulele-tuning
 612                         #"1-1-(;1-1-);2-2;4-4;"
 613
 614 \storePredefinedDiagram #default-fret-table \chordmode {fis:sus4}
 615                         #ukulele-tuning
 616                         #"4-4;1-1;2-2;2-3;"
 617
 618 \storePredefinedDiagram #default-fret-table \chordmode {fis:aug}
 619                         #ukulele-tuning
 620                         #"3-2;2-1-(;2-1-);5-4;"
 621
 622 \storePredefinedDiagram #default-fret-table \chordmode {fis:9}
 623                         #ukulele-tuning
 624                         #"3-1;4-2-(;4-2;4-2-);"
 625
 626 %%%% ges chords
 627
 628 \storePredefinedDiagram #default-fret-table \chordmode {ges}
 629                         #ukulele-tuning
 630                         #"3-3;1-1;2-2;1-1;"
 631
 632 \storePredefinedDiagram #default-fret-table \chordmode {ges:m}
 633                         #ukulele-tuning
 634                         #"2-2;1-1;2-3;o;"
 635
 636 \storePredefinedDiagram #default-fret-table \chordmode {ges:7}
 637                         #ukulele-tuning
 638                         #"3-3;4-4;2-2;1-1;"
 639
 640 \storePredefinedDiagram #default-fret-table \chordmode {ges:m7}
 641                         #ukulele-tuning
 642                         #"2-1;4-3;2-2;4-4;"
 643
 644 \storePredefinedDiagram #default-fret-table \chordmode {ges:dim}
 645                         #ukulele-tuning
 646                         #"2-1;3-3;2-2;3-4;"
 647
 648 \storePredefinedDiagram #default-fret-table \chordmode {ges:maj7}
 649                         #ukulele-tuning
 650                         #"3-2;5-4;2-1;4-3;"
 651
 652 \storePredefinedDiagram #default-fret-table \chordmode {ges:6}
 653                         #ukulele-tuning
 654                         #"3-2-(;3-2-);2-1;4-4;"
 655
 656 \storePredefinedDiagram #default-fret-table \chordmode {ges:sus2}
 657                         #ukulele-tuning
 658                         #"1-1-(;1-1-);2-2;4-4;"
 659
 660 \storePredefinedDiagram #default-fret-table \chordmode {ges:sus4}
 661                         #ukulele-tuning
 662                         #"4-4;1-1;2-2;2-3;"
 663
 664 \storePredefinedDiagram #default-fret-table \chordmode {ges:aug}
 665                         #ukulele-tuning
 666                         #"3-2;2-1-(;2-1-);5-4;"
 667
 668 \storePredefinedDiagram #default-fret-table \chordmode {ges:9}
 669                         #ukulele-tuning
 670                         #"3-1;4-2-(;4-2;4-2-);"
 671
 672 %%%% g chords
 673
 674 \storePredefinedDiagram #default-fret-table \chordmode {g}
 675                         #ukulele-tuning
 676                         #"o;2-1;3-3;2-2;"
 677
 678 \storePredefinedDiagram #default-fret-table \chordmode {g:m}
 679                         #ukulele-tuning
 680                         #"o;2-2;3-3;1-1;"
 681
 682 \storePredefinedDiagram #default-fret-table \chordmode {g:7}
 683                         #ukulele-tuning
 684                         #"o;2-2;1-1;2-3;"
 685
 686 \storePredefinedDiagram #default-fret-table \chordmode {g:m7}
 687                         #ukulele-tuning
 688                         #"o;2-2;1-1-(;1-1-);"
 689
 690 \storePredefinedDiagram #default-fret-table \chordmode {g:dim}
 691                         #ukulele-tuning
 692                         #"o;1-1;o;1-2;"
 693
 694 \storePredefinedDiagram #default-fret-table \chordmode {g:maj7}
 695                         #ukulele-tuning
 696                         #"o;2-1;2-2;2-3;"
 697
 698 \storePredefinedDiagram #default-fret-table \chordmode {g:6}
 699                         #ukulele-tuning
 700                         #"o;2-1;o;2-2;"
 701
 702 \storePredefinedDiagram #default-fret-table \chordmode {g:sus2}
 703                         #ukulele-tuning
 704                         #"o;2-1;3-2;o;"
 705
 706 \storePredefinedDiagram #default-fret-table \chordmode {g:sus4}
 707                         #ukulele-tuning
 708                         #"o;2-1;3-2;3-3;"
 709
 710 \storePredefinedDiagram #default-fret-table \chordmode {g:aug}
 711                         #ukulele-tuning
 712                         #"o;3-2-(;3-2-);2-1;"
 713
 714 \storePredefinedDiagram #default-fret-table \chordmode {g:9}
 715                         #ukulele-tuning
 716                         #"2-2;2-3;1-1;2-4;"
 717
 718 %%%% gis chords
 719
 720 \storePredefinedDiagram #default-fret-table \chordmode {gis}
 721                         #ukulele-tuning
 722                         #"5-3;3-1-(;4-2;3-1-);"
 723
 724 \storePredefinedDiagram #default-fret-table \chordmode {gis:m}
 725                         #ukulele-tuning
 726                         #"1-1;3-3;4-4;2-2;"
 727
 728 \storePredefinedDiagram #default-fret-table \chordmode {gis:7}
 729                         #ukulele-tuning
 730                         #"1-1;3-3;2-2;3-4;"
 731
 732 \storePredefinedDiagram #default-fret-table \chordmode {gis:m7}
 733                         #ukulele-tuning
 734                         #"1-1;3-4;2-2;2-3;"
 735
 736 \storePredefinedDiagram #default-fret-table \chordmode {gis:dim}
 737                         #ukulele-tuning
 738                         #"1-1;2-3;1-2;2-4;"
 739
 740 \storePredefinedDiagram #default-fret-table \chordmode {gis:maj7}
 741                         #ukulele-tuning
 742                         #"1-1;3-2;3-3-(;3-3-);"
 743
 744 \storePredefinedDiagram #default-fret-table \chordmode {gis:6}
 745                         #ukulele-tuning
 746                         #"1-1;3-3;1-2;3-4;"
 747
 748 \storePredefinedDiagram #default-fret-table \chordmode {gis:sus2}
 749                         #ukulele-tuning
 750                         #"1-2;3-3;4-4;1-1;"
 751
 752 \storePredefinedDiagram #default-fret-table \chordmode {gis:sus4}
 753                         #ukulele-tuning
 754                         #"1-1;2-3;4-3-(;4-3-);"
 755
 756 \storePredefinedDiagram #default-fret-table \chordmode {gis:aug}
 757                         #ukulele-tuning
 758                         #"1-1;o;o;3-4;"
 759
 760 \storePredefinedDiagram #default-fret-table \chordmode {gis:9}
 761                         #ukulele-tuning
 762                         #"1-1;o;2-3;1-2;"
 763
 764 %%%% aes chords
 765
 766 \storePredefinedDiagram #default-fret-table \chordmode {aes}
 767                         #ukulele-tuning
 768                         #"5-3;3-1-(;4-2;3-1-);"
 769
 770 \storePredefinedDiagram #default-fret-table \chordmode {aes:m}
 771                         #ukulele-tuning
 772                         #"1-1;3-3;4-4;2-2;"
 773
 774 \storePredefinedDiagram #default-fret-table \chordmode {aes:7}
 775                         #ukulele-tuning
 776                         #"1-1;3-3;2-2;3-4;"
 777
 778 \storePredefinedDiagram #default-fret-table \chordmode {aes:m7}
 779                         #ukulele-tuning
 780                         #"1-1;3-4;2-2;2-3;"
 781
 782 \storePredefinedDiagram #default-fret-table \chordmode {aes:dim}
 783                         #ukulele-tuning
 784                         #"1-1;2-3;1-2;2-4;"
 785
 786 \storePredefinedDiagram #default-fret-table \chordmode {aes:maj7}
 787                         #ukulele-tuning
 788                         #"1-1;3-2;3-3-(;3-3-);"
 789
 790 \storePredefinedDiagram #default-fret-table \chordmode {aes:6}
 791                         #ukulele-tuning
 792                         #"1-1;3-3;1-2;3-4;"
 793
 794 \storePredefinedDiagram #default-fret-table \chordmode {aes:sus2}
 795                         #ukulele-tuning
 796                         #"1-2;3-3;4-4;1-1;"
 797
 798 \storePredefinedDiagram #default-fret-table \chordmode {aes:sus4}
 799                         #ukulele-tuning
 800                         #"1-1;2-3;4-3-(;4-3-);"
 801
 802 \storePredefinedDiagram #default-fret-table \chordmode {aes:aug}
 803                         #ukulele-tuning
 804                         #"1-1;o;o;3-4;"
 805
 806 \storePredefinedDiagram #default-fret-table \chordmode {aes:9}
 807                         #ukulele-tuning
 808                         #"1-1;o;2-3;1-2;"
 809
 810 #(set! pitchnames prev-pitchnames)