% Param_def.m 
% Gisle Otto Eikrem
% 13.05.2005
% Henrik Tuvens 19.12.08

%% Reservoir and inflow coefficients

Pres= 370E5; % [Pa] reservoir pressure far out  
ProdI = 1.2*8.8889e-007/4;   % [kg/s*pa] productivity index


%% initial values
Pbhinit=[212E5 210E5 202E5 184E5];  % bottomhole initial pressure

w=[4 4 4 4];   % [kg/s] initial flowrate to well

P=zeros(11,L);
P1=zeros(11,L);
P2=P1; 
P3=P1; 
P4=P1; 

w_in=zeros(4,L);
p_downhole=zeros(4,L);
inflow=zeros(4,L);
GOR=zeros(4,L);
flow=zeros(4,L);
time_log=zeros(1,L);