Learn R Programming

RSEIS (version 2.1-6)

travel.time1D: Seismic Travel Time 1D

Description

travel time from source to reciever in 1D local model.

Usage

travel.time1D(indelta, inhpz, instaz, inlay, ztop, vel)

Arguments

indelta
distance in KM
inhpz
depthof hypocenter, km
instaz
elevation of station
inlay
number of layers
ztop
vector, tops of layers
vel
vector, velocities in layers

Value

  • list:
  • dtdrderivative of t w.r.t. horizontal distance
  • dtdzderivative of t w.r.t. z, depth
  • angleincidence angle, degrees
  • tttravel time, s

Details

Uses local 1D velocity model, not appropriate for spherical earth.

See Also

Get1Dvel

Examples

Run this code
data(VELMOD1D)

v= VELMOD1D

travel.time1D(23, 7, 0, length(v$zs) , v$zp , v$vp)

Run the code above in your browser using DataLab