Program: MKLSGRIDEVALBAZTRI
mklsgridevalbaztri......evaluate back azimuths of nodes in tri grids
call: newgrid=mklsgridevalbaztri(lsopt,mygrid,simpledata,evalthese);
lsopt: (structure)
LSOPT structure as returned by MKLSOPT
mygrid: (structure)
grid structure as returned by MKLSGRIDNEW
fxd: (strcuture)
FXD structure as returned by MKLSLS2FXD, containing all
data.
evalthese: (structure)
structure denoting grid nodes to be evaluated, as returned
by MKLSGRIDNONREADY.
The following fields are expected:
.layer: (numeric)
layer ID, only one per element of EVALTHESE
.nodes: (numeric array)
list of nodes. This is a sublist of the
nodes list in the mygrid.layer field,
contining node IDs and coordinates formatted
as in the layer structure.
.listpos: (numeric array)
list of positions of the nodes in the
original .nodes field of the input layer.
evalthese.listpos(i) is the array indes of
the node evalthese.nodes(i,:) wihtin the
original layer structure.
result: newgrid: (structure)
as MYGRID, but with the tested-counters and fit-field actualized.
This routine computes the back azimuths of nodes listed in EVALTHESE and
finds out which nodes fit into the desired BAZ ranges of all stations.
the .fit and .tested fields of the grid structure are updated
accordingly.
Martin Knapmeyer, 23.02.2005, 28.02.2005, 16.03.2005
Read M-File Source Code
eof.