mirror of
https://github.com/OPM/ResInsight.git
synced 2025-02-25 18:55:39 -06:00
18 lines
357 B
Mathematica
18 lines
357 B
Mathematica
|
addpath("/home/builder/Projects/ResInsightBuildDir/OctavePlugin");
|
||
|
|
SOIL = riGetActiveCellProperty("SOIL");
|
||
|
|
|
||
|
|
SOILDIFF = SOIL;
|
||
|
|
|
||
|
|
# Calculate change of oil saturation from timestep to timestep
|
||
|
|
i = 0;
|
||
|
|
for timestep = SOIL
|
||
|
|
if (i > 0)
|
||
|
|
SOILDIFF(:,i) = timestep - SOIL(:,i);
|
||
|
|
endif
|
||
|
|
i++;
|
||
|
|
endfor
|
||
|
|
SOILDIFF(:,i) = 0;
|
||
|
|
|
||
|
|
riSetActiveCellProperty(SOILDIFF, "SOILDIFF");
|
||
|
|
|