The calculation of the profile drag of aerofoils and bodies of revolution at supersonic speeds