function p=uebung_3_para


% #################################################################################
% # Deklarationen, Definitionen
% #################################################################################


% Kinetische Daten
p.k_ad_A=1e-3;       % Adsorptionsgeschwindigkeitskonstante [m/s]
p.k_ad_B=10e-3;      % Adsorptionsgeschwindigkeitskonstante [m/s]

p.k_adde_A=1e1;      % Gleichgewichtskonstante Adsorptions/Desorption [m^3/mol]
p.k_adde_B=10e1;     % Gleichgewichtskonstante Adsorptions/Desorption [m^3/mol]

p.c=1e-5;                % Adsorptionskapazitaet [mol/m^2]

p.D_A=2e-3;          % Diffusionskoeffizienten [m^2/s]
p.D_B=1e-3;          % Diffusionskoeffizienten [m^2/s]


% Geometrie/ Betriebsdaten
p.l=0.3;                 % Laenge des Rohres [m]
p.A=0.3*pi/4*(2e-3)^2;   % Freie Querschnittsflaeche des Rohres [m^2]
p.a=1e4;                 % innere Oberflaeche des Adsorbers [m^2/m^3]
p.V=40*(1e-6/60);        % Volumenstrom des Eluenten [m^3/s]
p.v=p.V/p.A;             % Konvektionsgeschwindigkeit des Eluenten [m/s]


% Strukturdaten
p.n=10;                 % Anzahl der Kontrollvolumen [1]
p.dz=p.l/p.n;            % Laenge der Konrollvolumina [m]
p.z_n=linspace(0,p.l,p.n+1);
p.z(1:p.n)=p.z_n(1:p.n)+p.dz/2; 