work.m

来自「Petroleum Reservoir Simulation」· M 代码 · 共 28 行

tt=0;
time=0;
dt=input('input the time step: dt=');
days=input('input days you want to simulate: days=');
basicdata;



for tt=0:dt:days
   get_start;
   newdata;
   iteration;
   go_on_work;
   time=time+dt
   
   while e~=0
      iteration;
      go_on_work;
   end
   
end

disp('the final results are: ');
disp('Pwi=');
pwi
disp('Swi=');
swi