thrust.fault: Thrust Fault Cartoon

In RFOC: Graphics for Spherical Distributions and Earthquake Focal Mechanisms

Thrust Fault Cartoon

Description

Illustrate a thrust fault using animation

Usage

thrust.fault(anim = seq(from = 0, to = 1, by = 0.1), KAPPA = 2,
             Light = c(45, 45))

Arguments

anim	animation vector
KAPPA	Phong parameter for lighting
Light	lighting point

Details

Program will animate a thrust fault for educational purposes. Animation must be stopped by halting execution.

Value

Graphical Side effects

Author(s)

Jonathan M. Lees<[e-mail]>

See Also

strikeslip.fault, thrust.fault

Examples

thrust.fault(anim=0, KAPPA=4, Light=c(-20, 80))

## Not run: 
#### execute a stop command to stop this animation
anim= seq(from=0, to=1, by=.1) 
thrust.fault(anim=anim, KAPPA=4, Light=c(-20, 80))

## End(Not run)

RFOC documentation built on Sept. 8, 2023, 6:12 p.m.