:: deftheorem defines hepta_6 MUSIC_S1:def 87 :
for HPS being Heptatonic_Pythagorean_Score
for frequency being Element of HPS holds hepta_6 (HPS,frequency) = (heptatonic_pythagorean_scale (HPS,frequency)) . 7;