%
%Subroutine with the objective function
% file name column_objf.m
% objective function
% Prof. Reyolando Brasil 2021
function f=column_objf(x)
% renaming design variables
x1=x(1);x2=x(2);
% data
L=5.0; % column length (m)
rho=7850; % steel density (kg/m^3)
% objective function
A=2*pi*x1*x2;
f=A*L*rho; %column mass
%