Problem: Major Scales

Code: Major+Scales/darrenks_1645763323

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)


DepthLitDescTypeArgLet
0| filter[[chr]]
* 1% split (remove empties)[[chr]]
** 2"\nA B C\9839 D E F\9839 G\9839\nA\9837 B\9837 C D\9837 E\9837 F G\nA\9839 B\9839 C\119082 D\9839 E\9839 F\119082 G\119082\nB C\9839 D\9839 E F\9839 G\9839 A\9839\nB\9837 C D E\9837 F G A\nB\9839 C\119082 D\119082 E\9839 F\119082 G\119082 A\119082\nC D E F G A B\nC\9837 D\9837 E\9837 F\9837 G\9837 A\9837 B\9837\nC\9839 D\9839 E\9839 F\9839 G\9839 A\9839 B\9839\nD E F\9839 G A B C\9839\nD\9837 E\9837 F G\9837 A\9837 B\9837 C\nD\9839 E\9839 F\119082 G\9839 A\9839 B\9839 C\119082\nE F\9839 G\9839 A B C\9839 D\9839\nE\9837 F G A\9837 B\9837 C D\nE\9839 F\119082 G\119082 A\9839 B\9839 C\119082 D\119082\nF G A B\9837 C D E\nF\9837 G\9837 A\9837 B\119083 C\9837 D\9837 E\9837\nF\9839 G\9839 A\9839 B C\9839 D\9839 E\9839\nG A B C D E F\9839\nG\9837 A\9837 B\9837 C\9837 D\9837 E\9837 F\nG\9839 A\9839 B\9839 C\9839 D\9839 E\9839 F\119082\n" string[chr]
** 2"\n" string[chr]
* 1== equal?intA:[chr]
** 2/ foldr1[chr]
*** 3% split (remove empties)[[chr]]
**** 4$ = A[chr]
**** 4~ auto = wordsauto
*** 3$ = C[chr]C:[chr] B:[chr]
** 2;$ = fstLine[chr]D:[chr]