ResInsight/OctavePlugin/OctaveScripts/LGRSOIL.m
2016-11-25 10:24:17 +01:00

13 lines
231 B
Matlab

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");