:: deftheorem defines hepta_1 MUSIC_S1:def 82 :
for HPS being Heptatonic_Pythagorean_Score
for frequency being Element of HPS holds hepta_1 (HPS,frequency) = (heptatonic_pythagorean_scale (HPS,frequency)) . 2;