...
Name
agr — Adjust grid to points and well data
| Wiki Markup |
|---|
{alias:agr} |
...
Syntax
| Panel | ||||||
|---|---|---|---|---|---|---|
| ||||||
agr hiname [dis fixed_radius] [rad radius_factor] *max* max_radius [sav] [conic] [tensor [fac influencefactor]] |
Description
The agr command is used for adjusting a grid to the z-values of a point-dataset in workspace. A common agr operation is to adjust a map to the values found in a well. The grid must be the active dataset.
Arguments
hiname
dis fixed_radius
rad radius_factor
max max_radius
sav
tensor
fac influencefactor
Examples
Ex.1: Generate grid and cube
| No Format | ||||
|---|---|---|---|---|
| ||||
set i 0 ; # initialize i
# adjust grid 5 times
while {$i lt 5} {
agr ggg dis 5000 ; # adjust grid in workspace to points in workspace ggg using a fixed radius of 5000.
incr i ; # add one to i
}
{noformat}
|
To
...
achieve
...
good
...
results
...
with
...
the
...
agr
...
command
...
one
...
should
...
repeat
...
the
...
operations
...
a
...
few
...
times
...
to
...
secure
...
that
...
the
...
updating
...
towards
...
the
...
different
...
points
...
stabilizes
...
in
...
such
...
a
...
way
...
that
...
an
...
updating
...
in
...
one
...
point
...
do
...
not
...
harm
...
the
...
adjacent
...
points.
...
Ex.2:
...
Update
...
grid
...
to
...
well
...
data
...
Adjusting
...
grids
...
is
...
handled
...
in
...
the
...
command
...
object
...
found
...
by
...
grid
...
>
...
Grid
...
Operations
...
>
...
Update
...
grid
...
to
...
well
...
data*.
...
The
...
example
...
below
...
is
...
an
...
excerpt
...
from
...
that
...
code.
...
| No Format | ||||
|---|---|---|---|---|
| ||||
# example of using agr to update a grid
# well data is located in workspace welldata
# the grid to be updated is in active
mhi updatedgrid ; # the grid is saved in updated grid
set radius 5000 ; # radius of updating
set iterations 10 ; # max iterations
set iter 1 ; # initiate a loop variable
set tell 0 ; # initiate a counter variable
while {$iter == 1} {
mlo updatedgrid ; # move low updatedgrid
set rad [expr $radius * (1 - 0.06 * $tell)]
agr welldata rad $rad ; # adjust grid using an influence radius
mhi updatedgrid ; # move high updated grid
mlo welldata ; # move down welldata
zap dif updatedgrid ; # zap and get difference to grid
# well data differences to the grid is in the scalar part
set zmi [gvar zsmin] ; # get scalar zmin
set zma [gvar zsmax] ; # get scalar zmax
set val [expr $zmi + $zma] ; # add min and max
if {$val lt 1 amp $val > -1} {set iter 0} ; # check difference and stop if OK
mlo updatedgrid ; # move low updatedgrid
incr tell ; # increment the tell variable
if {$tell >= $iterations} { ; # test if counter is greater than max iterations
break ; # break the loop
}
}
# the result is now in updatedgrid
{noformat}
!att:_img_ref^cmd_agr_viewports.png|border=1,width=500!
_The grid in the example above is displayed in a viewport presentation before and after updating with *agr*_
h2. See also
[grp - Grid points and lines], [zap - Zap (or snap) to data]
{pagebreak} |
The grid in the example above is displayed in a viewport presentation before and after updating with agr