function [ kc ] = Cload( load_type )
%
%  This routine returns the load factor for different types of load
%
%  load_type    'bending'
%               'axial'
%               'torsion'
%               'combined'

if (strcmpi(load_type, 'bending') == 1)
    kc = 1.0;
elseif (strcmpi (load_type, 'axial') == 1)
    kc = 0.85;
elseif (strcmpi (load_type, 'torsion') == 1)
    kc = 0.59;
elseif (strcmpi (load_type, 'combined') == 1)
    kc = 1.0;
else
    error ('MATLAB:Cload', ' Invalid load_type %s', load_type);

end

