function member = member1

% creates structural member according to DAfStb exanmple



%% material parameters
    % concrete C20/25
    member.f_ck = 20; % [N/mm^2]
    member.f_cm = member.f_ck + 8; % mittlere Zylinderdruckfestigkeit [N/mm^2]
    member.f_cd = 0.85*member.f_ck/1.5; % [N/mm^2]
    member.f_ctmsurf = 2; % [N/mm^2] Oberföächenzugfestigkeit
    
    % BST 500
    member.phi_s = 12; % größter Druchmesser in [mm]
    member.f_yk = 500; % [N/mm^2]
    member.f_yd = member.f_yk/1.15;
    member.E_s = 200000; % [N/mm^2]
    member.e_su = 1000*member.f_yd/member.E_s; % [mm/m]
    member.type_y = 'ripped'; % [ripped , smooth]
    member.gap = 12; % [cm] distance between reinfocment bars
    member.perMeter = 100/member.gap; % number of bars per meter
    member.n_s = [member.perMeter]; % number of diffrent bars per diameter, here: 8.333 bars per meter
    member.phi = [12]; % diffrent diameters
    member.doubleBar = 'false'; % true or false
    
    % CFRP Strip
    member.f_Luk = 2400; % Materialfestigkeit der Verstärkung [N/mm^2]
    member.f_Lud = member.f_Luk/1.2;
    member.E_L = 170000; % [N/mm^2]
    member.varepsilon_Lud = 10^3 * member.f_Lud/member.E_L; % [mm/m]
    member.t_L = 1.4; % [mm]
    member.b_L = 175; % mm/m
    member.a_L = member.t_L * member.b_L
    
    
%% geometrical parameters
    % heigth
    member.h = 200; % [mm]

    % length
    member.l_0 = 6000; % [mm]
    
    % width
    member.b = 1000; % [mm]
    
    % Lage der Bewehrung
    member.c_nom = 30; % [mm]
    member.d = member.h - member.c_nom;

%% parameters from structural analysis
       
    % loading
    member.g_k1 = 5.0; % charakteristisches Eigengewicht in [kN/m]
    member.g_k2 = 2.0; % Ausbaulast in [kN/m]
    member.g_k = member.g_k1 + member.g_k2;
    member.q_k = 7.0; % charakteristisches Verkehrslast in [kN/m]
    member.p_d = 1.35*member.g_k + 1.5*member.q_k; % design force in [kN/m]
    
    % acting moment during strengthening
    member.m_0k = member.g_k1 * member.l_0^2/(8*10^6); % [kNm/m]
    
    % internal moments
     x = [0: 0.01 : 0.001*member.l_0];
     member.M_EdV = zeros(length(x),1);
     member.m_e0  = zeros(length(x),1);
     
    for i=1:length(x)
        % insert function of bending moment below behind "member.M_EdV(i) = member.M_EdV(i) +"
        member.M_EdV(i) = member.M_EdV(i) + member.p_d *  member.l_0 *x(i)/2000 - (member.p_d *x(i)^2)/2 ; % design moment
        member.m_e0(i)  = member.m_e0(i)  + member.g_k1 * member.l_0 *x(i)/2000 - (member.g_k1*x(i)^2)/2 ; % characteristic moment
    end
        
    % bond condition
    member.bondCond = 'moderate'; % ['good', 'moderate']
    
    % tensile steel reinforcement
    member.a_sl = 9.42*100; %[mm^2]
    member.a_sq = 1.88;
    

end