:: deftheorem Def19 defines spiral_of_fifths MUSIC_S1:def 53 :
for MS being non empty satisfying_equiv satisfying_interval satisfying_commutativity satisfying_Nat satisfying_harmonic_closed satisfying_fifth_constructible satisfying_octave_constructible satisfying_octave_descendent_constructible MusicStruct
for fondamentale, frequency being Element of MS
for b4 being sequence of MS holds
( b4 = spiral_of_fifths (MS,fondamentale,frequency) iff ( b4 . 0 = frequency & ( for n being Nat holds b4 . (n + 1) = Fifth_reduct (MS,fondamentale,(b4 . n)) ) ) );