:: deftheorem defines hepta_3 MUSIC_S1:def 84 :
for HPS being Heptatonic_Pythagorean_Score
for frequency being Element of HPS holds hepta_3 (HPS,frequency) = (heptatonic_pythagorean_scale (HPS,frequency)) . 4;