Files
ResInsight/OctavePlugin/OctaveScripts/kslice.m
2012-05-18 09:45:23 +02:00

12 lines
314 B
Matlab

addpath("/home/builder/Projects/ResInsightBuildDir/OctavePlugin");
CInfo = riGetActiveCellInfo();
SOIL = riGetActiveCellProperty("SOIL");
Mask = (CInfo(:,4) < 17) | (CInfo(:,4) > 20)
LGRSOIL = SOIL;
i = 0;
for i = (1:columns(LGRSOIL))
LGRSOIL(Mask,i) = nan;
endfor
riSetActiveCellProperty(LGRSOIL, "KSlice");