mirror of
https://github.com/OPM/opm-simulators.git
synced 2024-11-29 04:23:48 -06:00
29 lines
959 B
Matlab
29 lines
959 B
Matlab
function x = sim_simple(cartDims, physDims, tf, verb)
|
|
g = computeGeometry(cartGrid(cartDims, physDims));
|
|
|
|
rock = struct('perm', repmat(1, [g.cells.num, 1]), ...
|
|
'poro', repmat(1, [g.cells.num, 1]));
|
|
|
|
T = computeTrans(g, rock);
|
|
|
|
fluid = initSimpleFluid('n' , [ 1, 1], ...
|
|
'mu' , [ 1, 30], ...
|
|
'rho', [1000, 800]);
|
|
|
|
gravity reset off
|
|
|
|
src = addSource([], [1, g.cells.num], [1, -1], 'sat', [ 1, 0 ; 0, 1]);
|
|
|
|
s0 = [0, 1];
|
|
state = incompTPFA(initState(g, [], 0, s0), ...
|
|
g, T, fluid, 'src', src, 'matrixoutput', true);
|
|
|
|
if nargin < 4, verb = false; end
|
|
state = implicitTransport(state, g, tf, rock, fluid, ...
|
|
'src', src, 'verbose', verb, ...
|
|
'nltol', 1e-12);
|
|
|
|
x = struct('g', g, 'rock', rock, 'T', T, 'fluid', fluid, ...
|
|
'src', src, 'state', state);
|
|
end
|