mirror of
https://github.com/OPM/ResInsight.git
synced 2025-02-25 18:55:39 -06:00
13 lines
297 B
Mathematica
13 lines
297 B
Mathematica
|
addpath("/home/builder/Projects/ResInsightBuildDir/OctavePlugin");
|
||
|
|
CInfo = riGetActiveCellInfo();
|
||
|
|
SOIL = riGetActiveCellProperty("SOIL");
|
||
|
|
|
||
|
|
Mask = (CInfo(:,1) != 1);
|
||
|
|
|
||
|
|
LGRSOIL = SOIL;
|
||
|
|
i = 0;
|
||
|
|
for i = (1:columns(LGRSOIL))
|
||
|
|
LGRSOIL(Mask,i) = nan;
|
||
|
|
endfor
|
||
|
|
|
||
|
|
riSetActiveCellProperty(LGRSOIL, "LGRSOIL");
|