function [ka] = Csurf_Machined_m (Sut)
%
%  This routine computes the surface correction factor for a machined surface
%  given the ultimate tensile strength
%
%   Sut = ultimate tensile strength in MPa

ka = 4.51 * Sut ^ (-0.265);

end

