mirror of
https://github.com/OPM/ResInsight.git
synced 2025-01-01 03:37:15 -06:00
14 lines
271 B
Matlab
14 lines
271 B
Matlab
# Keep the values in the first LGR only
|
|
|
|
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"); |