NAME

nmo_mod - Perform nmo

SYNOPSIS

Initializer-call nmo_init(slowness,offset,o1,d1)

operator-call nmo_nearest(adj,tt,zz)

operator-call nmo_linear(adj,tt,zz)

           Slowness(t)

           Offset

           First sample in time

           Sampling in time

           Wheter or not to do inverse

        Whether or not do adjoint

        Input

        Output

Nmo by nearest or linear interpolation neighbor for a gather

NMO, its transpose, inverse, and inverse transpose by nearest neighbor.

adj=.false. inv=.false.: zz(iz) = [NMO] tt(it)

adj=.true. inv=.false.: tt(it) = [NMO adj] zz(iz)

adj=.false. inv=.true.: tt(it) = [NMO inverse] zz(iz)

adj=.true. inv=.true.: zz(iz) = [NMO inverse transpose] tt(it)

sepvelanf90