velsimp - simple velocity transfrom
call velsimp( adj,add, t0,dt,x0,dx,s0,ds, nt,nx,ns, modl, data)
0- (slow->offset), 1- (offset->slow)
0- erase output, 1 save output
Initial time
Sampling in time
First offset
Offset sampling
First slowness
Sampling in slowness
Number of time samples
Number of offset
Number of slownesses
real(nt,ns)
time,slowness panel
real(nt,nx)
time,offset panel
A fortran77 program to convert from time,slowness to time, offset
sepvelanf