FindDist4p: Epicentral Distance

Description Usage Arguments Details Value Author(s) See Also Examples

View source: R/FindDist4p.R

Description

Calculates epicentral distance given focal depth and ray parameter or takeoff angle

Usage

1
FindDist4p(phase, h, model, p, takeoff)

Arguments

phase

Phase of arrival (e.g. 'P', 'pS')

h

Focal depth (km)

model

Planet model

p

Ray parameter (s/deg)

takeoff

Takeoff angle (deg)

Details

Only one of 'p', 'takeoff' needs to be specified, and may be a vector. 'phase' and 'h' must be scalars.

Value

List including the following elements:

dist

Vector of surface distances traveled (deg), corresponding to the values in 'p' or 'takeoff'

segx

List of vectors corresponding to 'p' or 'takeoff'. Each vector includes distance coordinates (deg) along the ray path.

segz

List of vectors corresponding to 'p' or 'takeoff'. Each vector includes depth coordinates (km) along the ray path.

segtyp

List of vectors corresponding to 'p' or 'takeoff'. Each vector includes wave type ('P' or 'S') for each segment in the ray. Note that vectors in 'segtyp' have one fewer element than vectors in 'segx' and 'segz' because they describe segments, not points.

resp

Vector of ray parameters for each ray (s/deg).

Author(s)

Jake Anderson

See Also

Traveltime, FindTime4p

Examples

1
2
3
data(model)

FindDist4p('SKKS',100,model,c(4,5))

TauP.R documentation built on May 2, 2019, 3:25 a.m.